Luiz Americo Pereira Camara schrieb:
Thanks, but that's nothing new to me in general, and the RawByteString
handling doesn't work as documented.
procedure ShowCodePage(const S: RawByteString);
begin
Form1.Caption := IntToStr(StringCodePage(S));
end;
Strange
What value you get passing and UTF8 and UTF16?
According to that site you should get 65001 and 1200
UTF-8 comes in as 65001, and UTF-16 as Ansi.
You may try also with UTF16 and UTF8 it should implicitly convert to
UnicodeString
Right.
DoDi
_______________________________________________
fpc-devel maillist - fpc-devel@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-devel