Hallo, Ich versuche eine Textdatei in einem Memo auszugeben, leider sieht der Text dann anders aus als in einem editor.

http://img89.imageshack.us/img89/7428/ansichtja7.jpg


Ich habe die Datei über zwei Arten eingelesen.

1.

markieren

Delphi-Quellcode:

extfile := TStringList.Create;
       textfile.LoadFromFile('c:\test\info.txt');
       Form1.Memo1.Text := textfile.Text;

2.

markieren

Delphi-Quellcode:

 AssignFile(datei, 'c:\test\info.txt');
       Reset(datei);
       while not eof(datei) do begin
         Readln(datei, text);
         Form1.Memo1.Lines.Add(text);
       end;
       CloseFile(datei);

bei der 2 Version ist mir aufgefallen, das in der Variablen text der Text schon "falsch" drin steht.

Wie bekomme ich es hin das es im Memo richtig angezeigt wird.


Gruß

Hawk0815

Könnte an der Schriftart liegen.
Stell mal in deinem Programm die selbe Schriftart wie im Editor ein.
Und verwende bei sowas am Besten Courier (New), da ist jeder Buchstabe (auch Leerzeichen !) gleich breit.

Danke!!! das wars, super!

Gruß

hawk0815

Könntest du die bilder bitte in den Anhang packen damit sie auch noch verfügbar sind wenn bei Imageshak die bilder nicht mehr auf dem webspace liegen. Wenn die Bilder weg sind verliert der ganze Beitrag an Wert und keiner hätte mehr etwas davon.