以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- [求助]系统主窗口居中 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=115599) |
-- 作者:blsu33 -- 发布时间:2018/3/9 20:51:00 -- [求助]系统主窗口居中 老师, 如何能让系统的主窗口不管怎么最大化 最小化 变化 还原后都居中呢
|
-- 作者:有点蓝 -- 发布时间:2018/3/9 21:17:00 -- 设置代码 basemainform.setBounds((ScreenWidth - basemainform.Width) / 2, (ScreenHeight - basemainform.Height) / 2, basemainform.Width, basemainform.Height)
|
-- 作者:blsu33 -- 发布时间:2018/3/9 21:23:00 -- 放到 SIZECHANGE 不好用 为啥 |
-- 作者:有点蓝 -- 发布时间:2018/3/9 21:27:00 -- 不好用,没辙 |
-- 作者:blsu33 -- 发布时间: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编辑过]
|
-- 作者:有点蓝 -- 发布时间:2018/3/9 21:52:00 -- 不能放在sizechanged事件。做个按钮调用这个代码。可以试试在计划任务里定时判断一下位置,然后进行调整 |
-- 作者:blsu33 -- 发布时间:2018/3/9 22:00:00 -- 哦 解决了 |