Einzelnen Beitrag anzeigen

Benutzerbild von KodeZwerg
KodeZwerg

Registriert seit: 1. Feb 2018
3.685 Beiträge
 
Delphi 11 Alexandria
 
#3

AW: Text von DOS/Windows Codepage nach Unicode konvertieren (auch unter Linux)

  Alt 16. Jan 2023, 20:01
Mit dem widestringmanager sollte es problemlos zum gewünschten Resultat führen.
Delphi-Quellcode:
function StrToCodePage(const AString: UnicodeString; ACodePage: TSystemCodePage): AnsiString;
begin
  Result := '';
  widestringmanager.Unicode2AnsiMoveProc(Pointer(AString), RawByteString(Result), ACodePage, Length(AString));
end;
Gruß vom KodeZwerg
  Mit Zitat antworten Zitat