Auf Variablen mit deren Namen in einer Schleife zugreifen?

[LuckyLucas]

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