| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Модальное окно [D7, XP]
ALex11 © (2005-11-04 20:54:00)Есть окно вызываемое в модальном режиме. На форме кнопка button1.modalresult=mrOK. И строка edit1. Как сделать так , чтобы при нажатии на кнопку button1 окно не закрывалось, если edit1.text=’’, и закрывалось если иначе.
Юрий Зотов (2005-11-05 04:11:00) [1]В Edit1.OnChange:
Button1.Enabled := Edit1.Text <> ''
begin...end (2005-11-04 21:09:00) [2]В OnCloseQuery:
CanClose := (ModalResult <> mrOK) or (Edit.Text <> '')
| |
