MDI Fenster schließt nicht richtig

[Eppos]

Hallo zusammen,

ich erstelle mehrere MDI Fenster innerhalb meiner Anwendung.

Code:

  Form1 := TForm1.Create(self)

Soweit so gut, es gibt nun MDI Forms, die durch Klicken von Buttons, die Form1 aufrufen sollen, jedoch zuvor geschlossen werden.
Bevor die Form aufgerufen wird, prüfe ich auf...

Code:

  If Form1 <> nil then begin
    Form1.Close;
    Form1 := nil;
  end;

und anschließend soll das Fenster so angezeigt werden...

Code:

  Form1 := TForm1.Create(self);
  Form1.FormStyle := fsNormal;
  Form1.Visible := False;
  Form1.ShowModal;

Funktioniert auch tadellos, jedoch heißt die Form "Form1_1"...
Ich vermute das das erste Fenster nicht richtig geschlossen wird.

Hat jemand eine Idee wie ich das "_1" unterbinden kann?

Gruß
Eppos