Главная страница
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.027 c
1-1130077478
users
2005-10-23 18:24
2005.11.20
Чем упаковать несколько файлов в один архив, не используя DLL ?


3-1128934887
BPK
2005-10-10 13:01
2005.11.20
MSWord: save to stream as plain text


14-1130257723
Умник
2005-10-25 20:28
2005.11.20
Знаки препинания


14-1130271148
Василий
2005-10-26 00:12
2005.11.20
ShellAPI


3-1128921953
Layner
2005-10-10 09:25
2005.11.20
Через ADO не работает SQL запрос в Access, из Access нормально..