Einzelnen Beitrag anzeigen

Pfaffe2

Registriert seit: 11. Feb 2010
23 Beiträge
 
Delphi XE Professional
 
#8

Re: UTF8 - Grosse csv-Datei Zeilenweise lesen

  Alt 30. Mär 2010, 15:12
lStringStream.LoadFromFile() ist aber keine Alternative, da auch hier die komplette Datei geladen wird.

Folgendes funktioniert:
Delphi-Quellcode:
F: TextFile;
lStr: string;
...
AssignFile(F, OpenDialog1.Filename);
Reset(F);
while not Eof(F) do begin
  Readln(F, lStr);
  lStr:= UTF8ToWideString(lStr);
  Do_Auswerten(lStr);
end;
  Mit Zitat antworten Zitat