WM_SIZE Handler Maximize, Minimize,...

[Dunkelbunt27]

Ich weiß wo ich OnPaint finde ;D
Aber danke, für den Tipp.

[edit]Ich muss mich leider nochmal melden.
Das:

Delphi-Quellcode:

private
    { Private-Deklarationen }
    procedure WMSize(var Msg: TMessage); message WM_SIZE;
[...]

verträgt sich leider überhaupt nicht mit:

Delphi-Quellcode:

type
[...]
procedure WMExitSizeMove(var Message: TMessage); message WM_EXITSIZEMOVE;

Wenn ich beides schreibe, wirkt das ExitSizeMove nicht mehr, und das Fenster wird nicht neugezeichnet nach dem resizen.
Jemand ne Idee wie ich das lösen könnte?
Oder ob man beides verbinden kann?
[/edit]

[edit2]
Ich hab das ganze jetzt mit folgendem gelöst, jedoch fehlt noch eine Kleinigkeit:

Delphi-Quellcode:

procedure TForm1.FormPaint(Sender: TObject);
begin
case Form1.WindowState of
      wsMaximized:                               //maximiert
      begin
       [...]
      end;

      wsMinimized:                               //minimiert
      begin
        [...]
      end;

      wsNormal:
      begin
        [...]                                        //...
      end;
      else
      begin
        [...]                                        //...
      end;
end;
end;

Was fehlt ist, wenn ich das Fenster maximiere und dann auf Größe wiederherstellen klicke, wird nicht neu gezeichnet!
Weiß jemand was ich dazu machen muss?
[/edit2]