Cara Membuat Tampilan form XP di Delphi

Ternyata membuat effect hot style seperti pada windows XP tidaklah sulit cukup satu baris perintah.
Effectnya jika button, cekbox, dan sebagainya kalau didekati dengan mouse akan menyala seperti pada gambar (hot tract)
bagaimana caranya..?
kita cukup menambahkan file winxp.res , file ini bisa anda download pada menu top download gratis
perintahnya sebagai berikut  :

1. unit Unit1;  
2.   
3. interface  
4.   
5. uses  
6.   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  
7.   Dialogs, OffBtn, DB, DBTables, Grids, DBGrids, Buttons, StdCtrls,  
8.   ComCtrls, ExtCtrls;  
9.   
10. type  
11.   TForm1 = class(TForm)  
12.     PageControl1: TPageControl;  
13.     TabSheet1: TTabSheet;  
14.     TabSheet2: TTabSheet;  
15.     TabSheet3: TTabSheet;  
16.     Button1: TButton;  
17.     BitBtn1: TBitBtn;  
18.     SpeedButton1: TSpeedButton;  
19.     Edit1: TEdit;  
20.     CheckBox1: TCheckBox;  
21.     RadioButton1: TRadioButton;  
22.     ComboBox1: TComboBox;  
23.     RadioGroup1: TRadioGroup;  
24.   private  
25.     { Private declarations }  
26.   public  
27.     { Public declarations }  
28.   end;  
29.   
30. var  
31.   Form1: TForm1;  
32.   
33. implementation  
34.   
35. {$R *.dfm}  
36. {$R winxp.res} // Tambahannya  
37.   
38. end.  

---

Klik Like/share jika anda menyukai tulisan Share

    Syarat Tukar Link/Banner      Blog anda terdaftar di Search Engine dan halaman tukar link anda terindeks di Google.      Terdaftar      Terdapat meta tag search engine pada template.      Terindeks      Halaman blog muncul pada hasil pencarian Google...  

---