Thursday, 9 February 2017T2/09/2017 12:10:00 am

CARA PENGGUNAAN DBLOOKUPCOMBOBOX DI DELPHI

Salam blogger….pada kesempatan kali ini saya akan share cara penggunaan dblookupcombox di program Delphi, dblookupcombobox ini biasanya di Delphi digunakan untuk menghubungkan relasi antar tabel. Disini saya mencontohkan misalnya saya mempunyai 2 buah tabel , yaitu table A dan tabel B lalu saya ingin mengambil data dari tabel A untuk ditampilkan pada tabel B maka saya memerlukan komponen dblookupcombobox untuk dapat me lookup field data dari tabel A ke tabel B tersebut. Jadi fungsi dari dblookupcombobox sebenarnya adalah untuk lookup data dari table yang satu ke tabel yang lainnya untuk ditampilkan. Tentunya untuk dapat melakukan hal tersebut table A dan tabel B harus ada relasinya yang mana kunci utama di table A harus ada di table B. jika masih bingung, sobat dapat menyimak tutorial penggunaannya di pragraf selanjutnya.
Untuk mempersingkat waktu saya akan menjelasakan tutorial penggunaan dblookupcombobox di Delphi. Pertama – tama kita terlebih dahulu menyiapkan database nya, sebagi contoh disini saya menggunakan database Ms. Access. Pada database ini saya memiliki 2 buah tabel, yaitu tabel mobil dan tabel service. (lihat gambar).

Penjelasan dari gambar di atas :

  • Pada tabel mobil saya mempunyai beberapa buah filed dengan primary key nya adalah KDmobil

  • Lalu pada tabel service juga ada beberapa buah field dengan primary key nya adalah KDservice, dan KDmobil di tabel service ini berfungsi sebagai kunci tamu di tabel service,

  • Pada relasi tabel 2 tabel tersebut saya merelasikan KDmobil di tabel bmobil dengan KD mobil di tabel service. KDmobil inilah yang nantinya akan saya buat lookup field datanya, sehingga ditabel service nantinya akan menampilkan field yang ada di tabel mobil.


Sampai disini kita sudah selesai membuat database dan tabel nya, selanjutnya kita akan membuat program nya di Delphi. Buat lah sebuah project baru di Delphi, lalu selanjutnya kita akan membuat sebuah form untuk mengisi data pada tabel mobil. Contoh form nya ada pada gambar dibawah ini :

Adapun komponen yang digunakan pada form mobil diatas adalah sebagai berikut :

  • ADOconnection >> untuk koneksi ke database

  • ADOtable >> untuk menampilkan field tabel mobil

  • Datasource >> untuk koneksi field ke dbgrid

  • Button >> tombol CRUD

  • Dbedit >> menampilkan field dari tabel mobil

  • Edit text >> input pencarian

  • Dbgrid >> Menampilkan field dari tabel mobil

  • Dbnavigator >>memindahkan record

Selanjutnya tambahkan sebuah form baru untuk input dan menampilkan data di tabel service, lalu design tampilannya seperti pada gambar di bawah ini :
Jika sudah sekarang kita akan menambahkan dblookupcombobox untuk melookup data dari tabel mobil kedalam table service, cara nya adalah tambahkan komponen dblookupcombobox lalu atur propertiesnya :
  • Datafield = MerkMobil

  • Datasource = DsService

Sekarang kita akan menambakan field dari tabel mobil ke dalam tabel service, cara nya adalah klik 2x pada adotable2 /Tservice lalu klik kanan lalu pilih add all field, jika sudah lalu klik kanan dan pilih new field, maka akan muncul jendela New field seperti pada gambar di bawah ini.

Pada propertiesnya atur seperti ini :

  • Name = MerkMobil

  • Type = String

  • Size = 30

  • Field type = Lookup

  • Keys field = KDmobil

  • Dataset = Tmobil

  • LookupKeys = KDmobil

  • Result field = Merkmobil

Jika sudah lalu tekan ok, lalu tambahkan juga semua field yang ada di tabel mobil mengikuti cara diatas, sehingga menghasilkan field Merk mobil, Kode Mobil, Jenis Mobil, No. Polisi . cara kerja nya pada saat dijalankan adalah pada saat lookupcombobox merk mobil dipilih maka secara otomatis field yang berada dibawahnya akan terisi secara otomatis mengikuti Kode mobil yang sudah di input pada form mobil sebelumnya. Jika ingin melihat contoh penggunaan dblookupcombobox ini sobat bisa baca dan download aplikasi programnya di sini (contoh penggunaan dblookupcombobox Delphi di aplikasi ).

Demikian postingan  saya kali ini tentang cara penggunaan dblookupcombobox di Delphi yang dapat saya share kali ini, semoga dapat bermanfaat bagi sobat semua dan selamat mencoba.
Previous
Next Post »
2 Komentar untuk "CARA PENGGUNAAN DBLOOKUPCOMBOBOX DI DELPHI"

niche sekali bang artikelnya

Terimakasih atas kunjungan nya Kang

Silahkan tinggalkan komentar dibawah ini,
Terima kasih sudah :
1. Berkomentar dengan sopan
2. Tidak meninggalkan link aktif dalam form komentar
3. Berkomentar sesuai postingan / artikel
4. Tidak membuat komentar yang mengandung SARA / SPAM
5. Memberikan informasi link / script yang tidak berfungsi

Terima Kasih Sudah Berkomentar

PENDAPAT ANDA TENTANG BLOG INI ?

Follow by Email

 
Copyright © 2014 uduy macal blog's - All Rights Reserved
Template By Kuncidunia
DMCA.com Protection Status