Foxtable(狐表)用户栏目专家坐堂 → 并列窗口 关闭按钮 无法正常关闭并列窗口


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

主题:并列窗口 关闭按钮 无法正常关闭并列窗口

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


加好友 发短信
等级:童狐 帖子:248 积分:2889 威望:0 精华:0 注册:2017/10/15 20:04:00
并列窗口 关闭按钮 无法正常关闭并列窗口  发帖心情 Post By:2021/4/26 19:10:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:1619435353(1).jpg
图片点击可在新窗口打开查看
窗口类型为并列,并用论坛里提供的功能,在每个TAPPAGE上都打开了关闭按钮,正常使用,点每个TAP上的X按钮是可以关闭的,可当我使用动态设置的并列窗口的E.FORM.TEXT="新窗口名称” 一旦设置了,再击点TAPPAGE上的X按钮则无法正常关闭

图片点击可在新窗口打开查看此主题相关图片如下:1619435328(1).jpg
图片点击可在新窗口打开查看


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


加好友 发短信
等级:童狐 帖子:248 积分:2889 威望:0 精华:0 注册:2017/10/15 20:04:00
  发帖心情 Post By:2021/4/26 19:10:00 [只看该作者]

Public Sub _TabPageClosing(sender As Object, e As C1.Win.C1Command.TabPageCancelEventArgs)'页面关闭按钮点击事件
Dim name =  e.TabPage.Text
If name = "主页"  Then
    e.Cancel = True
Else
    Forms(e.TabPage.Text).Close
    e.cancel = True
End If
End Sub
'以上为页面关闭按钮点击事件


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


加好友 发短信
等级:童狐 帖子:248 积分:2889 威望:0 精华:0 注册:2017/10/15 20:04:00
  发帖心情 Post By:2021/4/26 19:11:00 [只看该作者]

    Dim MainTab As C1Command.C1DockingTab = BaseMainform.Controls("MainPages")
    Dim FormTab As C1Command.C1DockingTab = MainTab.TabPages(0).controls(0)
    FormTab.CanCloseTabs = True
    FormTab.CloseBox = 1
    Formtab.CanAutoHide = True
    AddHandler Formtab.TabPageClosing, AddressOf _TabPageClosing
    '以上代码为给并列窗口增加关闭按钮

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


加好友 发短信
等级:超级版主 帖子:106816 积分:543281 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/4/26 20:38:00 [只看该作者]

新版不在支持这种非常规用法,建议在窗口里添加关闭按钮退出

 回到顶部