如何让clientdataset删除记录前,自定义一个提醒的 警告 语句

sxbug 2006-05-20 03:11:38
我在clientdataset的beforedelete写了:

if messagedlg() =ture then
......
else
clientdataset.cancel;

关键是那......如何写,我不想在这里用sql直接操作数据库,
有办法吗?
谢谢
...全文
137 9 打赏 收藏 转发到动态 举报
写回复
用AI写文章
9 条回复
切换为时间正序
请发表友善的回复…
发表回复
wudi_1982 2006-05-21
  • 打赏
  • 举报
回复
为什么要在这里写呢,你在用户进行删除操作前边写,
if messagedlg('确定删除吗?') then
//删除代码
sxbug 2006-05-20
  • 打赏
  • 举报
回复
楼上的高手
我开始和你想一样

可就是不行
CACACACACA 2006-05-20
  • 打赏
  • 举报
回复
beforedelete这不是删除之前的事件吗!!
执行默认的就行了.

if messagedlg() =ture then
{空着就行了,当前记录就DELETE了.}
else
clientdataset.cancel;
sxbug 2006-05-20
  • 打赏
  • 举报
回复
怎么都回答 放弃 这一功能,这个我知道啊
我想知道的是:如果同意删除,后面的语句如何写?

写clientdataset.delete 是一定不行的,那应该如何写,最简单
zhangl_cn 2006-05-20
  • 打赏
  • 举报
回复
if not messagedlg() then Abort;
zhangl_cn 2006-05-20
  • 打赏
  • 举报
回复
if messagedlg() <>ture then
DataSet.Cancel;

///////////////////////

修改一下:

if messagedlg() <>ture then Abort;
zhangl_cn 2006-05-20
  • 打赏
  • 举报
回复
if messagedlg() <>ture then
DataSet.Cancel;
sxbug 2006-05-20
  • 打赏
  • 举报
回复
楼上,我主要是想知道 then 后面的代码怎么写?
我不想用sql,这样写通用性强些
wudi_1982 2006-05-20
  • 打赏
  • 举报
回复
if MessageDlg('您确认要进行××操作吗?',mtInformation,[mbYes,mbNo],0)=mryes then

5,930

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧