Thema: Delphi Standarddateicodierung

Einzelnen Beitrag anzeigen

Benutzerbild von Uwe Raabe
Uwe Raabe
Online

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.455 Beiträge
 
Delphi 12 Athens
 
#10

AW: Standarddateicodierung

  Alt 6. Mär 2024, 12:48
Das kann aber eigentlich nur dann passieren, wenn irgendwo Identifier mit Umlauten vorkommen. Der relevante Code sieht so aus:
Delphi-Quellcode:
  procedure WriteUTF8Str(const S: string);
  var
    Ident: TBytes; // UTF8String;
  begin
    Ident := TEncoding.UTF8.GetBytes(S);
                                       
    if not UTF8Idents and (Length(Ident) > S.Length) then
      UTF8Idents := True;
    WriteTBytes(Ident);
  end;
Textinhalte wie Caption, TEdit.Text oder auch TMemo.Lines werden wie gehabt mit "#<xxx>" codiert.

Wenn du wieder mal so eine Datei hast, dann prüf das doch mal nach.
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat