Form mit allem Inhalt zurücksetzen ...

[Hansa]

Ihr rackert euch ganz schön ab :P , dabei genügt das :

Delphi-Quellcode:

procedure Tfrm.FormClose(Sender: TObject;
  var Action: TCloseAction);
begin
  Action := caFree;
end;

Ich beziehe mich nur auf Beitrag #2.

[HolgerCW]

Auch diese Variante klappt nicht.

Beim nochmaligen aufrufen der Form kommt wieder die Fehlermeldung ...

Gruss

Holger

[SnuffMaster23]

Damit gibsts dus ja nur beim schließen frei.
Bevor dus nochmal aufrufst musst dus natürlich wieder erzeugen ;)

[HolgerCW]

Wie rufe ich es denn auf, damit es wieder erzeugt wird.

So ja nicht, da die Form1 ja schon beim starten des Programms erzeugt wird.

[/delphi]
Create(Form1);
Form1.Showmodal;
[delphi]

Gruss

Holger

[Hansa]

Na gut, etwas ausführlicher :

Delphi-Quellcode:

procedure Tfrm.Button3Click(Sender: TObject);
begin
  frm2 := Tfrm2.Create (Self);  // Form erzeugen
  frm2.Show;
end;

procedure Tfrm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Action := caFree;   // Form wird zerstört, alle Variablen usw. freigegeben
end;

Mehr ist das nicht. Ich bin zwar kein Freund von "dynamisch erzeugen", aber die Forms sind die berühmte Ausnahme von der Regel. Auf Forms sind manchmal so viele Sachen. Comboboxen, die gefüllt werden müssen, Labels müssen in Abhängigkeit von irgendeiner Eingabe beschriftet werden usw. Bevor man das jetzt alles zurücksetzt ist es IMHO besser komplett neu anzufangen. Die Frage an sich ist nämlich wirklich berechtigt.

[HolgerCW]

Jetzt klappt alles,

das geht auch mit Showmodal.

Vielen Dank.

Gruss

Holger

[Hansa]

Zitat:

Zitat von HolgerCW

Jetzt klappt alles,...

Welch ein Wunder. :mrgreen: Der Vollständigkeit halber noch ein Tip : schiebe die Form mit dem vordefinierten caFree in die Objektablage und leite nur noch davon ab. Das wird sich auf Dauer lohnen.