TMSFNCRichEditorHTMLIO1.Load error import ŠĐĆŽšđžćč

FNC TMS FNC UI Pack
1

OS: Debian 10 LXDE 64bit
Lazarus 2.0.12
FPC 3.2.2

TTMSFNCRichEditorHTMLIO

text RichEdit: Željko Cvijanović

TMSFNCRichEditorHTMLIO1.Save('tekst.html');
open web explorer text ok: Željko Cvijanović
clear RichEdit:
TMSFNCRichEditorHTMLIO1.Load('tekst.html');
RichEdit not ok, text: }eljko Cvijanovia

2

I could not see an issue. Attached is the generated HTML. Do you use the latest version of the components and if so, please send the generated HTML file.
intl.html (213 Bytes)

3

I am using the latest version
html ok

<HTML>
<BODY style='font-family:"default";font-style:normal;font-weight:normal;font-size:8pt'>
<FONT color="#000000">&#381;eljko&nbsp;Cvijanovi&#263;</FONT>
</BODY>
</HTML>

load htlm -> RichEdit not ok

4

TMSFNCRichEditorHTMLIO1.Load('tekst.html');
RichEdit not ok, text: }eljko Cvijanovia

5

I confirm, the latest version also has this problem.
Lazarus trunk, FPC 3.2.2 x86, Windows 10.

@Zeljko_Cvijanovic : Replace line 2912 in the LCLTMSFNCRichEditor.pas file
instead of:

                specialstr := chr(hn);

insert:

                {$IFDEF LCLLIB}
                  specialstr := widechar(hn);
                {$ENDIF}
                {$IFNDEF LCLLIB}
                  specialstr := chr(hn);
                {$ENDIF}
6

thank you, that solves the problem

7

Version from 25.03.2022 also has the same problem.
I use modification Dimitruk_Pawel

8

Thanks. We synchronized this improvement for the next release.