Erstellen einer MDI Anwendung

[Marco Haffner]

Zum schließen mußt Du im MDI-Kindfenster die Action-Eigenschaft des OnClose-Ereignisses setzen.

Delphi-Quellcode:

procedure TFormMDIChild.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  { Action := caNone;
    Das Formular darf nicht geschlossen werden, daher geschieht nichts.

    Action := caHide;
    Das Formular wird nicht geschlossen, sondern lediglich verborgen.
    Die Anwendung kann nach wie vor auf das Formular zugreifen.

    Action := caFree;
    Das Formular wird geschlossen und sein Speicher freigegeben.

    Action := caMinimize;
    Das Formular wird nicht geschlossen, sondern als Symbol angezeigt. }

  Action := caFree;
end;