Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как обработать нажатие на кнопку минимизации?

demon © (2009-09-05 03:27:00)
Как через api обработать нажатие в окне на кнопку минимизации? т.е. какое событие за это отвечает?..

demon (2009-09-12 05:18:00) [1]

> зачем?оно в трэй что-ли сворачивается?

Не совсем, но чтото вроде того. Оно сварачиваеться в меленькую панельку ну например как в аимпе ;)

clickmaker (2009-09-08 16:27:00) [2]
> хотелось чтобы окно закрывалось вместо сворачивания

зачем?
оно в трэй что-ли сворачивается?

Ruzzz (2009-09-06 16:51:00) [3]
ах да if (Message.WParam and $FFF0 = SC_MINIMIZE) then Close;

Ruzzz (2009-09-06 16:31:00) [4]
вместо
if (Message.WParam = SC_MINIMIZE) and FSettings.MinimizeToTray then
Application.MainForm.Visible := False
написать
if (Message.WParam = SC_MINIMIZE) then Close;

Не проверял :) Попробуйте сами

demon (2009-09-06 02:26:00) [5]
Что-то не получаеться сделать так как хотелось, а хотелось чтобы окно закрывалось вместо сворачивания...

Юрий Зотов (2009-09-05 17:26:00) [6]
> Ruzzz (05.09.09 05:23) [2]

In WM_SYSCOMMAND messages, the four low-order bits of the wParam parameter are used internally by the system. To obtain the correct result when testing the value of wParam, an application must combine the value 0xFFF0 with the wParam value by using the bitwise AND operator.

if Message.WParam and $FFF0 = SC_MINIMIZE ...

Ruzzz (2009-09-05 05:23:00) [7]
procedure WMGetSysCommand(var Message : TMessage); message WM_SYSCOMMAND;

procedure TfrmMain.WMGetSysCommand(var Message: TMessage);
begin
if (Message.WParam = SC_MINIMIZE) and FSettings.MinimizeToTray then
Application.MainForm.Visible := False
else if (Message.WParam = SC_CLOSE) and FSettings.CloseToTray then
Application.MainForm.Visible := False
else
inherited;
end;

KilkennyCat (2009-09-05 03:38:00) [8]
http://msdn.microsoft.com/en-us/library/ms646360%28VS.85%29.aspx

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »