Ajutor cod Delphi citire linii txt [rezolvat!]

[-BlacKodE-]

Salut. Am nevoie de putin ajutor.

Cum pot face sa citesc dintr-un txt urmatoarele linii. (Txt se afla pe o pagina web dar nu e asta problema)

Linie1 = 1;
Linie2 = 2;
Linie3 = 3;

Apoi sa le afisiez in genul array Linie[0] sa afiseze 1 si tot asa. Am mult mai multe linii de citit in felul asta si vreau sa le trec printr-un loop.

[-BlacKodE-]

Am reusit singur intr-un final dupa putina documentare.

Pentru cei care au nevoie uitati codul.

| Afiseaza codul

var
  files : tstringlist;
  i    : Integer;
begin
  files := TStringList.Create;

  files.Delimiter := ' ';
  files.QuoteChar := '"';
  files.DelimitedText := '"1" "2" "3" "4"';

  for i := 0 to files.Count-1 do
    ShowMessage(files);

  files.Free;
end;