Editier-Fenster leeren

[Jansteger]

Hi,

Ich möchte in einer Delphi-Anwendung (Delphi7) mit einem Klick auf einen Button den Inhalt aller Editierfenster leeren. Ich habe das schon gegoogelt aber auch nichts gefunden.
Wäre sehr schön, wenn mir jemand helfen könnte :)

MfG

[DeddyH]

Du könntest Dir ein Array of TEdit deklarieren, in dem Du alle in Frage kommenden Edits aufnimmst. Das gehst Du dann einfach durch. Oder etwas uneleganter:

Delphi-Quellcode:

for i := 0 to ComponentCount - 1 do
  if Components[i] is TEdit then
    TEdit(Components[i]).Clear;

Das setzt aber voraus, dass alle Edits das aufrufende Control als Owner haben.