1. 程式人生 > >delphi如何檢索adoquery裏面某一列存在的重復行?

delphi如何檢索adoquery裏面某一列存在的重復行?

lean 用戶添加 重復 ext spa delphi 重復數據 重復數 color

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)then
showmessage("存在重復數據!");
end;

delphi如何檢索adoquery裏面某一列存在的重復行?