Ekspresi | Les Private Arab-Inggris via WA dan BBM Gratis | Sunda | Kontak | Google | Gmail | Uang Adsense
Toko Baju Online Abah + Bonus
LP3I Tasikmalaya
Bahasa Arab (Kelas 1 SD sampai Universitas)
Bisnis Bitcoin | Daftar Isi | Tools Penting | PrivacyPolicy | Jago Bahasa Inggris dan Arab | Kamus | Kamus Google

Friday, March 11, 2016

Warna Form dan Label Dengan Script Delphi 7



Hello Katabah!
Bagi para pemula Delphi, penggunaan warna untuk teks pada Label dan Form seringkali dilakukan dengan mengubah setting warna pada Object Inpector (tanpa coding/script).


Namun apabila kita menginginkan perubahan warna lebih fleksibel, maka biasanya penggunaan coding tidak bisa dihindari alias penting dilakukan.

1. Buka Delphi 7
2. Pada form kosong, letakkan 3 buah komponen Button dari kategori Standard dalam Component Pallete
3. Klik komponen Label dari kategori Standard, kemudian klik di sebelah kanan Button1
4. Klik dua kali Button1
5. Ketik script ini:
Label1.Color:=clWhite;
Label1.Font.Size:=20;
Label1.Font.Color:=clRed;

6. Klik dua kali Button2
7. Ketik script ini:
Form1.Color:=clGreen;

8. Klik dua kali Button3
9. Ketik script ini:
Application.Terminate;

Ini tampilan desainnya:


Sekarang program sudah selesai. Mari kita jalankan dengan menekan tombol F9 di keyboard.

Silahkan klik Button1, 2 dan 3. Berikut ini fungsi dari ketiga Button tersebut:
a. Button1: mengubah warna latar Label menjadi putih dan warna hurufnya menjadi merah
b. Button2: mengubah warna form
c. Button3: menutup aplikasi (exit)

"Bitcoin and Forex are high risk business. We must join them smartly."
loading...