with QueryAMD do
begin
if QueryAMD.IsEmpty then
begin
MessageDlg('没有记录需要删除!', mtConfirmation, [mbOK], 0);
Exit;
end
else
begin
if MessageDlg('确定删除此条记录嘛?', mtConfirmation, [mbYes, mbNo], 0) = mrYes then
begin
Delete;
UpdateRecord;
ApplyUpdates;
Active := False;
end
else
Exit;
GetData;
end;
end;
当执行到UpdateRecord时报错,QueryAMD不在insert状态或EDIT状态,这是何故??急,在线关注!!
begin
if QueryAMD.IsEmpty then
begin
MessageDlg('没有记录需要删除!', mtConfirmation, [mbOK], 0);
Exit;
end
else
begin
if MessageDlg('确定删除此条记录嘛?', mtConfirmation, [mbYes, mbNo], 0) = mrYes then
begin
Delete;
UpdateRecord;
ApplyUpdates;
Active := False;
end
else
Exit;
GetData;
end;
end;
当执行到UpdateRecord时报错,QueryAMD不在insert状态或EDIT状态,这是何故??急,在线关注!!
解决方案 »
- 如何调用windows画图板程序
- 如何把TreeView中其中某些节点(TreeNode)字体变粗些?
- 一个简单的问题?
- 用ado如何连接带口令的acces数据库
- 喜欢的女人却喜欢别人,世间上最痛苦的事莫过于此!散分!
- 请问错误:EInvalidOperation with message'Canvas does not allow drawing'
- 我设计了一个统计程序,因为统计时间比较长,所以想让统计时弹出一个对话框,显示统计的进度,统计完毕后这个对话框自动关闭。要用什么语
- 想实现以下的功能,请大家给个思路!
- 如何对表操作(急)
- winexec(XXX,sw_show); xxx变量怎么样处理?
- ADO奇怪的问题(ADO高手帮帮我)(在线等)
- 加密、解密的问题
ApplyUpdates;
Active := False;
删除直接DELETE就可以啊。上面三句不知有何用处?
你要是设置了缓存更新,最后再ApplyUpdates,为什么要删除一条就提交一次呢?而且还关闭再打开,麻烦,不符合缓存更新的意义。
按TWWH的做法,去掉UpdateRecord,最后ApplyUpdates,系统报错“Record locked by another user.”
按Cheney的做法,报错同TWWH!!!
同意TWWWH的说法