Entwickler-Ecke :: Thema anzeigen - Den ganzen Text der TXT 2 Memo

Anonymous - Mo 03.02.03 00:38
Titel: Den ganzen Text der TXT 2 Memo

Hi

Ich habe eine große TXT in der auch viele Leerzeichen hintereinander sind. Diese TXT möchte ich in einem Memo. Ich hab 2 wege probiert:
Einmal "memo1.lines.loadfromfile()" und dann diese noch:

Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:

var
f:textfile;
s:string;
begin
assignfile(f,extractfilepath(paramstr(0))+'z\kp.txt');
reset(f);
readln(f, s);
form4.Memo1.Text:=s;
closefile(f);

Ich hatte auch stat readln() mal read()

Aber der Text im Memo ist nie größer als bis zur ersten Reihe von den vielen Leerzeichen.
Wie kriege ich den ganzen Text ins Memo rein?

CIAO

Millo - Mo 03.02.03 01:26

Moin,

ich weiss zwar nicht wie ich mir das vorstellen soll aber hast du mal die Scrollbars aktiviert manchmal ist der Text nicht so wie in der .txt Datei im Memo.

Sonst sollte es eigentlich mit LoadFromFile funktionieren.

Delete - Mo 03.02.03 01:30

Es sei denn im Text taucht irgendwo #0 auf dann ist Schluß auch wenn es noch weiterget in der Datei, dann ist es aber auch keine reine Textdatei.

Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!