Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Процедура при нажатии на "крест" [D6, WinXP]


Viper_Omsk ©   (2006-12-16 20:01:00) 

Здравствуйте, мастера!
Подскажите как можно сделать чтобы при нажатии на "крест" в правом верхнем углу, программа не закрывалась, а выполняла другие действия, например, какую-нибудь процедуру?


TUser   (2006-12-17 07:17:00) [1]

+ SetConsoleCtrlHandler и CTRL_CLOSE_EVENT


Eraser   (2006-12-16 21:21:00) [2]

> [0] Viper_Omsk   (16.12.06 20:01)

в OnClose впиши
Action := caNone;


tesseract   (2006-12-16 20:09:00) [3]

обработать OnCloseQuery.
если на API то WM_CLOSE.
если надо перехватить включение то WM_QUERY_END_SESSION.


Наверх

Титульная страница Поиск, карта сайта Написать письмо