Перехват сообщения

← →
Super-Mario (2002-08-09 10:54) [0]

Подскажите кто знает, какое сообщение посылает Win, при нажатии кнопки "Свернуть все окна" на панели инструментов? Думал что WM_SIZE..., но оказалось не так.

← →
MAYOR © (2002-08-09 12:01) [1]

нет посмотри помойму WM_MINIMIZE

← →
Super-Mario (2002-08-09 12:21) [2]

Такого сообщения вообще нет??? (по крайней мере отсутствует описание в MSDN)

← →
Ученик © (2002-08-09 13:51) [3]

Вроде он ничего не рассылает, а делает что-то типа
SetWindowPos(Handle, HWND_TOP, 0, 0, 0, 0, SWP_NOMOVE or SWP_NOSIZE);

← →
watcher (2002-08-09 14:11) [4]

WM_SYSCOMMAND
wparam = SC_MINIMIZE (or SC_ICON)

минимизирует окно. Правда broadcast ему делать не стоит...

← →
Ученик © (2002-08-09 14:15) [5]

>watcher
Только Explorer этого не делает :)

← →
Super-Mario (2002-08-09 14:19) [6]

>watcher
WM_SYSCOMMAND отлично работает из формы, но на "Свернуть все окна" - МОЛЧИТ!

А если не чего не посылает, то как можно запретить свертывание, по нажатию этой кнопки???

← →
Ученик © (2002-08-09 14:44) [7]

procedure TForm1.FormShow(Sender: TObject);
begin
ShowWindow(Application.Handle, SW_HIDE)
end;
FormStyle - bsSizeToolWin

← →
Super-Mario (2002-08-09 15:06) [8]

>Ученик
Спасибо большое. А можно по другому - чтобы кнопка на панели внизу оставалась?

procedure TForm1.FormShow(Sender: TObject);
begin
ShowWindow(Application.Handle, SW_HIDE);
SetWindowLong(Handle, GWL_EXSTYLE, GetWindowLong(Handle, GWL_EXSTYLE) or WS_EX_APPWINDOW);
end;

FormStyle-bsDialog и загрузить иконку для формы

← →
Super-Mario (2002-08-09 15:43) [10]

> Ученик
Спасибо!

Перехват сообщения Найти похожие ветки