ü Ubah
caption dari form menjadi aplikasi menu
ü Tambahkan
komponen Main Menu dan PopUpMenu, komponen ini dapat dibentangkan dimana saja,
karena komponen ini nonvisual (tidak
Nampak setelah diaplikasinya dijalankan)
ü Mengisi
item-item pada main menu, Caranya kilk (aktifkanMain Menu, klik Property Items
lalu klik tanda… Sehingga muncul menu Designer yang isinya sebuah kotak hitam
yang kosong, lalu ketiklah :&Pilihan (Tanda&dipakai untuk menyatakan
Shortcut, yaitu agar tampilan huruf P berisi garis bawah
ü Kemudian
klik item/kotak yang dibawahnya, lalu ketik beberapa item kebawahnya :
Kotak
Edit Warna& Biru
Kotak
Warna& Menu
Kotak
Warna&Hijau
ü Sekarang
klik item(kotak) yang berada disebelah kanan item pilihan tersebut diatas, lalu
ketik:KELUAR
ü Dilanjutkan
dengan mengisi program(event handler) pada masing-masing item dari MainMenu,
klik ganda item pertama(kotak Edit Warna Biru) sehingga muncul lembar Code
Editor, lalu ketik Program berikut ini:
Edit1.Color:=clBlue;
|
ü Lalu
klik ganda pada iten kedua( kotak Edit Warna Menu) lalu ketik
Edit1.Color:=clMenu;
|
ü Klik
ganda item ketiga(kotak Edit Warna Hijau
Edit.Color:=cllime;
|
ü Klik
ganda item KELUAR, lalu ketik Programnya:
Application.Terminate;
|
ü Kita
akan melanjutkan membuat komponen PopUpMenu, dengan cara;
ü Klik
komponen PopUpMenu
ü Klik
property items, lalu klik tanda …
ü Lalu
ketiklah item-item pada lembar Editor yaitu sebagai berikut:
Teks
Warna&Kuning, tekan enter
Teks
Warna &Merah, tekan enter
Teks
Warna &Default, klik Close (X)
ü Untuk
setiap item diatas harus diisi Program, caranya adalah sebagai berikut:
·
Klik ganda pada item Teks Warna Kuning, lalu
ketik Program berikut;
Edit1.Font.Color:=clYellow;
|
·
Klik ganda pada item Teks Warna Merah, lalu
ketik Program berikut;
Edit1.Font.Color:=clRead;
|
·
Klik ganda pada item teks Warna Default, lalu
ketik Program berikut;
Edit1.Font.Color:=clWindow.Text;
|
Pilihan(item-item)
dari PopUpMenu tidak kelihatan setelah programnya dijalankan, agar bias
kelihatan maka harus dihubungkan dengan komponen lain. Misanya komponen:
Edit,Label,Botton, atau CheckBox, caranya klik (aktifkan) komponen yang akan
dihubungkan, lalu klik Property PopUpMenu dilanjutkan meng-klik segitiganya,
lalu pilih PopUp Menu1