Array, String von Stringlist per [0] ?

[Pseudemys Nelsoni]

hoi,

sagen wir mal ich habe erin array of TStringList;
wie greif ich auf die einzelnen items der list zu?
ich hatte es so versucht (ist nur ein beispiel gibt also keinen sinn):

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  stArray: Array[0..4] of TStringList;
  i: integer;
begin
  for i := 0 to 4 do
  begin
    stArray[i].Create;
    stArray[i].Add('test' + IntToStr(i));
    ShowMessage(stArray[i[i]]);              // Die zeile soll falsch sein
    Free;
  end;
end;

so:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  stArray: Array[0..4] of TStringList;
  i: integer;
begin
  for i := 0 to 4 do
  begin
    stArray[i].Create;
    stArray[i].Add('test' + IntToStr(i));
    ShowMessage(stArray[i].Strings[i]);
    Free;
  end;
end;

geht es auch nicht , hmm