Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]模式窗口最大化的问题


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

主题：[求助]模式窗口最大化的问题
帅哥哟，离线，有人找我吗？
dxjwlf
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：261 积分：2195 威望：0 精华：0 注册：2015/5/15 14:51:00 		[求助]模式窗口最大化的问题  发帖心情 Post By：2015/11/15 9:44:00 [只看该作者]

模式窗口最大化后，任务栏被遮盖了。。能不能最大化后还可以看见任务栏。也就是最大化后和任务栏一起组成界面 。代码怎么写？

 回到顶部
帅哥哟，离线，有人找我吗？
游
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：321 积分：1916 威望：0 精华：0 注册：2014/8/24 13:36:00 		  发帖心情 Post By：2015/11/15 10:14:00 [只看该作者]

最大化时获取屏幕尺寸

 

再设置窗口的最大尺寸
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/11/15 10:15:00 [只看该作者]

你把窗口的边框去掉了？

 

用代码控制窗口大小即可，如

 

e.Form.BaseForm.Width = SysInfo.WorkingAreaWidth

e.Form.BaseForm.Height = SysInfo.WorkingAreaHeight

 

http://www.foxtable.com/help/topics/0348.htm

 
 回到顶部
帅哥哟，离线，有人找我吗？
dxjwlf
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：261 积分：2195 威望：0 精华：0 注册：2015/5/15 14:51:00 		[求助]模式窗口最大化的问题  发帖心情 Post By：2015/11/15 10:16:00 [只看该作者]

不明白。。。还有如何写代码。

 回到顶部
帅哥哟，离线，有人找我吗？
dxjwlf
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：261 积分：2195 威望：0 精华：0 注册：2015/5/15 14:51:00 		[求助]模式窗口最大化的问题  发帖心情 Post By：2015/11/15 10:18:00 [只看该作者]

谢谢大红袍。。。ft界面太不好看了。想设计漂亮的界面。

 回到顶部
帅哥哟，离线，有人找我吗？
dxjwlf
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：261 积分：2195 威望：0 精华：0 注册：2015/5/15 14:51:00 		[求助]模式窗口最大化的问题  发帖心情 Post By：2015/11/15 10:28:00 [只看该作者]

大红袍：  还是没有弄明白。 我想要模式窗口最大化后，能留下任务栏。而这是工作区，不一样。

 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/11/15 11:23:00 [只看该作者]

以下是引用dxjwlf在2015/11/15 10:28:00的发言：
大红袍：  还是没有弄明白。 我想要模式窗口最大化后，能留下任务栏。而这是工作区，不一样。

 

那你就不要去掉窗口的边框。
 回到顶部
帅哥哟，离线，有人找我吗？
游
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：321 积分：1916 威望：0 精华：0 注册：2014/8/24 13:36:00 		  发帖心情 Post By：2015/11/15 12:31:00 [只看该作者]

要设置的是窗口的最大尺寸，

 

在发出最大化指令前，或直接绑定对应的事件
 回到顶部
帅哥哟，离线，有人找我吗？
dxjwlf
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：261 积分：2195 威望：0 精华：0 注册：2015/5/15 14:51:00 		你看我的可以不  发帖心情 Post By：2016/9/18 17:17:00 [只看该作者]

Dim a As Integer = (ScreenWidth-1280)/2
Dim b As Integer = (ScreenHeight-720)/2
If e.Form.BaseForm.Width = 1280 Then
e.Form.SetBounds(0,0,ScreenWidth,WorkingAreaHeight)
e.Sender.Text = "◎"
Else e.Form.SetBounds( a ,b,1280,720)
e.Sender.Text = "□"
End If
 回到顶部
帅哥，在线噢！
有点蓝
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110597 积分：562881 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2016/9/18 17:20:00 [只看该作者]

自己测试觉得可以那就可以了

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 4 次数据查询