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


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

主题:[求助]主窗口还原居中

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


加好友 发短信
等级:九尾狐 帖子:2927 积分:20167 威望:0 精华:0 注册:2012/2/3 17:45:00
[求助]主窗口还原居中  发帖心情 Post By:2016/1/4 16:17:00 [只看该作者]

红袍老师,
 主窗口还原怎么让居中
AfterOpenProject


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

ApplicationMenu.visible= False
Ribbon.hide
TableCaptionVisible = 0
baseMainForm.MinimizeBox = True
baseMainForm.MaximizeBox =True
baseMainForm.ControlBox= True
baseMainForm.WindowState =0

MainTable = Tables("表A")

'
Forms("合成").Open

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


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

baseMainForm.Top = (SysInfo.ScreenHeight - baseMainForm.height) / 2
baseMainForm.left = (SysInfo.ScreenWidth - baseMainForm.width) / 2

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


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

老师 ,
  写在哪,怎么没有变化?

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


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

SizeChanged

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


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

代码没有问题,只要执行了代码,就会居中。

 回到顶部