Hi *,
is there any smart way how to read string data line by line from UCS2
encoded text files (lines delimited by $0A00).
Using ReadLn(TextFile, UnicodeStringVariable) does not work as per
comment in text.inc:
// all standard input is assumed to be ansi-encoded
Nor reading into WideChar varible does not work.
Nor setting SetTextCodePage to CP_UTF16 helped.
I wonder if Delphi supports ReadLn() for UTF-16 encoded text files ...?
Is there way how to add support for it in FPC? May be if there will be
set TextRec(T).CodePage=CP_UTF16 then any of the fpc_Read_Text_*
procedures will assume that input file is utf-16 encoded and not ansi?
Now I work-around by reading two chars into array[0..1] of Char and then
cast it to UnicodeChar.
(I know that it is not safe for UTF-16, but for UCS2 it works)
Thanks
-Laco.
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
