beispiel ... aber immer doch
FindComponent
so wird z.B. aus
Delphi-Quellcode:
case j of
0: form1.edit1.text := inttostr(ss_liste[j]);
1: form1.edit2.text := inttostr(ss_liste[j]);
2: form1.edit3.text := inttostr(ss_liste[j]);
3: form1.edit4.text := inttostr(ss_liste[j]);
4: form1.edit5.text := inttostr(ss_liste[j]);
5: form1.edit6.text := inttostr(ss_liste[j]);
6: form1.edit7.text := inttostr(ss_liste[j]);
7: form1.edit8.text := inttostr(ss_liste[j]);
8: form1.edit9.text := inttostr(ss_liste[j]);
9: form1.edit10.text := inttostr(ss_liste[j]);
end; // von CASE
dieses
TEdit(Form1.FindComponent('Edit' + IntToStr(j))).Text := IntToStr(ss_liste[j]);
'Edit' + IntToStr(j) bildet sozusagen den Namen der Componente, die man sucht