Событие при максимизации главной формы

← →
Jaxtor (2002-04-17 14:21) [0]

Скажите, пожалуйста, какое событие происходит при максимизации
главной формы. Искал в инспекторе объектов такое свойство и не
нашел. Нужно именно такое событие, которое происходит исключительно при нажатии средней кнопки в заголовке окна.

← →
Игорь Шевченко © (2002-04-17 14:30) [1]

День добрый,

Происходит сообщение WM_SYSCOMMAND с параметром SC_MAXIMIZE

type TMyForm = class(TForm) private procedure WMSysCommand (var Message : TWMSysCommand); message WM_SYSCOMMAND; procedure DoOnMaximize; ... end; procedure TMyForm.WMSysCommand (var Message : TWMSysCommand); begin inherited; if Message.wParam = SC_MAXIMIZE then DoOnMaximize(); end;

С уважением,

← →
Jaxtor (2002-04-17 14:38) [2]

Спасибо.

Событие при максимизации главной формы Найти похожие ветки