- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]这个窗口始终屏幕最前显示代码怎么写呢？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=104408)
-- 发布时间：2017/7/28 16:33:00
-- [求助]这个窗口始终屏幕最前显示代码怎么写呢？
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:这个窗口始终屏幕最前显示.foxdb |
前辈部门看看，这个窗口始终屏幕最前显示代码怎么写的？
此主题相关图片如下：这个窗口启后，位置能靠顶边位置吗？.png
[此贴子已经被作者于2017/7/28 16:35:07编辑过]
-- 发布时间：2017/7/28 16:39:00
--
此主题相关图片如下：qq截图20170728163859.png
-- 发布时间：2017/7/28 16:45:00
--
置顶问题解决了 e.form.baseform.topmost = true
这个窗口启后，位置能靠顶边位置吗？
-- 发布时间：2017/7/28 16:52:00
--
Dim frm As Windows.Forms.Form = BaseMainForm
Dim x As Integer = frm.left + (frm.Width - e.Form.Width)/ 2
Dim y As Integer = frm.Top + (frm.height - e.Form.height)/ 2
e.Form.SetBounds(x,y,e.Form.width,e.Form.height)
上面的代码怎么改为，窗口顶部，靠屏幕顶部呢？
-- 发布时间：2017/7/28 16:55:00
--
以下是引用客人(223.73.*.*)在2017/7/28 16:45:00的发言：
置顶问题解决了 e.form.baseform.topmost = true
这个窗口启后，位置能靠顶边位置吗？
指定，要用2楼的方式设置，不然重新打开后无法置顶。
控制位置，参考
e.form.baseform.left = 0
e.form.baseform.top = 0
http://www.foxtable.com/webhelp/scr/0348.htm
[此贴子已经被作者于2017/7/28 16:55:43编辑过]
-- 发布时间：2017/7/28 17:11:00
--
可以了，非常谢谢