Вниз
Скачать: CL | DM;

TEdit: проверка на ввод информации   Найти похожие ветки 

← →
В л а д и м и р ©   (2004-04-05 21:15) [0]

На форме расположен Edit1, кнопки "< Назад", "Далее >" и "Отмена". При создании формы свойство Enabled кнопки "Далее >" установлено в False. При этом мне необходимо проверить, что в окно редактирования был введен текст и активировать кнопку Далее, а если после этого текст был стерт пользователем, опять сделать ее неактивной.
Я пытался воспользоваться событием OnChange кнопки, где проверял, не равно ли Edit1.Text="". Но это мне кажется очень примитивным, да и можно вначале ввести кучу пробелов и пр. гадости. К тому же получалось, если я начинаю вводить текст в окне редактирования, кнопка активируется, однако когда весь текст стирался, она продолжала быть активной.
Каким образом можно сделать всю эту проверку более эффективной?


← →
Anatoly P   (2004-04-05 21:22) [1]

Trim


← →
sir John ©   (2004-04-05 21:48) [2]

Чотбы после стирания деактивировать кнопку можно сделать вот так:

if Edit1.Text <> "" then
btn_Next.Enabled :=  true;
if Edit1.Text = "" then
btn_Next.Enabled :=  false;


← →
sir John ©   (2004-04-05 21:49) [3]

сорри.. Этот код надо поставить в обработчик OnChange Edit-а


← →
ламер ©   (2004-04-05 21:58) [4]

> sir John ©   (05.04.04 21:48) [2]
а ключевое слово else вы принципиально не используете? :)

по теме:
btnNext.Enabled := Trim(Edit1.Text) <> "";


← →
sir John ©   (2004-04-05 22:04) [5]

я ж не говорю, что мой код обязан служить образцом :)



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.03 c
1-1081184087
bbgone
2004-04-05 20:54
2004.04.25
Печать-принтер-шрифт


6-1077527376
Ron
2004-02-23 12:09
2004.04.25
Сканер сети


3-1080462762
Хамс
2004-03-28 12:32
2004.04.25
Как запихнуть в Interbase офскую DB изображение ?


7-1077878616
aabout
2004-02-27 13:43
2004.04.25
Программное переключение клавы


6-1077359189
ProNix
2004-02-21 13:26
2004.04.25
TwebBrowser и фреймы




   Наверх