Главная страница
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.026 c
14-1130261828
Джо
2005-10-25 21:37
2005.11.20
Perl-функция pack


14-1130687932
Kolan
2005-10-30 18:58
2005.11.20
Как написать плагин для FierFox


9-1120200139
Pasechnick
2005-07-01 10:42
2005.11.20
GLScene и ATI


2-1131205639
zero-g
2005-11-05 18:47
2005.11.20
Вопрос по Image


3-1128584984
msguns
2005-10-06 11:49
2005.11.20
Access. Записи детала в одну строку