with adoquery1 do begin close; sql.clear; sql.add('select * from Table where 编号=''' + edit1.text +'''') {如果你的ID是从edit1输入的.这里要看你的编号字段是不是字符型的.如果不是.就去掉双引号.} open; if recordcount<>0 then showmessage('编号已经存在!'); end;
………… if adoquery1.recordcount<>0 then begin showmessage('编号已经存在!'); end else begin adocommand1.commandtext := 'insert into .......'; adocommand1.Execute; end;
begin
close;
sql.clear;
sql.add('select * from Table where 编号=''' + edit1.text +'''')
{如果你的ID是从edit1输入的.这里要看你的编号字段是不是字符型的.如果不是.就去掉双引号.}
open;
if recordcount<>0 then
showmessage('编号已经存在!');
end;
你好 我用你的方法 还是把数据添加进去了~确实是显示 编号已经存在
我现在不想让他添加进去啊 谢谢
if adoquery1.recordcount<>0 then
begin
showmessage('编号已经存在!');
end
else
begin
adocommand1.commandtext := 'insert into .......';
adocommand1.Execute;
end;