Delphi 6中的Windows XP Theme Manager和Tnt Unicode

时间:2014-12-04 14:04:49

标签: delphi user-interface unicode themes delphi-6

我正在使用Windows XP Theme Manager,以便在我的Delphi 6应用程序中提供6.0控件外观(提供清单)。我有一些Tnt Unicode控件的问题,例如TTntBitBtn。从下图中可以看出,所有WideString字幕都被视为常规字符串(左:TTntButton,右:TTntBitBtn):

enter image description here

有没有办法让Windows XP Theme Manager正确处理Tnt Unicode组件(或反之亦然)?

1 个答案:

答案 0 :(得分:1)

出于某种原因{T <1}在最后一个免费版本的Tnt Unicode控件(2.3.0)中缺少正确显示主题组件所需的TTntThemeManager。包含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复制到包含剩余两个包的文件夹(对于Delphi 6,通常为$(ProgramFiles)\TntWare\Delphi Unicode Controls\Delphi\d6)。

  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包文件并进行编译。

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

    Correctly displayed TTntbutton and TTntBitBtn