Form schliesst nicht

[dioony]

Moin!

Obwohl die Close anweisung kommt, schließt Form6 nicht und bleibt unter form2 geöffnet...

folgender code:

Delphi-Quellcode:

procedure TForm1.Image1Click(Sender: TObject);
begin

  Form6.Show;
  Form2.Destroy;
  Application.CreateForm(TForm2,Form2);
  Form2.Show;
  Form6.Close;
end;

die project1 sieht so aus:

Delphi-Quellcode:

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm2, Form2);
  Application.CreateForm(TForm6, Form6);
  Application.Run;
end.

Fehlermeldungen gibt es keine...

Auch wenn ich im Form2.close ereignis Form6.close aufrufe, bewirkt das nichts...

thx & cya
dioony

[Bernhard Geyer]

1, Nicht-Modale Dialog sollten immer mittels Release freigegeben werden.
2, Destroy sollte nie direkt aufgerufen werden

Und wieso wird überhaupt Form2 als eine Art "Spash-Screen" verwendet.
Ich würde sowieso Form2 und Form6 aus der List der automatisch erzeugten Formulare rausnehmen und in Form1 bei bedarf erzeugen.

Und was soll es bringen ein Form freizugeben und sofort wieder neu anzulegen und anzuzeigen. Ist doch vollkommen unnötig.

[dioony]

des zerstören und direkt darauf wieder zu createn mache ich, damit alle variablen, kombonenten etc. auf den startanfang zurückgesetzt werden...

hab den fehler nach langem suchen übrigens gefunden: Ich hatte ein Application.CreateForm(TForm6, Form6); noch wo anders stehen...


aber trotzdem danke

Dioony