Skip to main content

Cara Membuat ComboBox Delphi Lengkap Dengan Contoh Program

ANAKTEKNO.COM, Cara Membuat ComboBox Delphi - Dalam tutorial belajar Delphi di blog ini, kita menggunakan Delphi 10.3. Tutorial yang pertama kita akan belajar membuat ComboBox Delphi.

Untuk lebih jelasnya, berikut ini cara mudah membuat ComboBox Delphi lengkap dengan gambar menggunakan if else if sederhana.

Cara Membuat Project Baru di Delphi

Klik File > New > New > Windows VCL Application Delphi
Akan muncul Form1 baru yang masih kosong.

Untuk membuat ComboBox, kita hanya bermain dengan Palette jenis Standard. Untuk menampilkan Palette, klik View > Tool Windows > Palette (Ctrl + Alt + P)

Oh ya, studi kasus yang saya pilih untuk membuat program Delphi sederhana dengan fitur ComboBox adalah toko sembako, gudang lebih tepatnya. Jadi, di aplikasi ini, akan ada item barang, kuantitas, dan harga.

Palette Standard yang dibutuhkan meliputi:

  • 1 TComboBox
  • 2 TEdit
  • 3 TLabel

Cara Membuat ComboBox Delphi

Berikut ini langkah-langkah membuat ComboBox di Delphi.

1. Masukkan Combobox sebagai tempat menyimpan item barang. Klik Palette > Standard > TComboBox

2. Masukkan TEdit sebagai tempat menyimpat harga.

3. Masih di menu Palette ? Standard > TEdit

4. Masukkan TEdit2 sebagai tempat menyimpan kuantitas barang.

5. Masukkan 3 TLabel dengan masing-masing caption Barang, Kuantitas, dan Harga.

6. Klik 2 kali pada ComboBox1 kemudian copy dan paste kode berikut ini.

if ComboBox1.Text='Tepung Terigu' then
begin
edit1.Text:='Rp15.000';
edit2.Text:='10 Kg';
end
else if ComboBox1.Text='Beras' then
begin
edit1.Text:='Rp21.000';
edit2.Text:='11 Kg';
end
else if ComboBox1.Text='Telur' then
begin
edit1.Text:='Rp2.000';
edit2.Text:='100 Butir';
end


Sedikit penjelasan tentang kode di atas. Itu adalah cara mengambil inputan dari combobox Delphi yang kemudian ditampilkan di edit1.Text dan edit2.Text.

Namun ketika dirunning, item-item di atas belum bisa muncul di ComboBox karena belum di atur di Properties. Jadi, kita harus mengisi item ComboBox di Delphi.

Cara Menambahkan Item Pada ComboBox Delphi

Berikut ini cara menambahkan item pada ComboBox Delphi

1. Klik ComboBox1 dan lihat pada jendela Properties, cari Items (TStrings) dan klik ...

2. Akan muncul jendela pop up String List Editor.

3. Masukkan nama-nama Item sesuai dengan yang di kode program.

  • Tepung Terigu (Tekan Enter)
  • Beras (Tekan Enter)
  • Telur (Tekan Enter)

Klik OK.

Setelah itu, klik Run dan jalankan program.

Cara Membuat ComboBox Delphi
Cara Membuat ComboBox Delphi

Setelah dijalankan, maka kita pilih Item di ComboBox untuk ditampilkan. Setiap Item yang ditampilkan akan muncul harganya dan kuantitasnya di Edit1 dan Edit2 secara otomatis berdasarkan koding di ComboBox1.

Satu hal yang penting agar item di ComboBox muncul adalah, pada String List Editor ComboBox1, pastikan jangan sampai ada spasi setelah kata terakhir Item. Contohnya Tepung Terigu langsung tekan Enter, begitu juga setelah menulis Beras, jangan ada spasi.

Untuk menambahkan Item barang lengkap dengan harga dan kuantitasnya, tambahkan kode else if di ComboBox1. Misalnya:

else if ComboBox1.Text='Minyak Goreng' then
begin
edit1.Text:='Rp67.000';
edit2.Text:='10 Liter';
end


Untuk program menampilkan data dari database ke combobox Delphi, nanti kalau ada waktu kita buat.

Demikianlah cara membuat ComboBox di Delphi dan menampilkannya lengkap dengan contoh program yang mudah dipahami. Semoga bermanfaat!

Anak Tekno
Anak Tekno
Tertarik dengan dunia Blog dan SEO sejak 2017 dan terus belajar sampai detik ini..

Tentang
Anaktekno.com merupakan tempat berbagi tutorial aplikasi Android, Media Sosial, Windows, dan lain-lain. Kami juga menerima Jasa Convert Paypal, Content Placement, Unblock Link Facebook.

Informasi Lebih Lanjut
WhatsApp 085396717324
Email Lara4store@gmail.com

Alamat
Lara 4 Mukti Tama, Baebunta Selatan, Luwu Utara, Sulawesi Selatan, Indonesia - 92965
close