Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.29;
Скачать: [xml.tar.bz2];




Вниз

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


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]

Спасибо.




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.29;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.015 c
1-94372           Jaxtor                2002-04-17 14:21  2002.04.29  
Событие при максимизации главной формы


1-94427           velial                2002-04-17 22:22  2002.04.29  
процедуры


4-94620           Cheis                 2002-02-23 23:54  2002.04.29  
Здраствуйте. Как выключить в e равую клавишу мыши, чтобы popup меню не вылезало.


1-94357           NS                    2002-04-17 11:57  2002.04.29  
Нужно в RUN-Time создавать экземпляры некоторых объектов (для при


1-94375           iva                   2002-04-10 13:33  2002.04.29  
DBGridEh