Form schließen

[foxtrot29]

Ein letztes...

Wenn mein Spiel vorbei ist, sollen sich alle Formen (Form1 und Form2) schließen.
Derzeit schließt sich Form2 (hier läuft das Spiel ab) wie ich mir es vorstelle.

Jetzt möchte ich in Form1 eine Schleife einbauen, die dann Form1 auch schließt, wenn Form2 geschlossen wird.
So sollte es aussehen
If Form2.close then close ;

Der Befehl Form2.close ist völlig falsch. Was muss ich hier reinschreiben, damit es Funktioniert, also als Bedinung meiner Schleife?

[Michl]

Ich weiss nicht, wo das Problem ist?!

Zieh dir mal einen Button auf die Form1 und mach beim Event OnKlick folgenden Eintrag:

Code: Alles auswählen

procedure TForm1.Button1Click(Sender: TObject);
begin
  form2.ShowModal;
  close;
end;

Sollte doch gehen?!