Style Windows Xp Pada Delphi 6

Saturday, February 07th, 2009 | Author: Riza

Style Windows Xp - Logo Windows Xp Secara default, style Windows Xp tidak diimplementasikan secara otomatis ke aplikasi yang kita buat. Untungnya, Delphi versi 7 dan setelahnya telah menyediakan sebuah komponen khusus bernama XPManifest (TXPManifest). Sehingga hanya dengan menambahkan komponen ini ke salah satu form pada aplikasi yang dibuat, simsalabim! Begitu dijalankan, style aplikasi akan berubah menjadi style Windows Xp. Namun bagaimana jika masih menggunakan Delphi 6 seperti saya? Setelah mencari-cari akhirnya dapat juga cara mengimplementasikan style Windows Xp pada aplikasi yang dibuat tanpa menggunakan komponen tambahan. Langkahnya sebagai berikut:

Buat sebuah file text dengan text editor. Beri nama file tersebut, misalnya xp_style.txt, dan kemudian letakkan satu folder dengan project yang akan mengimplementasikan style Windows Xp.
Salin script xml berikut ke dalam file xp_style.txt.

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
<assemblyIdentity
    name="Simple.Xp.Resource"
    processorArchitecture="x86"
    version="6.0.0.0"
    type="win32"/>
<description>Windows Shell</description>
<dependency>
    <dependentAssembly>
        <assemblyIdentity
            type="win32"
            name="Microsoft.Windows.Common-Controls"
            version="6.0.0.0"
            processorArchitecture="x86"
            publicKeyToken="6595b64144ccf1df"
            language="*"
        />
    </dependentAssembly>
</dependency>
</assembly>

Buat sebuah file resource dengan menggunakan text editor. Beri nama misalnya xp_style.rc, kemudian letakkan satu folder dengan file xp_style.txt.
Salin baris di bawah ini ke dalam file xp_style.rc.
1 24 xp_style.txt
Tambahkan file resource xp_style.rc ke dalam file project aplikasi dengan menggunakan tool button “Add files to Project” yang ada pada toolbar.
Langkah terakhir yang harus dilakukan adalah menjalankan aplikasi, dan tampilan aplikasi sekarang telah mengikuti style Windows Xp.