| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как отменить закрытие программы?
TBeginner © (2006-01-04 14:53:00)Такая ситуация: в общем есть одно гланое окно Form1, при закрытии на событие OnCloseQuery у меня открывается второе окно Form2, на нём есть кнопка "Отмена", на неё назначена просто Close, при нажатии на которую программа закрывается, как сделать что бы программа не выходила, а только закрывалось эта форма?
iamdanil (2006-01-04 17:26:00) [1]if MessageDlg('Exit?',mtwarning,[mbyes, mbno],0)=mrno then
CanClose:=false;
Eraser (2006-01-04 16:23:00) [2]
> TBeginner © (04.01.06 14:53)
В OnClose впиши
Action := caHide;
Чародей (2006-01-04 16:18:00) [3]Если это простой запрос на выход то можно так
if MessageDlg('Exit',mtInformation,[mbOK, mbCancel],0)=ID_CANCEL then
CanClose:=false;
begin...end (2006-01-04 14:59:00) [4]В обработчике OnCloseQuery есть var-параметр CanClose.
| |
