Dateizeilen als String speicher

[mfs]

Hi,
da ich immer noch am Anfang bin, habe ein folgendes Problem:

ich möchte eine xml-datei oeffnen und jede Zeile aus dieser Datei in Array "ZeilenListe" speichern. Also ZeilenListe[0] sollte dann die 1. Zeile der Datei enthalten usw.

Dazu habe ich folgendes gemacht:
(weiss nicht ob es so funktionieren könnte)

Delphi-Quellcode:

procedure AttributeLaden;
var j:integer;
    ZeilenListe:array of string;
begin

   SetLength(ZeilenListe,Zeilenanzahl());

   sl:=TStringlist.create;
   sl.loadfromfile('CAPI_Konfigurtion.xml');
   j:=0;
   while (j< sl.count)do inc(j);
   ZeilenListe[j]:= ... ; //Was soll anstatt "..." stehen??
   sl.free;

end;

function Zeilenanzahl():integer;
begin
   sl:=TStringlist.create;
   sl.loadfromfile('CAPI_Konfigurtion.xml');
   i:=0;
   while (i< sl.count) do inc(i);
   sl.free;
   return:=i;
end;

Andere Vorschlaege sind willkommen.

Gruss mfs

[edit=alcaeus]Delphi-Codes gesetzt. Bitte in Zukunft selbst setzen. Danke. Mfg, alcaeus[/edit]