Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.11.20;
Скачать: CL | DM;

Вниз

Модальное окно   Найти похожие ветки 

 
ALex11   (2005-11-04 20:54) [0]

Есть окно вызываемое в модальном режиме. На форме кнопка button1.modalresult=mrOK. И строка edit1. Как сделать так , чтобы при нажатии на кнопку button1 окно не закрывалось, если edit1.text=’’, и закрывалось если иначе.


 
begin...end ©   (2005-11-04 21:09) [1]

В OnCloseQuery:

CanClose := (ModalResult <> mrOK) or (Edit.Text <> "")


 
Юрий Зотов ©   (2005-11-05 04:11) [2]

В Edit1.OnChange:

Button1.Enabled := Edit1.Text <> ""



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

Текущий архив: 2005.11.20;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.031 c
9-1114769981
VolanD666
2005-04-29 14:19
2005.11.20
Far Cry


14-1130564953
Irmantukas
2005-10-29 09:49
2005.11.20
Bluetooth


14-1130356302
БарЛог
2005-10-26 23:51
2005.11.20
Что лучше?


11-1093729013
Sormy
2004-08-29 01:36
2005.11.20
Delphi 7.0 Вылетает...


2-1130782936
Dudee
2005-10-31 21:22
2005.11.20
TChart