Moin
DP!
Bin ein Neuling hier und auf Grund des "guten Rufs" zu euch gestoßen. So denn, präsentiere ich gleich mal meine erste Frage:
Wie kann ich folgenden Code in einer Schleife verpacken?
Delphi-Quellcode:
var
Var1, Var2, Var3: TKlasse;
begin
Listbox1.Add(Var1.StringProperty);
Listbox1.Add(Var2.StringProperty);
Listbox1.Add(Var3.StringProperty);
end;
Die Sache würde natürlich bei diesen kurzen Code-Beispielen keinen Sinn machen; mein Source ist also bedeutend länger. Also ich möchte es praktisch folgendermaßen haben:
Delphi-Quellcode:
var
i: byte;
Var1, Var2, Var3: TKlasse;
begin
for i:=1 to 3 do Listbox1.Add(TKlasse('Var'+inttostr(i)).StringProperty);
end;
Das ganze wäre mit
VCL-Komponenten (TComponents) kein Problem, dort kann man beispielsweise auf die Eigenschaft eines Labels mit
TLabel('Label'+inttostr(i)).Caption zugreifen, oder wenistens FindComponent benutzen, doch bei Variablen "einfacher Klassen" geht das nicht.
Und ich habe nun eben keine Vorstellung, wie man sowas bequem und schlank programmiert
