SC_MINIMIZE wird aus Taskbar nicht aufgerufen

[Mazel]

Hallo,

ich wollte mit Hilfe folgender Prozedur die Message SC_MINIMIZE abfangen, doch mir ist aufgefallen, das SC_MINIMIZE nur abgefragt wird, wenn ich auf den Minimze-Button in der Titelleiste des Programmes drücke, doppelklicke ich aber auf den Eintrag in der Taskbar, so dass es auch minimiert wird, passiert nichts:

Delphi-Quellcode:

private
  procedure WMSYSCOMMAND(var Msg: TWMSysCommand); Message WM_SYSCOMMAND;
 ..
 ..

procedure TForm1.WMSYSCOMMAND(var Msg: TWMSysCommand);
begin
  Case (Msg.CmdType and $FFF0) of
   SC_MINIMIZE: begin
                 CoolTrayIcon.IconVisible:=True;
                 Application.Minimize;
                end;
  end; 
 inherited;

Woran kann dies liegen?

Gruß
Mazel

[Niko]

Hi,

wenn es dir darum geht festzustellen, wann die gesamte Anwendung minimiert wird, dürfte das am Einfachsten über das Application.OnMinimize Event gehen. Sonst solltest du Nachricht WM_SIZE verarbeiten.

[Mazel]

Hi,

danke, ich habe es jetzt über Application.Minimize gelöst, indem ich meine eigene Prozedur festgelegt im OnCreate festgelegt habe:
Application.Minimize:=MyMinimize; Gruß
Mazel