dynamische TStringList(en)

[TheAn00bis]

Wenn ich dynamische StringListen erstelle, muss ich dann vorher jede einzeln Deklarieren?

Denn wenn ich zum Beispiel Buttons dynamisch erstelle, kann ich bei jedem Button den Namen neu zuweisen. Allerdings hat eine StringList die Eigenschaft "Name" nicht.

Hier ein Beispiel: Ich will 3StringListen erstellen, dass geht so:

Delphi-Quellcode:

procedure xyz;
var liste1, liste2, liste3: TStringList;
begin
liste1:=TStringList.Create;
liste2:=TStringList.Create;
liste3:=TStringList.Create;
end;

Aber das müsste doch auch irgendwie so gehen (oder?):

Delphi-Quellcode:

procedure abc;
var liste: TStringList;
begin
for i:=1 to 3 do begin
   liste:=TStringList.Create;
   liste.name:=liste(inttostr(i));
end;
end;