Estilo XP no delphi

[Be.Cool]

ola galera,
o Dark_Side tinha postado uma materia sobre essa no visual basic,
e as versoes antriores a do delphi 07 não traz esse recurso, e como eu e o
autor e p autor desse artigo usamos   a versão 6 e 5
temos que fazer um truquezinho!
e quase a mesma coisa, só tem algumas modificações!!!
ae o seguinte:
copie esse codigo e faça as modificaçoes necessarias:

Code Select Expand

<?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="NOME_EMPRESA.NOME_PRODUTO.NOME_EXECUTAVEL_SEM_EXTENSÃO"
   type="win32"
/>
<description>Descrição do aplicativo</description>
<dependency>
   <dependentAssembly>
     <assemblyIdentity
       type="win32"
       name="Microsoft.Windows.Common-Controls"
       version="6.0.0.0"
       processorArchitecture="X86"
       publicKeyToken="6595b64144ccf1df"
       language="*"
     />
   </dependentAssembly>
</dependency>
</assembly>

NOME_EMPRESA = Susbstituir pelo nome da sua empresa (ou seu nome se for o caso)

NOME_PRODUTO = Substituir pelo nome da sua aplicação.

NOME_EXECUTÁVEL_SEM_EXTENSÃO = Substituir pelo nome do seu executável sem a extensão .exe

Descrição do aplicativo = Susbtituir pela breve descrição do seu aplicativo

coloque o arquivo manifest na mesma pasta que o projeto!
e epois é só compilar

fonte::http://www.plugmasters.com.br/sys/materias/276/1/Estilo-XP-no-Delphi

[RC]

Parabéns pelo post, é uma boa pra quem quer usar o estilo xp em versões anteriores ao delphi 7.

[Be.Cool]

é dahora ter o estilo xp, porem o arquivo manifest deve estar no diretorio do executavel mesmo depois dele compilador