Pencarian data secara realtime delphi - database

TANYA :

Seumpama saya mempunyai satu buah komponen Tedit untuk fitur search engine, dan tersedia sebuah tabel dengan field nama dan record : ramdhan, rere, eva, evoel.
ketika user mengetikan karakter pertama(semisal huruf R) maka komponen TEdit akan langsung menampilkan record yang tersedia dalam database (dalam hal ini ramdhan dan rere), lalu ketika user memasukan karakter kedua(misalkan A) maka Tedit akan langsung dapat menampilkan nama ramdhan, itu bagaimana caranya yah???

 JAWAB :

manfaatkan event OnChange ...

procedure TForm1.Edit1Change(Sender: TObject);
begin
adoquery.close;
adoquery.sql.text:='select * from data where nama containing :nama';
adoquery.prepare;
adoquery.params[0].AsString:=Edit1.text;
adoquery.open;
end;

KUNJUNGI WEBSITE DAGANGAN KAMI KLIK PADA TEKS BERKEDIP INI