Re: [fpc-pascal] Code page for the Windows event viewer

2021-09-15 Thread Abuy via fpc-pascal
UnicodeString change only look of symbols (instead of quastion marks this — Іівівйц ГђВ№ вфівфъ2цву йцуцйівів). No BOM. File is UTF-8. No command line parameters. On 15.09.2021 16:53, Tomas Hajny via fpc-pascal wrote:

Re: [fpc-pascal] Code page for the Windows event viewer

2021-09-15 Thread Tomas Hajny via fpc-pascal
On 2021-09-15 15:08, Abuy via fpc-pascal wrote: Instead of cyrillic characters there some garbage in Windows event viewer. Have tried AnsiString with Windows-1251 code page (type StringCP1251 = type AnsiString(1251)) but this does not work. What works is RawByteString variable with the following

[fpc-pascal] Code page for the Windows event viewer

2021-09-15 Thread Abuy via fpc-pascal
Instead of cyrillic characters there some garbage in Windows event viewer. Have tried AnsiString with Windows-1251 code page (type StringCP1251 = type AnsiString(1251)) but this does not work. What works is RawByteString variable with the following conversion to Windows-1251. Here is code: {$

Re: [fpc-pascal] How to create AnsiString with specific code page?

2021-09-15 Thread Bart via fpc-pascal
On Wed, Sep 15, 2021 at 12:32 PM Bart wrote: > This should work > > type > StringCP1251 = AnsiString(1251) That should be type StringCP1251 = type AnsiString(1251); -- Bart ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org https://lis

Re: [fpc-pascal] How to create AnsiString with specific code page?

2021-09-15 Thread Bart via fpc-pascal
On Wed, Sep 15, 2021 at 12:14 PM Abuy via fpc-pascal wrote: > I need string with Windows-1251. Tried var msg: AnsiString(1251) but > this does not work. What I am doing now is This should work type StringCP1251 = AnsiString(1251) var S: StringCP1251; -- Bart _

[fpc-pascal] How to create AnsiString with specific code page?

2021-09-15 Thread Abuy via fpc-pascal
I need string with Windows-1251. Tried var msg: AnsiString(1251) but this does not work. What I am doing now is var msg: rawbytestring; begin SetCodePage(msg, 1251, True); end. ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org https://lists