Jonas Maebe schrieb:

On 13 Oct 2011, at 15:02, Paul Ishenin wrote:

Then use {$codepage UTF8} only. This directive treats all ansistring constants in UTF8 codepage. So the next code:
{$codepage UTF8}
var
 s: ansistring;
begin
 s := 'utf8 string';
 WriteLn(StringCodePage(s));
end.

will output CP_UTF8 constant.

This I don't really understand.

It should read
  s: string;

DoDi

_______________________________________________
fpc-devel maillist  -  fpc-devel@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-devel

Reply via email to