Скачать: CL | DM;

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

← →
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]

Спасибо.

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.01 c