Im obigen Beispielcode sehe ich CP_UTF8. Da ich das Obex Protokol nicht kenne vermute ich mal das die Kommunikation UTF-8-Codiert abläuft (Der Server wird dann wieder die UTF8-Daten nach
Unicode umwandeln).
Dann würde ich dir folgende Umwandlung vorschlagen:
Wandle deinen String nach Widestring um (Automatisch von Delphi per "Compiler Magic").
Diesen Widestring wandelst Du nach UTF-8 um.
Erhalten Strings gehen den Umgekehrten Weg
UTF8 -> Widestring -> String
Dazu kannst Du die Funktionen in System.pas verwenden:
Delphi-Quellcode:
function UTF8Encode(const WS: WideString): UTF8String;
function UTF8Decode(const S: UTF8String): WideString;