Penggunaan shape di delphi

Delphi kali ini akan menjelaskan penggunaan komponen shape
program nyubitolnya berupa program yang bisa mengganti shape dan merubah warnanya dengan menggunakan colorcombobox,kedua komponen berada pada palette additional.
penampakannya kaya gini gan:
untuk shape

untuk colorcombobox
.
kita akan membuat program nyubitol yang seperti ini penampakannya :


bentuk sedemikian rupa,persis ga persis gapapa .
jadi yang dibutuhkannya yaitu:

lalu pada listboxnya di properties object inspector beri item 6 buah.

dengan meng klik kotak kecil nya dan pada editornya masukan ininya:

setelah semua disiapkan saatnya memberi listing pada komponen listbox dan combocolornya.
untuk listbox beri event click dan listingnya kaya gini:

dan untuk combocolor beri event onchange.

lalu coba run oleh rekan2 semua dan penampakan akhirnya seperti ini:

oke dah selesai juga,,
semoga bermanfaat

Posted in: Delphi