TLISTVIEW patch in XP

How to implement XP mode in the program

Posted by: 21/04/2002 10:18:39 Posted by: Thomas Stutz Posted by: Tom@swissdelphicles: http://www.swissdelphiceter.ch

To implement the visual effect of Windows XP in your own program, add an explanation to the program. This instruction file can be the resource file of the program, or the files under the same path.

{

To implement the visual effect of Windows XP in your own program, add an explanation to the program.

This instruction file can be the resource file of the program, or the files under the same path.

This instruction file is an XML file. It makes Windows XP decides which version of ComctL32.dll when linking data.

This XML file contains information about the program you have written and the use of Comctrl32.dll version information.

Here is how

Create a document,

Create an XP resource file,

Contains in the application.

Step 1-4 This section describes how to create these files. An example can be downloaded at the end of the article.

}

(1) Copy the following XML code to the text editor:

Version = "1.0.0.0"

Processrarchitecture = "x86"

Name = "Microsoft.Windows.myApplication"

TYPE = "Win32"

/>

Your Application Description

TYPE = "Win32"

Name = "Microsoft.Windows.common-Controls"

Version = "4.0.0.0"

Processrarchitecture = "x86"

PublickeyToken = "4495b64144ccf1df"

Language = "*"

/>

(2) Remote the contents of Description tag in text and "Name" tagged in the AssemblyIndentity tagged into your own content. Then save the file as: WinXP.txt.

(3) Create a resource file to point to the file above, the resource file is named WinXP.RC:

1 24 "Winxp.txt".

(4)

Now use Delphi's resource compiler (Brcc32.exe) to compile WinXP.RC.

Type instructions on the command line:

BRCC32 WinXP.RC

Generate a WinXP.RES file after compiling.

(5) In the application, this resource file is included, and the {$ R winxp.res} will be indicated after {$ r * .dfm}.

(6) Compiler and run.

(7)

Whether the test program is normal.

Note that some components such as TGROUPBOX, TSPEEDButton do not support XP mode. If you use the TListView component, read "TLISTVIEW in XP Patch"

(http://www.gois.ws/showfile.asp?id=84:defalult) One article.

This article link: http://www.swissdelphicenter.ch/en/demodownload.php? Id = 1118