返回首页
  主页 > 编程 > delphi >

delphi报错:uniTable1:Dataset not in edit or insert mode

2019-03-09 09:28 阅读:159 来源:智宇SEO自媒体

  delphi报错:uniTable1:Dataset not in edit or insert mode

  有错误的代码如下:

procedure TForm4.Button4Click(Sender: TObject);

  begin

  if MessageDlg('确认要删除记录吗',mtConfirmation,[mbYes,mbNo],0)=mrYes then

  begin

  unitable1.Edit;

  unitable1.Delete;

  unitable1.post;

  end;

end;

  修改后的代码:

procedure TForm4.Button4Click(Sender: TObject);
begin
  if MessageDlg('确认要删除记录吗',mtConfirmation,[mbYes,mbNo],0)=mrYes then
  begin

    unitable1.Edit; //使数据表可以删除
    unitable1.Delete; //删除数据记录
   if unitable1.state in [dsEdit, dsInsert] then  //判断状态后再保存
    begin
      unitable1.post;
    end;
   end;

end;



返回首页