查询 select * from table where Query。BOF and Eof就表示没有,
query1.Close; query1.SQL.text := 'select Count(*) as qq from table1 where field1 := ''' + edit1.text + ''''; query1.Open; if query1.fieldByName('qq').Asinteger > 0 then showmessage('已存在啦'); query1.Close;
太复杂了吧,用locate: If Table1.Locate(字段名,值,比较方式) then .....
if Adoquery.Locate('字段名','''+Edit1.Text+''',[locaseInsensitive]) then showmessage('已经存在') else showmessage('找不到');
select * from table
where
Query。BOF and Eof就表示没有,
query1.SQL.text := 'select Count(*) as qq from table1 where field1 := ''' + edit1.text + '''';
query1.Open;
if query1.fieldByName('qq').Asinteger > 0 then
showmessage('已存在啦');
query1.Close;
If Table1.Locate(字段名,值,比较方式) then
.....
showmessage('已经存在')
else showmessage('找不到');