Текущий архив: 2007.01.07;
Скачать: CL | DM;

Вниз

Процедура при нажатии на "крест"   Найти похожие ветки 

← →
Viper_Omsk   (2006-12-16 20:01) [0]

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

---

← →
tesseract ©   (2006-12-16 20:09) [1]

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

---

← →
Eraser ©   (2006-12-16 21:21) [2]

> [0] Viper_Omsk   (16.12.06 20:01)

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

---

← →
TUser ©   (2006-12-17 07:17) [3]

+ SetConsoleCtrlHandler и CTRL_CLOSE_EVENT

---

Страницы: 1 вся ветка

Текущий архив: 2007.01.07;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.057 c