AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

Form schliesst nicht

Ein Thema von dioony · begonnen am 14. Jul 2005 · letzter Beitrag vom 14. Jul 2005
Antwort Antwort
dioony

Registriert seit: 18. Apr 2005
Ort: Oldenburg
18 Beiträge
 
Delphi 6 Enterprise
 
#1

Form schliesst nicht

  Alt 14. Jul 2005, 15:15
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
Iterativ arbeiten ist menschlich, rekursiv dagegen göttlich
  Mit Zitat antworten Zitat
Benutzerbild von Bernhard Geyer
Bernhard Geyer

Registriert seit: 13. Aug 2002
17.186 Beiträge
 
Delphi 10.4 Sydney
 
#2

Re: Form schliesst nicht

  Alt 14. Jul 2005, 15:57
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.
Windows Vista - Eine neue Erfahrung in Fehlern.
  Mit Zitat antworten Zitat
dioony

Registriert seit: 18. Apr 2005
Ort: Oldenburg
18 Beiträge
 
Delphi 6 Enterprise
 
#3

Re: Form schliesst nicht

  Alt 14. Jul 2005, 16:09
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
Iterativ arbeiten ist menschlich, rekursiv dagegen göttlich
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:24 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz