我正在使用Windows XP Theme Manager,以便在我的Delphi 6应用程序中提供6.0控件外观(提供清单)。我有一些Tnt Unicode控件的问题,例如TTntBitBtn
。从下图中可以看出,所有WideString
字幕都被视为常规字符串(左:TTntButton
,右:TTntBitBtn
):
有没有办法让Windows XP Theme Manager正确处理Tnt Unicode组件(或反之亦然)?
答案 0 :(得分:1)
出于某种原因{T <1}在最后一个免费版本的Tnt Unicode控件(2.3.0)中缺少正确显示主题组件所需的TTntThemeManager
。包含TTntThemeManager
(2.2.3)的版本仍可在Delphi Inspiration Tnt Unicode Controls page上使用。这就是我将TTntThemeManager
合并到最新版本并使所有组件正确显示的方式。
以下是程序:
将文件TntThemeMgr.pas
和TntThemeMgrDB.pas
复制到安装了Tnt Unicode控件的文件夹(通常为$(ProgramFiles)\TntWare\Delphi Unicode Controls\Source
)。
将资源文件TntThemeMgr.dcr
和TntThemeMgrDB.dcr
复制到包含其他资源文件的文件夹(通常为$(ProgramFiles)\TntWare\Delphi Unicode Controls\Design
)。
将文件TntThemeManager6.cfg
,TntThemeManager6.dof
,TntThemeManager6.dpk
和TntThemeManager6.res
复制到包含剩余两个包的文件夹(对于Delphi 6,通常为$(ProgramFiles)\TntWare\Delphi Unicode Controls\Delphi\d6
)。
在文件TntThemeManager6.dpk
中更正了资源文件的两条路径:{$R '..\..\Design\TntThemeMgr.dcr'}
和{$R '..\..\Design\TntThemeMgrDB.dcr'}
。
在同一文件中更正了两个源文件路径:TntThemeMgr in '..\..\Design\TntThemeMgr.pas'
和TntThemeMgrDB in '..\..\Design\TntThemeMgrDB.pas'
。
最后,在同一个文件中将第一个要求从ThemeManager6
更改为ThemeManagerD6
。
从Delphi打开TntThemeManager6.dpk
包文件并进行编译。
如果你做的一切正确,那么两个新组件 - TntThemeManager
和TntThemeManagerDB
将被添加到Delphi中的TntAdditional
调色板中。将TntThemeManager
添加到您的表单中,如果您提供了清单文件,您将获得正确的结果: