Thema: Delphi Memo und Texfile

Einzelnen Beitrag anzeigen

danidano

Registriert seit: 13. Apr 2010
11 Beiträge
 
#1

Memo und Texfile

  Alt 26. Apr 2010, 17:30
Hallo

Ich habe eine Datei, ein Textfile, von dem ich Daten in ein Array speichern möchte, von diesem Array dann in ein Memofeld und von dem Memofeld anschließend in ein Labelfeld. (Das ganze natürlich auch andersrum und in anderen Reihenfolgen etc. - deswegen das Array)

Delphi-Quellcode:
  Posts : array[1..33] of string;
  Eins : Textfile;

Delphi-Quellcode:
    AssignFile(Eins, 'Postit1.txt');
    Reset(Eins);
    For i := 4 to 13 do
    begin
      Readln(Eins, Posts[i]);
    end;
Hier wird in das Array an den Stellen 4 bis 13 mit den Zeilen des Texfiles befüllt. Das klappt funktioniert auch.

Doch wie bringe ich diese Daten nun in ein Memofeld?
Ich hab das mal so gemacht:


Delphi-Quellcode:
      For i := 0 to 9 do
      begin
        Memo3.Lines.Strings[i] := Posts[i+4];
      end;

Eigentlich müssten jetzt im Memofeld schon die Daten drinnen stehen, oder nicht?
Weil irgendwie steht da nur die erste Zeile drinnen, aber nicht die anderen 9...
woran kann das liegen?
  Mit Zitat antworten Zitat