Pecarian Data Dalam Delphi Part1

Dalam Pencarian Data menggunakan Delphi banyak metode yang dapat digunakan, dalam hal ini sy akan menjeslakan pencarian data menggunakan metode Loapartialkey. Pertama masukkan :

• Buat sebuah database
• Buka Delphi 7
• 1 buah ADOConnection, koneksikan ke database, lihat cara mengkoneksikan kedatabse klik disini
•  Tambahkan 1 buah ADOTable, 1 buah DataSource
• 1 buah ComboBox, pada Object Inspektor atur Item dan masukkan Kata yang mau kita cari, dalam hal ini sy memasukkan ID_Sup dan Nama sebagai acuan. 
• Tambahkan  1 buah Edit, 1 Buah Button
• Tambahkan 1 buah DBGrid untuk menampilkan data

sy merancang sebuah tampilan seperti gambar dibawah ini :

Masukkan Coding program berikut ini pada Button Cari:

"if ADOTable1.Locate(ComboBox1.Text, Edit1.Text, [lopartialkey])=true then ShowMessage('selamat data ditemukan') else ShowMessage('Maaf data tidak ada')"


Setelah selesai jalankan Program. 

Untuk download programnya klik disini. silahkan dikembangkan dan semoga bermanfaat.