Форум: "Основная";
Поиск по всему сайту: 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.75 MB
Время: 0.017 c
1-94511           anod                  2002-04-16 00:30  2002.04.29  
Scroll в ListBox


7-94591           Raider                2002-01-08 16:32  2002.04.29  
Debuger vs Win XP pro


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


3-94271           DEJRGU                2002-04-08 11:17  2002.04.29  
Как в TSQL перевести строку


1-94446           Sniffer               2002-04-13 22:25  2002.04.29  
Системный таймер