Alle offenen Forms schliessen, ausser die Hauptform

[HolgerCW]

Hallo zusammen,
wie kann ich alle Forms schliessen ausser die Hauptform. Die Hauptform hat den Style := fsMDIForm und die anderen alle fsMDIChild
Gruss

Holger

[DeddyH]

Beispiel aus der Delphi 5-Hilfe:

Zitat:

Im folgenden Code werden alle untergeordneten MDI-Fenster des Formulars Form1 geschlossen.

Delphi-Quellcode:

var

  I: Integer;
begin
  with Form1 do
    for I := MDIChildCount-1 downto 0 do
      MDIChildren[I].Close;
end;

[HolgerCW]

Super, klappt.

Danke