OnWindowStateChange?

[PeterPanino]

Hallo, jetzt habe ich lange gesucht - kennt jemand einen Event, der beim Wechsel des Programmfenster-Status von wsMaximized nach wsNormal ausgelöst wird?

[PeterPanino]

Ich verwende jetzt diesen Code:

Delphi-Quellcode:

type
  TformMain = class(TForm)

public
    { Public-Deklarationen }
    procedure WMSYSCOMMAND(var Msg: TMessage); Message WM_SYSCOMMAND;

procedure TformMain.WMSYSCOMMAND(var Msg: TMessage);
begin
  case Msg.wParam of 
    SC_RESTORE: // von wsMaximized oder wsMinimized nach wsNormal
      begin
        Beep;
        inherited;
      end;    
    else
      inherited; 
  end;
end;

Das Abfangen der Nachricht funktioniert jedoch nur, wenn ich beim maximierten Fenster auf den Restore-Button klicke (links vom Close-Button). Wenn ich aber das Restore durch einen Doppelklick auf die Fenster-Titelzeile durchführe, funktioniert das Abfangen der Nachricht nicht! Weiß jemand wieso?