Form auf "start" setzen

[popasst]

Hallo,

ich suche eine Möglichkeit um alle Variablen und auch bis dahin eingebende Werte (in Textfelder, Tabellen, ...) wieder aus der Form zu entfernen bzw. wieder auf "start" zu setzten.

Ich möchte mir einfach sparen für alle Objekte in der Form so etwas wie Edit1.Text:='' zu schreiben.


cls

[der-C]

mit Form1.Controls[i] würde es gehen

aber da musst du immer überprüfen was für ein Typ das Control hat

Delphi-Quellcode:

if Form1.Controls[i] is TEdit then
  TEdit(Form1.Controls[i]).Text := '';
if Form1.Controls[i] is TLabel then
  TLabel(Form1.Controls[i]).Caption := '';
... usw. ...

i ist hier Zählvariable

[popasst]

cool ich danke dir ;D

schade das es nicht sowas wie Form1.relaod; gibt.

[Christian Seehase]

Moin popasst,

wenn das Formular nicht Dein Hauptformular ist, müsste es gehen dieses dynamisch zu erzeugen, dann ggf. einfach zu zerstören und neu erzeugen, um den gewünschten Effekt zu erhalten.