CodeNet / Языки программирования / Delphi & Kylix / FAQ - Часто задаваемые вопросы / Пишем инсталятор.
FAQ - События нажатия на системные кнопки формы (минимизация, закрытие...)
© Зайцев Олег
http://z-ol.chat.ru/
http://z-ol.chat.ru/
Хотелось бы чтобы при нажатии на кнопку MINIMIZE программа исчезала из таскбара.
При нажатии на эти кнопки происходит сообщение WM_SYSCOMMAND, его то и надо перехватить. При этом:
Пример: TYPE TMAIN = CLASS(TFORM) .... PROTECTED PROCEDURE WMGETSYSCOMMAND(VAR MESSAGE :TMESSAGE); MESSAGE WM_SYSCOMMAND; END; ..... //------------------------------------------------------------------------ // Обработка сообщения WM_SYSCOMMAND (перехват минимизации окна) //------------------------------------------------------------------------ PROCEDURE TFORM1.WMGETSYSCOMMAND(VAR MESSAGE : TMESSAGE) ; BEGIN IF (MESSAGE.WPARAM = SC_MINIMIZE) THEN FORM1.VISIBLE:=FALSE ELSE INHERITED; END;