Thema: Delphi TStrings maximale Länge

Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.184 Beiträge
 
Delphi 12 Athens
 
#20

AW: TStrings maximale Länge

  Alt 17. Nov 2012, 19:47
Wie gsagt, du kannst gerne bei ANSI bleiben. Du mußt einfach nur AnsiString nehmen ... das funktioniert auch in D2009+


Delphi-Quellcode:
function LoadStringFromFile(sInFile: String; var sFileString: String): Boolean;
begin
  ...
      SetLength(sFileString, FileStream.Size div SizeOf(Char));
      FileStream.Read(sFileString[1], Length(sFileString) * SizeOf(Char));



function LoadStringFromFile(sInFile: String; var sFileString: AnsiString): Boolean;
begin
  ...
      SetLength(sFileString, FileStream.Size);
      FileStream.Read(sFileString[1], FileStream.Size);
Beim Ersten gibt es keine Zugriffsverletzung mehr, aber dafür wird dann aus deuschen Text bei Unicode schnell mal Chinesisch.
Darum wäre ANSI hier sogar richtig, da sich dabei das "Dateiformat" nicht verändert.
$2B or not $2B

Geändert von himitsu (17. Nov 2012 um 19:58 Uhr)
  Mit Zitat antworten Zitat