Pencarian Data Pada Database dengan InputBox Delphi


misi mina :D nih ane shere post yg kaga penting lagi yauti membuat Pencarian Dengan InputBox untuk menghemat komponen yang digunakan dalam membuat aplikasi. semakin sedikit komponen yang digunakan maka size Aplikasi akan semakin kecil. semakin kecil size aplikasi  maka proses loading-nya pun akan semakin cepat. Maka Admin Akan Kembali Berbagi Tips Tentang cara Menggunakan InputBox dalam Delphi yang akan dimanfaatkan untuk melakukan pencarian data dalam Tabel.


Pencarian Data Inputbox

Pertama : Pastikan Sudah Tidak ada Masalah dengan koneksi Database
Kedua   : Bebas Menggunakan Database Apa Saja yang penting memiliki minimal 1 Tabel.
Ketiga  : Tambahkan Code dibawah ini didalam button Cari. Kode dibawah ini akan melakukan pencarian data dalam Tabel Berdasarkan Field Nama dari Tabel 
1var
2cari:string;
3begin
4cari:=InputBox('Nama Yang Dicari ??','Nama : ','');
5// Prose Pencarian Data
6if not ADOTable1.Locate('Nama',cari,[]) then
7ShowMessage('Tidak Ada Data !!'else
8abort;
9end;

0 komentar:

Posting Komentar

Diberdayakan oleh Blogger.

Copyright © / dua minggu terahir

Template by : Urang-kurai / powered by :blogger