Tingkatan

Pemula

Kategori

Dasar

Sub Kategori

Prosedur / Fungsi

Judul

StringToColor dan ColorToString

Referensi

by Eko Indriyawan

Tujuan

Mengajarkan kepada delphier pemula tentang cara menggunakan fungsi StringToColor dan ColorToString.

Overview

Pembahasan kali ini akan ditekankan pada penggunaaan fungsi StringToColor dan ColorToString. Didalam pembahasan kali ini akan diberikan dengan materi yang interaktif sehingga meskipun fungsi ini sangatlah sederhana namun bisa dibuat menjadi sebuah program yang interaktif dan menarik perhatian untuk dicoba.


Fungsi ini akan sangat berguna jika dihubungkan dalam hal desain grafis atau dalam hal pembuatan game dan animasi. Oleh karena itu, semakin interaktif suatu desain dan semakin bagus sebuah animasi, maka hal ini akan secara langsung bisa memikat hati user yang menggunakan program aplikasi.


Semoga tutorial yang sederhana ini bisa memberikan inspirasi buat para delphier dalam mengembangkan kreativitasnya dalam menciptakan produk-produk IT yang siap untuk bersaing dengan pasar global.

Petunjuk :

Silahkan anda ikuti langkah - langkah berikut ini dengan pelan - pelan agar bisa berjalan dengan lancar sesuai dengan petunjuk yang sudah diberikan.

Langkah 1

Buat program aplikasi baru.

Langkah 2

Tambahkan beberapa object kedalam Form

Button1: TButton;
Button2: TButton;
Bevel1: TBevel;
Button3: TButton;
Panel1: TPanel;
Edit1: TEdit;
Label1: TLabel;
ComboBox1: TComboBox;
Bevel2: TBevel;
Label2: TLabel;
Panel2: TPanel;

Langkah 3

Atur desainnya seperti berikut ditampilkan pada gambar form dibawah ini



Langkah 4

Silahkan anda fokuskan perhatian pada object Panel2

Langkah 5

Tentukan nilai property untuk ParentBackGround dengan data False.

Langkah 6

Tambahkan data warna pada bagian property Items di object Combobx1 dengan data seperti berikut ini

clScrollBar
clBackground
clActiveCaption
clInactiveCaption
clMenu
clWindow
clWindowFrame
clMenuText
clWindowText
clCaptionText
clActiveBorder
clInactiveBorder
clAppWorkSpace
clHighlight
clHighlightText
clBtnFace
clBtnShadow
clGrayText
clBtnText
clInactiveCaptionText
clBtnHighlight
cl3DDkShadow
cl3DLight
clInfoText
clInfoBk
clHotLight
clGradientActiveCaption
clGradientInactiveCaption
clMenuHighlight
clMenuBar
clBlack
clMaroon
clGreen
clOlive
clNavy
clPurple
clTeal
clGray
clSilver
clRed
clLime
clYellow
clBlue
clFuchsia
clAqua
clLtGray
clDkGray
clWhite

Langkah 7

Silahkan anda klik 2x pada tombol ColorToString. Setelah itu anda lanjutkan dengan menuliskan kode program didalam event OnClick seperti terlihat pada potongan kode program dibawah ini.



Langkah 8

Silahkan anda klik 2x pada tombol StringToColor. Setelah itu anda lanjutkan dengan menuliskan kode program didalam event OnClick seperti terlihat pada potongan kode program dibawah ini.


Langkah 9

Kemudian anda lanjutkan compile program aplikasi tersebut dengan menggunakan tombol Ctrl + F9.

Langkah 10

Lanjutkan dengan menekan tombol F9 hingga program siap untuk dijalankan.



Langkah 11

Silahkan anda tekan tombol ColorToString hingga didapatkan tampilan seperti gambar dibawah ini.



Langkah 12

Setelah itu anda lanjutkan dengan memilih warna dari daftar warna. Sebagai contoh silahkan anda lihat tampilan gambar berikut ini.



Langkah 13

Kemudian anda lanjutkan dengan menekan tombol StringToColor hingga didapatkan tampilan seperti berikut ini.



Langkah 14

Program sudah selesai anda buat. Sekarang silahkan anda tekan tombol Keluar.

Download

StringToColor dan ColorToString


Silahkan anda download link diatas untuk mendapatkan contoh program aplikasi secara lengkap.


Ada beberapa masukan dan keluhan dari teman - teman, bahwa ada beberapa program contoh tidak bisa dijalankan dari delphi 7. Hal ini dikarenakan program contoh dibuat dengan menggunakan Delphi 2007 for win32.


Apabila anda menggunakan D7, sebaiknya anda mengikuti pandauan dari langkah - langkah yang sudah diberikan.


Atas perhatiannya, saya mengucapkan banyak terimakasih.