如何在程序中實現XP模式

發表日期：	21/04/2002 10:18:39
發表人：	Thomas Stutz
發表人信箱：	[email protected]
發表人網址：	http://www.swissdelphicenter.ch

 

要在自己的程序中實現Windows XP的視覺效果，就要給程序增加一個說明文件。這個說明文件可以是程序的資源文件，也可以是同路徑下的文件。

{
　要在自己的程序中實現Windows XP的視覺效果，就要給程序增加一個說明文件。
　這個說明文件可以是程序的資源文件，也可以是同路徑下的文件。
　
　這個說明文件是一個XML文件。它讓Windows XP在鏈接數據時決定使用哪種版本的comctl32.dll。
　這個XML文件含有你編寫的程序的信息和使用的comctrl32.dll版本信息。
　
　下面介紹如何
　　創建說明文件，
　　創建XP資源文件，
　　包含到應用程序中。
　　
步驟1-4介紹如何創建這些文件。文末可以下載示例。

}

(1) 將下面的XML代碼拷貝到文本編輯器：

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
<assemblyIdentity
    version="1.0.0.0"
    processorArchitecture="X86"
    name="Microsoft.Windows.MyApplication"
    type="win32"
/>
<description>Your Application Description</description>
<dependency>
    <dependentAssembly>
        <assemblyIdentity
            type="win32"
            name="Microsoft.Windows.Common-Controls"
            version="4.0.0.0"
            processorArchitecture="X86"
            publicKeyToken="4495b64144ccf1df"
            language="*"
        />
    </dependentAssembly>
</dependency>
</assembly>

(2) 將文中description標記的內容和assemblyIdentity標記的"name"改寫成你自己的內容。然後將文件存爲：WinXP.txt。

(3) 創建一個資源文件來指向上面的文件，資源文件名爲WinXP.rc：
  1 24 "WinXP.txt" 。
 
(4)
　現在要用Delphi的資源編譯器(brcc32.exe)來編譯WinXP.rc。
　在命令行鍵入指令：
　brcc32 WinXP.rc
　編譯之後生成WinXP.res文件。
　
(5) 在應用程序中包含這個資源文件，並在{$R *.DFM}之後註明{$R WinXP.res}。

(6) 編譯程序並運行。

(7)
　測試程序是否正常。
　注意，有些組件，如TGroupBox, TSpeedButton等不支持XP模式。
　如果使用TListView組件，請閱讀《TListView在XP中的補丁程序》

 

本文鏈接:

http://www.swissdelphicenter.ch/en/demodownload.php?id=1118