Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Incompatible types: 'String' and 'Integer' [D7]

Страницы: 1 2 >
Vik © (2012-05-03 14:52:00)
Приветствую, мне нужно, чтоб в поле Edit1 вводились только цифры (это я сделал), и при нажатии кнопки происходили действия.

Вот код. Подскажите, как правильно сделать?

procedure TForm1.Button1Click(Sender: TObject); Var X : String; begin If X>5 then Label1.Visible:=True else Label2.Visible:=True; end;

Vik (2012-05-04 07:43:00) [1]
>Это после изучения основ, а тут идет об "ДО"

Скорее во время.

Anatoly Podgoretsky (2012-05-04 07:07:00) [2]

> после изучения основ перпечатанная справка вполне достойный
> материал

Это после изучения основ, а тут идет об "ДО"
И после изучения основ интерактивная лучше.

Vik (2012-05-04 06:48:00) [3]

> Inovet © (03.05.12 22:10) [25]
, Как раз в его коде при поправках ошибки были (когда я 3-е сравнение добавил), а то я делаю программу, в поле едит вводим число, нажимаем кнопку. Она должна написать меньше пяти это число, больше или равно.

Юрий Зотов привел хороший код (я то не говорил что 3 сравнения хочу сделать) , и при вводе числа 5 программа писала "меньше пяти" =)

Ну мне кажется я тоже не плохо сделал..

Ну не надо так чернить наших авторов.

Так же думаю

Германн (2012-05-04 01:53:00) [4]

> Anatoly Podgoretsky © (03.05.12 16:06) [17]
>
> > Vik (03.05.2012 15:53:15) [15]
>
> Потому что наши в лучшем случае перепечатка справки
>

Ну не надо так чернить наших авторов.

Плохиш (2012-05-03 23:51:00) [5]

> Inovet © (03.05.12 22:10) [25]

Ну в общем-то [10] и [20] достаточно сильно отличаются.

Inovet (2012-05-03 22:10:00) [6]
> [22] Vik © (03.05.12 21:53)
> А нет, не проще, так же примерно )))

Предложенное ЮЗ лучше, поскольку сравнение делается в одном месте, что снижает вероятность ошибки при кодировании и последующих правках кода.

Vik (2012-05-03 21:59:00) [7]
Я же книжку стал читать )))

Vik (2012-05-03 21:54:00) [8]
Медвежонок пятачок, хватит надо мной прикалываться!) Надо же с чего то начитать!

Vik (2012-05-03 21:53:00) [9]
А нет, не проще, так же примерно )))

Медвежонок Пятачок (2012-05-03 21:52:00) [10]
нашел программиста?

Vik (2012-05-03 21:52:00) [11]
По крайней мере дня 2 назад до меня бы даже это не дошло. Тенденция, однако :D

procedure TForm1.Button1Click(Sender: TObject);
var
X: integer;
begin
X := StrToInt(Edit1.Text);
Label1.Visible := X > 5;
Label4.Visible := X=5;
Label2.Visible := X<5
end;

procedure TForm1.Edit1Change(Sender: TObject);
begin

Label1.Visible:=False;
Label2.Visible:=False;
label4.Visible:=False
end;

end.

Vik (2012-05-03 21:49:00) [12]
Кстати, решение нашел гораздо проще=)

KilkennyCat (2012-05-03 21:18:00) [13]

> Anatoly Podgoretsky © (03.05.12 16:06) [17]

после изучения основ перпечатанная справка вполне достойный материал

Anatoly Podgoretsky (2012-05-03 16:06:00) [14]
> Vik (03.05.2012 15:53:15) [15]

Потому что наши в лучшем случае перепечатка справки

CRLF (2012-05-03 15:56:00) [15]
чтобы скорее развалить Матушку Святую Русь

Vik (2012-05-03 15:53:00) [16]
Почему лучше иностранных?

AV (2012-05-03 15:40:00) [17]
возможно.
но думаю Вам стоит начать с картинок, типа
http://compteacher.ru/programming/delphi/848-delphi-dlya-nachinayuschih.html
или
http://www.google.ru/#hl=ru&newwindow=1&q=%D0%BE%D0%B1%D1%83%D1%87%D0%B5%D0%BD%D0%B8%D0%B5+delphi+%D0%BE%D0%BD%D0%BB%D0%B0%D0%B9%D0%BD&oq=%D0%BE%D0%B1%D1%83%D1%87%D0%B5%D0%BD%D0%B8%D0%B5+delphi&aq=1&aqi=g3g-v7&aql=&gs_l=serp.3.1.0l3j0i15l7.50975.58290.0.61293.23.12.2.3.4.0.565.2218.3j6j2j5-1.12.0...0.0.uUk_AYR8fOQ&bav=on.2,or.r_gc.r_pw.,cf.osb&fp=8a013a9c42f685df&biw=1 178&bih=881

Anatoly Podgoretsky (2012-05-03 15:40:00) [18]
Бери лучше иностранных авторов.

Vik (2012-05-03 15:36:00) [19]
Спасибо за помощь.

Не по теме. Д.Осипов - Delphi.Профессиональное программирование. нормальная книга?

Vik (2012-05-03 15:27:00) [20]
Amoeba_ , спасибо.

Медвежонок Пятачок, смущаюсь. Вот и задаю вопрос "как правильно сделать?".

Страницы: 1 2 >

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »