如何杜绝冲减重复的数据行

Question

[已购商品表]-query1
  编码  名称 数量 单位 单价
  1001 苹果  2    个  0.5[即将冲减商品表]-query2
  编码  名称 数量 单位 单价
  1001 苹果  -2    个  0.5冲减按钮-query2.append;....功能：我想实现的功能是用户在[已购商品表]中选择某个商品后,按[冲减按钮]后在在[即将冲减表]中显示一条负记录
问题：现在的问题是我要实现在[已购商品表]中的某种商品只能在在[即将冲减商品表】中出现一条记录，但现在只要是[按冲减按钮]后就能无限制重复的出现 我很是郁闷?

Answer 1

冲减按钮在這個按鍵下if AdoQuery2.locate('編碼',AdoQuery1.fieldbyname('編碼'),[]) then begin
   showMessage('此產品已沖減');
  abort;
end else ....