20 Warna Script Delphi 7

Kupas Tuntas Kuliah Jurusan Sistem Informasi

Hello Katabah!

Kalau hanya ingin menerapkan satu atau dua warna, kita bisa mencarinya langsung di Object Inspector – Properties – Color – Kemudian pilih warna yang disukai.

Akan tetapi, bila ingin menerapkan warna melalui code/script, maka dapat menggunakan script seperti ini:

Warna Hitam:

Panel1.Color:=clBlack;

Dengan script di atas, maka Panel1 akan berwarna hitam. Oleh karena itu, untuk menerapkan warna lain, maka cukup mengganti kata “black” (hitam) dengan warna lain seperti “red” (merah).

Selain itu, kita harus menentukan perubahan warna itu ingin diterapkan pada apa, Panel, Tombol, Form atau komponen lain?

Mari kita terapkan perubahan 20 warna pada Panel berikut ini:

1. Hitam

Panel1.Color:=clBlack;

2. Merah Tua

Panel2.Color:=clMaroon;

3. Hijau

Panel3.Color:=clGreen;

4. Zaitun

Panel4.Color:=clOlive;

5. Laut

Panel5.Color:=clNavy;

6. Ungu

Panel6.Color:=clPurple;

7. Teal

Panel7.Color:=clTeal;

8. Abu-Abu

Panel8.Color:=clGray;

9. Perak

Panel9.Color:=clSilver;

10. Merah

Panel10.Color:=clRed;

11. Limau

Panel11.Color:=clLime;

12. Kuning

Panel12.Color:=clYellow;

13. Biru

Panel13.Color:=clBlue;

14. Fuchsia

Panel14.Color:=clFuchsia;

15. Aqua

Panel15.Color:=clAqua;

16. Abu-Abu Muda

Panel16.Color:=clLtGray;

17. Abu-Abu Tua

Panel17.Color:=clDkGray;

18. Putih

Panel18.Color:=clWhite;

19. Warna Bawaan Tombol Button dan Form

Panel19.Color:=clBtnFace;

20. Cream

Panel20.Color:=clCream;

Catatan:

1. Untuk latihan di atas, saya menggunakan 20 Panel yang dapat ditemukan dari tab Standard pada Component Pallete

2. Khusus untuk Panel19, saya langsung ubah warnanya menjadi merah (Object Inspector – Properties – Color – clRed) agar ketika program dijalankan, perubahan warnanya lebih jelas.

3. Apakah Delphi hanya mengenal 20 warna? Tidak, Delphi 7 masih memiliki banyak pilihan warna. Silahkan temukan di Object Inspector – Properties – Color.

Ini penampakannya:

Tampilan Sebelum Dijalankan: