MDI - Tile nach dem schließen eines MDI Client Fensters

[thkerkmann]

Hi,

wie wärs mit einem

Delphi-Quellcode:

tChildForm.OnClose(..);
begin
  PostMessage(Application.MainForm, WM_USER, 0, 0);
end;

und im Mainform

Delphi-Quellcode:

  protected
    procedure WMUser(var Msg:tMessage); message WM_USER;
  ...

procedure TForm1.WMUser(var Msg:tMessage);
begin
  Tile;
end;

So bekommt dein Mainform eine Nachricht, wenn ein Childform geschlossen wird, und kann das Tile ausführen.

Gruss

Thomas.