A problem with Chinese in GetItemTag

[kisshexuxia]

DELPHI XE
1:

Code: Select all

edit1.Text:='{"ChineseName":"月","Type":"数据字段","KEYID":"BMoth","MutiSelect":"FALSE","BZ":"、"}'
ActiveEditor.RichViewEdit.InsertStringTag('测试',edit1.Text);

2:then i SaveRVFToStream
3:then i LoadRVFFromStream

4:

Code: Select all

ActiveEditor.RichViewEdit.GetItemTag(itemno)

but then the tag unequal
it only show {"ChineseName":"月"

please help me !![/code]

[kisshexuxia]

it's BUG?

[kisshexuxia]

Because the middle have Chinese

[Sergey Tkachenko]

I cannot reproduce this problem. Please send me a simple project reproducing it.