我用DBEdit绑定数据,用下面的语句保存,但如果记录没有发生改变时会出错,怎么办啊
procedure Tfrm_studentinfo.BitBtn1Click(Sender: TObject);
begin
adoquery1.Post;
end;

解决方案 »

  1.   

    procedure Tfrm_studentinfo.BitBtn1Click(Sender: TObject);
    begin
      try
        adoquery1.Post;
      except
      end;
    end;
    //脱离Delphi运行就不会出错了
      

  2.   

    var
      str_dbe1 : string;
    .........//修改前
      str_dbe1 := dbedit.text;procedure Tfrm_studentinfo.BitBtn1Click(Sender: TObject);
    begin
      if str_dbe1 <> dbedit.text then
        adoquery1.Post
      else application.messagebox('美修改','提示',mb_ok);
    end;
      

  3.   

    if adoquery1.State =dsEdit then adoquery1.Post
      

  4.   

    try
     adoquery1.post
    except
    end;
    //脱离Delphi环境运行。