Foxtable(狐表) → 用户栏目 → 专家坐堂 → 模式窗口最小化问题


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

主题：模式窗口最小化问题
帅哥哟，离线，有人找我吗？
实话实说
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2649 积分：19390 威望：0 精华：1 注册：2008/9/12 9:19:00 		模式窗口最小化问题  发帖心情 Post By：2021/7/21 12:05:00 [显示全部帖子]

由A,B两个模式窗口，已经关闭了系统菜单，在窗口的AfterLoad事件中加载了如下代码，结果来回切换A，B窗口时，任务栏重复出现最小化的A，B窗口。
试了一下，代码放在项目事件中不起作用
e.form.baseform.showintaskbar = True '最小化到任务栏
[此贴子已经被作者于2021/7/21 12:05:56编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
实话实说
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2649 积分：19390 威望：0 精华：1 注册：2008/9/12 9:19:00 		  发帖心情 Post By：2021/7/21 13:50:00 [显示全部帖子]

刚才又试了一下，将 e.form.baseform.showintaskbar = False 代码放在关闭窗口的事件中可以满足要求，但发现一个问题，反复切换【按钮A】和【按钮B】，窗口明显得闪，窗口A或窗口B并没有关闭，而是重复打开。
【按钮A】代码
e.Form.baseform.Close '关闭当前窗口
e.Form.baseform.opacity = 0
Forms("按钮A").open()
【按钮B】代码
e.Form.baseform.Close '关闭当前窗口
e.Form.baseform.opacity = 0
Forms("按钮B").open()
 回到顶部
帅哥哟，离线，有人找我吗？
实话实说
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2649 积分：19390 威望：0 精华：1 注册：2008/9/12 9:19:00 		  发帖心情 Post By：2021/7/21 14:03:00 [显示全部帖子]

独立窗口得系统菜单如何隐藏？以下项目事件代码还有效吗？
Dim a As object = BaseMainForm.controls("C1Ribbon1")
a.Visible = not a.visible

另外，如何避免打开和关闭模式窗口时得闪动
[此贴子已经被作者于2021/7/21 14:16:49编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
实话实说
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2649 积分：19390 威望：0 精华：1 注册：2008/9/12 9:19:00 		  发帖心情 Post By：2021/7/21 14:25:00 [显示全部帖子]

改为独立窗口关闭不了菜单系统。请老师看看实例，模式窗口闪动得问题有什么解决办法
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:项目进度(单机版).zip



[此贴子已经被作者于2021/7/21 14:25:19编辑过]
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03906 秒, 6 次数据查询