[Outertech]

I'm updating my software to Unicode with the Help of TntControls with Delphi 7.

I have replaced TForm with TTntForm and TMainMenu with TTntMainmenu.

Then during runtime I'm setting the Captions of TTntMenuitem using Widestring. It works fine, as can bee seen in the first screenshot with Russian.

[attachment=8164:1.png]

But the moment I set sSkinManager1 to Active (11.24) all Captions are destroyed and only ????? is displayed.

[attachment=8165:2.png]

This does not happen with TTntButton, TTntEdit etc. They are skinned and Unicode is preserved.

Why doesn't it work with TTntMainMenu?

[Outertech]

I have attached an example project including executable.

There is an empty TTntEdit. Paste any Russian or Chinese text into the edit, and then hit the button.

You will see…

with sSkinManager1.Enabled = True

Window caption is ????????

Mainmenu is ????????

Button has correct unicode text

[attachment=8167:on.png]

with sSkinManager1.Enabled = False

Window caption, Mainmenu, and Button have ALL correct unicode text.

[attachment=8168:off.png]

[attachment=8166:UnicodeTest.rar]

[Support]

Hello

You should enable the “TNTUNICODE” key in the sDefs.inc file for support of the TntUnicode package:

Code:

{$DEFINE TNTUNICODE} // Enable Unicode support by TntControls

But, I see an error in the package now if this key is enabled. I will send you a patched file for the AlphaControls v12.00, by email.

[Outertech]

With {$DEFINE TNTUNICODE} AlphaSkins does not compile with Delphi 7.

It uses TNTWidestrings.pas, which is a Delphi 2006+ unit.

With Delphi 7 TNT Control declares all WideString classes in TntClasses.pas.

[Support]

The code will be improved in the nearest release.

[Author]

Posts