Foxtable(狐表)用户栏目专家坐堂 → [求助]系统主窗口居中


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

主题:[求助]系统主窗口居中

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


加好友 发短信
等级:九尾狐 帖子:2927 积分:20161 威望:0 精华:0 注册:2012/2/3 17:45:00
[求助]系统主窗口居中  发帖心情 Post By:2018/3/9 20:51:00 [只看该作者]

老师,
  如何能让系统的主窗口不管怎么最大化 最小化 变化 还原后都居中呢

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


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

设置代码

basemainform.setBounds((ScreenWidth - basemainform.Width) / 2, (ScreenHeight - basemainform.Height) / 2, basemainform.Width, basemainform.Height)

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


加好友 发短信
等级:九尾狐 帖子:2927 积分:20161 威望:0 精华:0 注册:2012/2/3 17:45:00
  发帖心情 Post By:2018/3/9 21:23:00 [只看该作者]

放到 SIZECHANGE  不好用 为啥

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


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

不好用,没辙

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


加好友 发短信
等级:九尾狐 帖子:2927 积分:20161 威望:0 精华:0 注册:2012/2/3 17:45:00
  发帖心情 Post By:2018/3/9 21:31:00 [只看该作者]

2楼代码 没效果 您的意思  没有办法了?

AfterOpenProject


'界面隐藏开始

Dim ribbon As C1.Win.C1Ribbon.C1Ribbon = baseMainForm.Controls("C1Ribbon1")

ApplicationMenu.visible= False

Ribbon.hide

TableCaptionVisible =0'菜单隐藏

baseMainForm.ControlBox= True'控制按钮显示

basemainform.text = "企业管理软件"'控制台标题


采用的这种方式 主窗口

[此贴子已经被作者于2018/3/9 21:31:38编辑过]

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


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

不能放在sizechanged事件。做个按钮调用这个代码。可以试试在计划任务里定时判断一下位置,然后进行调整

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


加好友 发短信
等级:九尾狐 帖子:2927 积分:20161 威望:0 精华:0 注册:2012/2/3 17:45:00
  发帖心情 Post By:2018/3/9 22:00:00 [只看该作者]

哦 解决了

 回到顶部