![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Событие при максимизации главной формы [D6, Win95/98]
Jaxtor © (2002-04-17 14:21:00)Скажите, пожалуйста, какое событие происходит при максимизации
главной формы. Искал в инспекторе объектов такое свойство и не
нашел. Нужно именно такое событие, которое происходит исключительно при нажатии средней кнопки в заголовке окна.
Jaxtor (2002-04-17 14:38:00) [1]Спасибо.
Игорь Шевченко (2002-04-17 14:30:00) [2]День добрый,
Происходит сообщение 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;
С уважением,