Einzelnen Beitrag anzeigen

Benutzerbild von MrMooed
MrMooed

Registriert seit: 18. Feb 2012
101 Beiträge
 
Delphi 7 Enterprise
 
#2

AW: Gibts sowas wie findproperty?

  Alt 7. Jul 2013, 00:12
Hallo,

im einfachsten Falle könntest du deine Komponenten durchnummerieren:
Code:
edit1
edit2
usw.
und dann gehst du in einer (z.B. for-) Schleife deine Komponenten durch:
Delphi-Quellcode:
for i:=1 to EditCount do
  (TForm1.FindComponent('Edit' +IntToStr(i)) as TEdit).Text := '';
for i:=1 to CheckBoxCount do
  (TForm1.FindComponent('CheckBox' +IntToStr(i)) as TCheckBox).Checked := aufWert;
Gruß,
MrMooed
"Unsere Luft hat einen Vorteil: Man sieht was man einatmet" - Ein Chinese
  Mit Zitat antworten Zitat