Wie z. B. konvertieren Codepage 1250 (Windows-1250) in Unicode mit Lazarus

Question

Ziel:

Mit Lazarus eine Funktion zur Umwandlung von Strings Codepage 1250 (Windows-1250) in Unicode erstellen.

Answer 1

Ich fand nur eine Möglichkeit, dies effektiv zu tun, fühlen Sie sich frei, Ihre eigene Forschung hinzuzufügen.

uses 
    LConvEncoding; 

...

function ConvertStrFromCP1250ToUnicode(TextAsCP1250: string): unicodestring; 

var 
    TextAsUTF8: string; 

begin 

    TextAsUTF8 := CP1250ToUTF8(TextAsCP1250); 

    Result := TextAsUTF8; 

end;