with Frm_Data.Qry_Temp do
begin
Close;
SQL.Clear;
SQL.Add('select * from custom where MainContact='''+Edit_GoodsName.Text+'''');
Open;
end;
with Frm_Data.Qry_Goods do
begin
Append;
if (Edit_GoodsCode.Text<>frm_data.Qry_temp.FieldByName('Company').AsString) or (frm_data.Qry_temp.FieldByName('email').AsString='是') or (frm_data.Qry_temp.RecordCount=0) then
begin
FieldByName('SalePrice').AsFloat:=1
end
else
begin
FieldByName('SalePrice').AsFloat:=0;
end;
post;
end;
现在这个代码 是针对单条记录的比较 如果实现多条数据比较 呢 求助

for
while
loop
任君选择。