datei einlesen und in memo schreiben

[Christian Seehase]

Moin Jority,

Du könntest Die Datei, ähnlich wie's der Kollege vorgeschlagen hat, mit Hilfe von TFileStream in eine Stringvariable einlesen (Beispiele dazu solltest Du hier reichlich finden können), und dann mit mittels StringReplace die #00 aus dem String löschen. Anschliessend kannst Du den String dann der Eigenschaft Text des Memos zuweisen.

Bei grösseren Dateien müsstest Du die Datei dann sinnvoller Weise Blockweise einlesen, aber auch dafür kannst Du einen String als Buffer verwenden.

Ob die Verwendung von StringReplace auf die Performance drückt, so dass vielleicht ein anderes Verfahren angewendet werden sollte, müsstest Du mal testen.

BTW:
Der Zeilenvorschub wäre i.d.R. unter Windows #13#10 bzw #$0D#$0A. Nur #10 (bzw. #$0A) wäre in Windows nur in Ausnahmefällen oder bei Unixdateien anzutreffen.
Wird eine Datei die nur #10 als Zeilentrenner verwendet in eine StringList eingelesen (wie eben auch Memo.Lines) korrigiert Delphi dies intern auf #13#10.