Problem mit großer Textdatei

[Klaus01]

Hallo,

du könntest die Datei auch zeilenweise durchgehen.

Delphi-Quellcode:

var
  data: Textfile;
  i : Integer;
  s : ansiString;

begin
 ..
 Assign(datei,'dateiname');
 reset(datei);
 i:=0;

 while not eof(datei) do
   begin
     readLn(datei,s),
     inc(i);
     if {frame in s enthalten} then
       begin
         // tuwas 
       end;
   end;
  close(datei);
end;

Grüße
Klaus