Registriert seit: 26. Mai 2004
Ort: Nürnberg
272 Beiträge
Delphi 11 Alexandria
|
AW: TTextStream - Textdateien einlesen
17. Aug 2010, 14:54
Hallo Himitsu,
vielen Dank für die schnelle Antwort und Änderung! Respekt!
Allerdings hat sich glaube ich da noch ein kleiner Fehler eingeschlichen. Mir wurden jetzt bei UTF8-ohne-Bom-Dateien auch die drei ersten Zeichen abgeschnitten.
Ich habe dann die Zeile 638 von
If (FBufferSize < i)...
auf
If (FBufferSize >= i)...
geändert und jetzt scheint alles korrekt zu funktionieren.
Vielen Dank nochmal!
Gruß
Freejay
[Delphi 11.3.1 Enterprise; Win10/11; MySQL; VCL]
|