[讨论]openQQ 断线后自动锁屏 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [讨论]openQQ 断线后自动锁屏

共有2227人关注过本帖树形打印复制链接主题：[讨论]openQQ 断线后自动锁屏

samlzc

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：88 积分：1114 威望：0 精华：0 注册：2017/4/10 17:55:00

[讨论]openQQ 断线后自动锁屏 发帖心情

Post By：2018/7/27 22:34:00 [显示全部帖子]

我想实现openQQ 断线后自动锁屏，锁屏界面上有一个重新连接的按钮，一个是退出项目的按钮，请问如何编写好？

断线打开锁屏的代码放在那里好？

samlzc

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：88 积分：1114 威望：0 精华：0 注册：2017/4/10 17:55:00

Post By：2018/7/28 16:07:00 [显示全部帖子]

我将 Disconnected的事件写成，

ConfigBar.Items("OpenQQ").SmallImage = GetImage("offline.ico")

If e.Mode = 1 Then

Else

Forms("锁屏1").open

End If

结果ConfigBar.Items("OpenQQ").SmallImage = GetImage("offline.ico")，可以触发成功

但是窗口却不能弹出，为什么？

samlzc

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：88 积分：1114 威望：0 精华：0 注册：2017/4/10 17:55:00

Post By：2018/7/28 17:07:00 [显示全部帖子]

因为我锁屏窗口是一个按钮代码

Syscmd.Project.Exit(True)

然后发现如果自己关闭项目，然后触发 Disconnected打开窗口。点击关闭按钮后回一直循环弹出锁屏窗口。

主题：[讨论]openQQ 断线后自动锁屏