代码如下:
query1.Close;
query1.sql.clear;
query1.SQL.Add('select * from country.db where name=:a;');
query1.ParamByName('a').asstring:=edit1.text;
query1.Open;
if query1.Eof then showmessage('no this record!')//出错处理
else showmessage('yes,you find it!');//继续的工作