Lesen, Schreiben und mehr in Textdateien - TFileStream, ...?

[omata]

Hallo,

schau dir doch mal BlockRead und BlockWrite an.

Hier ein Beispiel, ich habe eine 11MB Datei ohne Probleme sehr schnell eingelesen.

Delphi-Quellcode:

procedure Einlesen;
var Datei: file;
    Laenge:integer;
    Inhalt:string;
begin
  assignfile(Datei, 'datei.txt');
  try
    reset(Datei, 1);
    Laenge:=FileSize(Datei);
    setlength(Inhalt, Laenge);
    BlockRead(Datei, Inhalt[1], Laenge);
  finally
    CloseFile(Datei);
  end;
end;

Der Inhalt der Datei steht dann im String Inhalt.

Ich verstehe nicht was du da genau machen willst, deshalb nur das Beispiel zum Einlesen.

MfG
Thorsten