Cirillic message with TDomNode.ChidNodes.NodeName

[gvido]

how to fix the output in such a situation?

showmessage('Атрибут '+tempxml.ChildNodes.Item[1].NodeName);

is show this - ???????? record  - it is wrong.

But if i showmessage('Атрибут ');

is show this  - Атрибут it is good.

my xml file:
<?xml version="1.0" ?>
<config>
   <record   id="0" file="dsc00771.jpg" timer="3000"  />
</config>

my os Windows 7 x64 rus

lazarus 0.9.30.2
FPC 2.4.4
x86_64-win32/win64

[Zoran]

I can confirm this. This is really strange, but the workaround seems to be involving an auxiliary string variable:

Code: [Select]

var
  S: String;
...

  S := 'Атрибут ';
  S := S + tempxml.ChildNodes.Item[1].NodeName;
  ShowMessage(S);

However, if you put in one line

Code: [Select]

S :=  'Атрибут ' + tempxml.ChildNodes.Item[1].NodeName;, it does not work! Strange.

[Zoran]

After looking into source code, I see that NodeName is WideString (Actually, DOMString, which is mapped to WideString). The problem lies in mixing WideString and UTF8 encoded String. LCL components always expect UTF8, so you should always convert WideString to UTF8 (use UTF8Encode function):

Code: [Select]

showmessage('Атрибут '+ UTF8Encode(tempxml.ChildNodes.Item[1].NodeName));

[gvido]

I can confirm this. This is really strange, but the workaround seems to be involving an auxiliary string variable:

Code: [Select]

var
  S: String;
...

  S := 'Атрибут ';
  S := S + tempxml.ChildNodes.Item[1].NodeName;
  ShowMessage(S);

This code is not working properly.

 

Code: [Select]

S :=  'Атрибут ' + tempxml.ChildNodes.Item[1].NodeName;, it does not work! Strange.

After looking into source code, I see that NodeName is WideString (Actually, DOMString, which is mapped to WideString). The problem lies in mixing WideString and UTF8 encoded String. LCL components always expect UTF8, so you should always convert WideString to UTF8 (use UTF8Encode function):

Code: [Select]

showmessage('Атрибут '+ UTF8Encode(tempxml.ChildNodes.Item[1].NodeName));

This code works gives the correct result. A custom message can be read. Thank you.