StrToInt() - Общие вопросы Delphi

Zeraim · 04.06.2008, 01:14

Чтото я непонял, оно должно возвращать значение типа интеджер, но тогда почему на меня дельфи ругается ([Error] Unit1.pas(38): Incompatible types) если делаю так:

Код:

if (strtoint(Edit1.text) > 0 and strtoint(Edit1.text) < 330) then Label1.Caption := 'Точка принадлежит первой области';

Пробовал числа присваивать переменным интеджер, тож самое 8)
И подскажите можно-ли писать так:

Код:

if strtoint(Edit1.text) in [0..330] then Label1.Caption := 'Точка принадлежит первой области';

В этом случае на меня едльфи тоже ругается, хелп открыл но ничего непонял 8)

Баламут · 04.06.2008, 01:26

Цитата:

Сообщение от Zeraim

Код:

if (strtoint(Edit1.text) > 0 and strtoint(Edit1.text) < 330) then Label1.Caption := 'Точка принадлежит первой области';

А если так записать?

if (strtoint(Edit1.text) > 0) and (strtoint(Edit1.text) < 330) then Label1.Caption := 'Точка принадлежит первой области';

mutabor · 04.06.2008, 01:28

if ((strtoint(Edit1.text) > 0) and (strtoint(Edit1.text) < 330)) then...

Zeraim · 04.06.2008, 01:50

Ххехехеех стукните меня кто-нибудь чем-нибудь тяжёлым 8)

dimonbest · 04.06.2008, 18:31

1. if (strtoint(Edit1.text) in [0..330]) then Label1.Caption := 'Точка принадлежит первой области';

04.06.2008, 01:14	#1
Zeraim Ra-Ra ? Форумчанин Регистрация: 06.03.2008 Сообщений: 286	StrToInt() Чтото я непонял, оно должно возвращать значение типа интеджер, но тогда почему на меня дельфи ругается ([Error] Unit1.pas(38): Incompatible types) если делаю так: Код: `if (strtoint(Edit1.text) > 0 and strtoint(Edit1.text) < 330) then Label1.Caption := 'Точка принадлежит первой области';` Пробовал числа присваивать переменным интеджер, тож самое 8) И подскажите можно-ли писать так: Код: `if strtoint(Edit1.text) in [0..330] then Label1.Caption := 'Точка принадлежит первой области';` В этом случае на меня едльфи тоже ругается, хелп открыл но ничего непонял 8)

04.06.2008, 01:28	#3
mutabor Телепат с дипломом Старожил Регистрация: 10.06.2007 Сообщений: 4,929	if ((strtoint(Edit1.text) > 0) and (strtoint(Edit1.text) < 330)) then... The future is not a tablet with a 9" screen no more than the future was a 9" black & white screen in a box. It’s the paradigm that survives. (Kroc Camen) Проверь себя! Онлайн тестирование \| Мой блог

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
StrToInt и IntToStr	AVer	Общие вопросы Delphi	9	04.07.2010 13:57
StringGrid (StrToInt)	Небесный	Общие вопросы Delphi	9	13.02.2008 21:24
Не работает StrToInt	Dronik	Помощь студентам	12	21.01.2008 16:58

04.06.2008, 01:50	#4
Zeraim Ra-Ra ? Форумчанин Регистрация: 06.03.2008 Сообщений: 286	Ххехехеех стукните меня кто-нибудь чем-нибудь тяжёлым 8)

04.06.2008, 18:31	#5
dimonbest Форумчанин Регистрация: 07.02.2008 Сообщений: 150	1. if (strtoint(Edit1.text) in [0..330]) then Label1.Caption := 'Точка принадлежит первой области';