ComboBox Pada Program Delphi 7

ComboBox digunakan untuk memilih salah satu opsi dari beberapa pilihan yang disediakan. Berikut adalah latihan/tutorial sederhana tentang penggunaan ComboBox pada Borland Delphi 7.

Mengetahui letak komponen ComboBox
ComboBox terletak pada tab standard pada delphi

Elemen yang dibutuhkan
1 buah ComboBox
1 buah Label dan
1 buah Button
Kemudian susun dalam satu buah form, kurang lebih seperti gambar dibawah

Pada label1 beri caption "Hasil" dan pada Button1 berikan caption "Generate"

Konfigurasi pada ComboBox

Klik pada ComboBox1, kemudian setting konfigurasi property ComboBox seperti berikut :

1. Berikan item-item pilihan, contoh yang saya gunakan : pertama, kedua, ketiga, dan keempat kemudian klik ok.

2. Kemudian pada ItemIndex ganti angka -1 menjadi 0.

Memberikan Coding pada button

Double klik pada Button1 kemudian berikan source code berikut :

procedure TForm1.Button1Click(Sender: TObject);
begin
    Label1.Caption:=ComboBox1.Items[ComboBox1.ItemIndex];
end;

Running program
Pilih tab run->run atau bisa mengetikkan shortcutnya F9
Hasilnya nampak seperti berikut :