起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 170|回复: 4

【结】PageControl的页面切换问题[请求]

[复制链接]
发表于 2010-5-4 17:03:50 | 显示全部楼层 |阅读模式
procedure TBASIC_TABLE_FORMDOC.PageControl1Changing(Sender: TObject; var AllowChange: Boolean);
begin
  //判断页面转换条件
  if (PageControl1.ActivePage=TabSheet1) then
  begin
    if DataSetBroker_JOBS_TABLE_DETAL.DataSet.UpdatesPending then
    begin
      AllowChange := false;
      JsDialogs.ShowMsg('数据已更改,请先保存数据,再切换页面!','提示');
      SysUtils.Abort;
    end
    else
    begin
      AllowChange := true;
    end;
  end;
end;
当当前也数据有更新,但没有保存的情况下,我点击了其他页,提示框出来了,点确定后,却跳到了点后的页面,请问是哪里出错了吗?

qq截图未命名.jpg

50.26 KB, 下载次数: 92

回复

使用道具 举报

发表于 2010-5-5 08:22:25 | 显示全部楼层
呵呵,我没有测试,你在 JsDialogs.ShowMsg('数据已更改,请先保存数据,再切换页面!','提示'); 后面加上 AllowChange := False; 这句试试
回复 支持 反对

使用道具 举报

 楼主| 发表于 2010-5-5 09:43:27 | 显示全部楼层
JsDialogs.ShowMsg('数据已更改,请先保存数据,再切换页面!','提示');这句去掉就没事了,结
回复 支持 反对

使用道具 举报

发表于 2010-5-5 09:57:41 | 显示全部楼层
不会呀,我测试,JsDialogs 这句肯定不会影响到切换的,这仅仅是个显示的语句,你把  SysUtils.Abort;   这句取消就可以了
回复 支持 反对

使用道具 举报

 楼主| 发表于 2010-5-5 17:00:41 | 显示全部楼层
我是你说的那样做的,上面是笔误,呵呵
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-7-10 02:25 , Processed in 0.039207 second(s), 19 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表