Foxtable(狐表)用户栏目专家坐堂 → 求一个真正强制退出程序的代码


  共有6742人关注过本帖树形打印复制链接

主题:求一个真正强制退出程序的代码

帅哥哟,离线,有人找我吗?
flashv
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:577 积分:4596 威望:0 精华:0 注册:2013/3/3 1:52:00
求一个真正强制退出程序的代码  发帖心情 Post By:2014/6/24 22:19:00 [显示全部帖子]

在程序中,进行一些判断,如果不符合条件,就强制退出软件。

 

试了一下

 

Syscmd.Project.Exit(False)

Syscmd.Project.Exit(False)

Syscmd.Project.Exit()

basemainform.close()

 

虽然退出程序了,但是都会出现各样的“运行错误”提示窗口,提示内容大多是“无法访问已释放的对象”。

有没有一个代码,退出就是退出,没有任何提示的呢?


 回到顶部
帅哥哟,离线,有人找我吗?
flashv
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:577 积分:4596 威望:0 精华:0 注册:2013/3/3 1:52:00
  发帖心情 Post By:2014/6/24 22:35:00 [显示全部帖子]

以下是引用有点甜在2014-6-24 22:22:00的发言:

 没有强制退出的代码。除非你直接把foxtable进程给杀死。

 

 提示 无法访问已释放的对象,应该是在你的beforeCloseProject事件写有错误的代码了

 

不是错误的代码。

 

1.在项目的 AfterOpenProject 事件中,如果软件没有注册,则打开“注册”窗口。

 

2.在“注册”窗口的“确定”按钮中判断,如果注册码不正确,则退出程序。

 

3.退出程序的代码,以下几个都用过,全部是退出程序以后,弹出报错对话框。

 

Syscmd.Project.Exit(False)

Syscmd.Project.Exit(False)

Syscmd.Project.Exit()

basemainform.close()

 

提示是

 

 
图片点击可在新窗口打开查看此主题相关图片如下:2014-06-23 17-42-39.png
图片点击可在新窗口打开查看

 

如果事件中有错误代码,如何实现 第2步 中的“退出程序”呢?



 回到顶部
帅哥哟,离线,有人找我吗?
flashv
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:577 积分:4596 威望:0 精华:0 注册:2013/3/3 1:52:00
  发帖心情 Post By:2014/6/24 22:53:00 [显示全部帖子]

好,上个例子吧。

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:测试退出程序.foxdb


 回到顶部
帅哥哟,离线,有人找我吗?
flashv
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:577 积分:4596 威望:0 精华:0 注册:2013/3/3 1:52:00
  发帖心情 Post By:2014/6/24 23:23:00 [显示全部帖子]

甜师父……

 回到顶部
帅哥哟,离线,有人找我吗?
flashv
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:577 积分:4596 威望:0 精华:0 注册:2013/3/3 1:52:00
  发帖心情 Post By:2014/6/24 23:51:00 [显示全部帖子]

以下是引用有点甜在2014-6-24 23:37:00的发言:

 呃,这种情况,不能直接关闭。

 

 你用一个返回值,在afterOpenProject那里判断是否关闭,然后控制关闭吧。

算不算BUG?


 回到顶部
帅哥哟,离线,有人找我吗?
flashv
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:577 积分:4596 威望:0 精华:0 注册:2013/3/3 1:52:00
  发帖心情 Post By:2014/6/24 23:54:00 [显示全部帖子]

这个“返回值”需要是一个全局变量,或是“设置”值吧?

 回到顶部