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


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

主题:最小化问题

帅哥,在线噢!
有点蓝
  31楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105961 积分:538880 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/10/21 9:12:00 [只看该作者]

1、无法设置提示文字

2、需要判断。记得!!!所有在窗口外部使用到窗口的都需要判断窗口是否已经打开。

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


加好友 发短信
等级:八尾狐 帖子:1989 积分:12631 威望:0 精华:0 注册:2017/4/3 15:01:00
  发帖心情 Post By:2017/10/21 9:18:00 [只看该作者]

Public Sub BaseMainform_Resize(ByVal sender As System.Object, ByVal e As System.EventArgs) 
If forms("主窗体").Opened Then
    If sender.WindowState = 1 Then
        forms("主窗体").baseform.Opacity = 0
        forms("主窗体").baseform.ShowInTaskBar = False
    Else
        forms("主窗体").baseform.Opacity = 1
        forms("主窗体").baseform.ShowInTaskBar = True
    End If
End Sub
  End If
这句代码这样判断对吗?

 回到顶部
帅哥,在线噢!
有点蓝
  33楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105961 积分:538880 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/10/21 9:25:00 [只看该作者]

Public Sub BaseMainform_Resize(ByVal sender As System.Object, ByVal e As System.EventArgs) 
If forms("主窗体").Opened Then
    If sender.WindowState = 1 Then
        forms("主窗体").baseform.Opacity = 0
        forms("主窗体").baseform.ShowInTaskBar = False
    Else
        forms("主窗体").baseform.Opacity = 1
        forms("主窗体").baseform.ShowInTaskBar = True
    End If
else
forms("主窗体").Open
  End If
End Sub


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


加好友 发短信
等级:八尾狐 帖子:1989 积分:12631 威望:0 精华:0 注册:2017/4/3 15:01:00
  发帖心情 Post By:2017/10/21 9:39:00 [只看该作者]

当主窗体时关闭状态的时候双击托盘图标后主窗体可以弹出了不过是在其他程序窗体的后面怎样设置为只要主窗体打开就在所有窗体的前面呢?

图片点击可在新窗口打开查看此主题相关图片如下:999.png
图片点击可在新窗口打开查看


 回到顶部
帅哥,在线噢!
有点蓝
  35楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105961 积分:538880 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/10/21 9:45:00 [只看该作者]

参考:http://www.foxtable.com/webhelp/scr/2713.htm

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


加好友 发短信
等级:八尾狐 帖子:1989 积分:12631 威望:0 精华:0 注册:2017/4/3 15:01:00
  发帖心情 Post By:2017/10/21 9:51:00 [只看该作者]

蓝老师我看不懂什么意思,我将主窗体打开后置顶也不行,是怎么设置一下
[此贴子已经被作者于2017/10/21 9:50:54编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  37楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105961 积分:538880 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/10/21 10:10:00 [只看该作者]

Public Sub BaseMainform_Resize(ByVal sender As System.Object, ByVal e As System.EventArgs) 
If forms("主窗体").Opened Then
    If sender.WindowState = 1 Then
        forms("主窗体").baseform.Opacity = 0
        forms("主窗体").baseform.ShowInTaskBar = False
    Else
        forms("主窗体").baseform.Opacity = 1
        forms("主窗体").baseform.ShowInTaskBar = True
ShowAppWindow("主窗体",1)
    End If
else
forms("主窗体").Open
ShowAppWindow("主窗体",1)
  End If
End Sub

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


加好友 发短信
等级:八尾狐 帖子:1989 积分:12631 威望:0 精华:0 注册:2017/4/3 15:01:00
  发帖心情 Post By:2017/10/21 12:46:00 [只看该作者]

蓝老师这样不起作用 看看是不是我设置的问题?

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:调试.rar


[此贴子已经被作者于2017/10/21 13:54:13编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  39楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105961 积分:538880 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/10/21 14:05:00 [只看该作者]

测试没有问题

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


加好友 发短信
等级:八尾狐 帖子:1989 积分:12631 威望:0 精华:0 注册:2017/4/3 15:01:00
  发帖心情 Post By:2017/10/21 14:25:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:录像28.rar


这是截图您看看

这是打开程序的打开窗体

图片点击可在新窗口打开查看此主题相关图片如下:201710219384469571.png
图片点击可在新窗口打开查看

[此贴子已经被作者于2017/10/21 14:30:15编辑过]

 回到顶部
总数 91 上一页 1 2 3 4 5 6 7 8 9 10 下一页