var IsHave:Boolean;begin adoquery.first; while(not adoquery.eof) do begin if(adoquery.fieldbyname(‘列名‘).asstring="用户添加的值") then begin IsHave=True; break; end; adoquery.next;end;if(IsHave)thenshowmessage("存在重复数据！");end;