Главная страница
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.037 c
2-1130827236
syte_ser78
2005-11-01 09:40
2005.11.20
глупый вопрос по TDBLoocupComboBox


14-1130330178
Megabyte
2005-10-26 16:36
2005.11.20
Чужой код


2-1130522535
PUZZZ
2005-10-28 22:02
2005.11.20
Программа для создания и хранения RTF-документов в виде структуры


3-1128941214
alex_1234
2005-10-10 14:46
2005.11.20
ADO, dBASE, create table: ошибка синтаксиса при определении поля.


1-1130307574
DVM
2005-10-26 10:19
2005.11.20
Правильно ли я превел с С на Pascal?