with ADO_qry_jiage do
begin
   Close;
   SQL.Clear;
   SQL.Add('update 商品价格表 set 商品进价='+currtostr(shangpinjinjia));
   SQL.Add('where 商品编号='+currtostr(shangpinid));
   ExecSQL;
end;
......

解决方案 »

  1.   

    with ADO_qry_jiage do
    begin
       Close;
       SQL.Clear;
       SQL.Add('update 商品价格表 set 商品进价='+currtostr(shangpinjinjia));
       SQL.Add('where 商品编号='+currtostr(shangpinid));
       ExecSQL;
    end;
    ......
      

  2.   

    //  ADO_qry_jiage.Active;   改成ADO_qry_jiage.close;   with ADO_qry_jiage do
       begin
         SQL.Clear;
         SQL.Add('update 商品价格表 set 商品'+currtostrshangpinjinjia));
         SQL.Add('where 商品编号='+currtostr(shangpinid));
         ExecSQL;
       end;
      

  3.   

    //  ADO_qry_jiage.Active;   改成ADO_qry_jiage.close;   with ADO_qry_jiage do
       begin
         SQL.Clear;
         SQL.Add('update 商品价格表 set 商品'+currtostrshangpinjinjia));
         SQL.Add('where 商品编号='+currtostr(shangpinid));
         ExecSQL;
       end;
      

  4.   

    行了!谢谢
    那我在修改后立即在DBGrid里刷新呢?