30 March, 2013

Pencarian data pada tabel adotable atau adoquery delphi 7

Begin
If not ADOTable1.locate('nim',edit1.text,[]) then
Showmessage('nim tidak ditemukan');

Penjelasan 'nim' adalah area field yg ingin dicari.
Edit1.text adalah variabel yg ingin dicocokkan
Sedangkan [] adalah opsi tambahan (bisa dibaca pada bagian help).

Hasil dari locate, adalah pointer akan berhenti pada record yg cocok pertama. Jika hasil locate lebih dari 1 maka locate akan mengabaikan record lain.

Semoga bermanfaat.
--
Sent using a Sony Ericsson mobile phone

1 comment: