Windows XP Theme Manager和Delphi 6中的Tnt Unicode

Question

我正在使用Windows XP Theme Manager，以便在Delphi 6應用程序中提供6.0控件的外觀（提供清單）。 我對某些Tnt Unicode控件有問題，例如TTntBitBtn 。 從下圖可以看到，所有WideString標題均被視為常規字符串（左： TTntButton ，右： TTntBitBtn ）：

有沒有辦法使Windows XP Theme Manager正確對待Tnt Unicode組件（ 反之亦然 ）？

Answer 1

由於某種原因， TTntThemeManager Unicode控件的最新免費版本（2.3.0）中缺少正確顯示主題組件所需的TTntThemeManager 。 包含TTntThemeManager （2.2.3）的版本仍可在Delphi Inspiration Tnt Unicode控件頁面上找到 。 這就是我將TTntThemeManager合並到最新版本，並使所有組件正確顯示的方式。

步驟如下：

1. 使用TntUnicodeControls 2.2.3下載ZIP文件 。

2. 將文件TntThemeMgr.pas和TntThemeMgrDB.pas復制到安裝了TntThemeMgrDB.pas Unicode控件的文件夾（通常是$(ProgramFiles)\\TntWare\\Delphi Unicode Controls\\Source ）。

3. 將資源文件TntThemeMgr.dcr和TntThemeMgrDB.dcr復制到其他資源文件（通常是$(ProgramFiles)\\TntWare\\Delphi Unicode Controls\\Design ）的文件夾中。

4. 將文件TntThemeManager6.cfg ， TntThemeManager6.dof ， TntThemeManager6.dpk和TntThemeManager6.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軟件包文件並進行編譯。

如果一切正確，兩個新組件TntThemeManager和TntThemeManagerDB將被添加到Delphi中的TntAdditional面板中。 將TntThemeManager添加到您的窗體，如果您提供了清單文件，您將獲得正確的結果：