2014-12-04 113 views
0

为了在Delphi 6应用程序(提供清单)中拥有6.0控件外观,我使用了Windows XP主题管理器。我遇到了一些Tnt Unicode控件的问题,例如TTntBitBtn。正如你可以从下面的图片看到,所有WideString字幕被视为普通字符串(左:TTntButton,右:TTntBitBtn):在Delphi 6中使用Windows XP主题管理器和Tnt Unicode

enter image description here

有没有办法让Windows XP主题管理器把TNT的Unicode组件正确(或反之亦然)?

+4

您尝试使用在'TntThemeMgr'单元定义的TTntThemeManager类? – RRUZ 2014-12-04 14:56:38

+1

没有这样的单位,至少没有免费版本(2.3.0)。 – adlabac 2014-12-04 16:29:07

+2

它在2.2.3中可用。我不知道为什么它会被删除。也许它会干扰Delphi 7,其中包括原生支持的主题。 – 2014-12-04 17:00:29

回答

1

出于某种原因,需要正确显示主题组件的TTntThemeManager从Tnt Unicode控件(2.3.0)的最新免费版本中丢失。包含TTntThemeManager(2.2.3)的版本仍可在Delphi Inspiration Tnt Unicode Controls page上获得。这就是我如何将TTntThemeManager合并到最新版本,并使所有组件正确显示。

这里的程序:

  1. 下载ZIP file with TntUnicodeControls 2.2.3

  2. 将文件TntThemeMgr.pasTntThemeMgrDB.pas复制到安装了Tnt Unicode控件的文件夹中(通常为$(ProgramFiles)\TntWare\Delphi Unicode Controls\Source)。

  3. 将资源文件TntThemeMgr.dcrTntThemeMgrDB.dcr复制到具有其他资源文件的文件夹(通常为$(ProgramFiles)\TntWare\Delphi Unicode Controls\Design)。

  4. 复制文件TntThemeManager6.cfgTntThemeManager6.dofTntThemeManager6.dpkTntThemeManager6.res文件夹与其余两个包(通常是$(ProgramFiles)\TntWare\Delphi Unicode Controls\Delphi\d6德尔福6)。

  5. 在文件TntThemeManager6.dpk中纠正了资源文件的两条路径:{$R '..\..\Design\TntThemeMgr.dcr'}{$R '..\..\Design\TntThemeMgrDB.dcr'}

  6. 在同一个文件中修正源文件的两个路径:TntThemeMgr in '..\..\Design\TntThemeMgr.pas'TntThemeMgrDB in '..\..\Design\TntThemeMgrDB.pas'

  7. 最后,在同一个文件中将第一个要求从ThemeManager6更改为ThemeManagerD6

  8. 从Delphi打开TntThemeManager6.dpk包文件并编译它。

如果你做的一切权利的两个新组件 - TntThemeManagerTntThemeManagerDB将被添加到在Delphi中TntAdditional调色板。添加TntThemeManager到您的表单,如果您提供的清单文件,你会得到正确的结果:

Correctly displayed TTntbutton and TTntBitBtn