Style XP bez używania zasobów

Przeglądając swoje programy zobaczyłem plik manifest. Słyszałem o nich, ale nie wiedziałem jak taki manifest. Chwilę sie zastanowiłem i zmieniłem nazwę. Patrzę, a tu wszystkie style z xp na moją aplikacje działają.

Nazwa pliku jest taka:
nazwa_twojego_exeka.exe.manifest a treść:

<?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="Program"
    type="win32"
/>
<description>Program</description>
<dependency>
    <dependentAssembly>
        <assemblyIdentity
            type="win32"
            name="Microsoft.Windows.Common-Controls"
            version="6.0.0.0"
            processorArchitecture="X86"
            publicKeyToken="6595b64144ccf1df"
            language="*"
        />
    </dependentAssembly>
</dependency>
</assembly>
</p>

jest to XML pod nazwą MANIFEST;)

pola description i name można zmienić wedle uznania

A terazz Tadadadammm Robimy Generator!!!
Walnij na foremke:
2xTButton
1xTOpendialog
1xTMemo
Właściwość memo1 visible daj na false;
Oprócz tego daj zmienną globalną o nazwie FileName : string;
1 button nazwij Otwórz a drugi Generuj (nie name a Caption)
teraz kliknij na button Otwórz dwa razy i wpisz

If Opendialog1.execute then filename:=Opendialog1.FileName;
memo1.Lines.add('<?xml version="1.0" encoding="UTF-8"
standalone="yes"?>');
memo1.Lines.add('<assembly xmlns="urn:schemas-microsoft-com:asm.v1"
manifestVersion="1.0">');
memo1.Lines.add('<assemblyIdentity');
memo1.Lines.add(' version="6.0.0.0"');
memo1.Lines.add(' processorArchitecture="X86"');
memo1.Lines.add(' name="'+extractfilename(filename)+'"');
memo1.Lines.add(' type="win32"');
memo1.Lines.add('/>');
memo1.Lines.add('<description>'+extractfilename(filename)+'</description>');
memo1.Lines.add('<dependency>');
memo1.Lines.add('    <dependentAssembly>');
memo1.Lines.add('        <assemblyIdentity');
memo1.Lines.add(' type="win32"');
memo1.Lines.add(' name="Microsoft.Windows.Common-Controls"');
memo1.Lines.add(' version="6.0.0.0"');
memo1.Lines.add(' processorArchitecture="X86"');
memo1.Lines.add(' publicKeyToken="6595b64144ccf1df"');
memo1.Lines.add(' language="*"');
memo1.Lines.add('        />');
memo1.Lines.add('    </dependentAssembly>');
memo1.Lines.add('</dependency>');
memo1.Lines.add('</assembly>');</p>

teraz kliknij dwa razy na przycisk Generuj i wklej

memo1.lines.savetofile(filename+'.manifest');

tera skompiluj otwórz swuj exek i generuj;)
//Edited by Merien ( Jak to czytalem to sie połapać nie mogłem co jest co to walnąłem kolorowanie składni)