Komponen ComboBox pada Delphi

Komponen ComboBox atau yang biasa disebut Drop-Down adalah komponen standar yang disediakan oleh Delphi. Dan mungkin ini komponen standar tuk seluruh aplikasi, entah web-based atau desktop-based. Komponen ini terletak pada bagian Standard, sebelum bagian Additional. Berikut gambar yang menunjukkan letak dari komponen ComboBox tersebut :

Seperti biasa, kalau cuma membaca saja, pastinya akan lebih sulit untuk dimengerti. Oleh karena itu, yuk praktek sambil dibaca 🙂

Disini kita akan praktek membuat sebuah program menggunakan combobox untuk menampilkan kata yang dipilih dengan combobox. Tampilan form awalnya adalah sebagai berikut :

Lalu atur properties tiap komponen seperti berikut :

Komponen Properties Nilai
ComboBox1 Text Pilih salah satu
Label1 Caption Hasilnya disini

Maka seperti inilah akhirnya :

Sebelum sampai ke tahap coding, kita harus memberi nilai apa saja untuk ComboBox tersebut. Caranya aktifkan ComboBox-nya, kemudian pada Object Inspector pilih Items dan klik tombolnya. Isilah dengan 3 kata saja dalam 3 baris. Contoh :

Oke, kini form sudah di-desain, list item-nya juga sudah ada. Kalau begitu, saatnya ngoding.

Klik dobel pada ComboBox1, kemudian tulis code berikut.

  if ComboBox1.ItemIndex = 0 then
    Label1.Caption := ComboBox1.Items[ComboBox1.ItemIndex]
  else if ComboBox1.ItemIndex = 1 then
    Label1.Caption := ComboBox1.Items[ComboBox1.ItemIndex]
  else if ComboBox1.ItemIndex = 2 then
    Label1.Caption := ComboBox1.Items[ComboBox1.ItemIndex]

Hasilnya seperti ini.

Bisa juga seperti ini, hasilnya silahkan dilihat sendiri kemudian dipahami yaa..

  if ComboBox1.ItemIndex = 0 then
    Label1.Caption := 'Teknomatika'
  else if ComboBox1.ItemIndex = 1 then
    Label1.Caption := 'Keren'
  else if ComboBox1.ItemIndex = 2 then
    Label1.Caption := 'Banget'

Nah, sekian pembahasan dasar mengenai ComboBox pada Delphi. Ada yang ingin ditanyakan?

Incoming search terms:

Leave a Reply

Your email address will not be published. Required fields are marked *