如何设置状态条的位置??
我在主窗体上创建了一个状态条用户对象uo_2(已封装好的)
主窗体类型为mdihelp
运行后状态条出现在窗体中间而不是在底部
不知道该如何设置?
问题点数:60、回复次数:9Top
1 楼wangxichen() 喜之郎 : )回复于 2004-09-03 14:07:33 得分 0
// 通过GetEnvironment函数获得当前屏幕的尺寸,然后把uo_2居中
long ll_height, ll_width
Environment lenv
if GetEnvironment(lenv)=1 then
ll_height = PixelsToUnits(lenv.ScreenHeight, yPixelsToUnits!)
ll_width = PixelsToUnits(lenv.ScreenWidth, xPixelsToUnits!)
uo_2.y = ( ll_height - uo_2.height ) / 2
uo_2.x = ( ll_width - uo_2.width ) / 2
end ifTop
2 楼sodwto(智茵)回复于 2004-09-03 14:09:05 得分 0
你用main窗体试试Top
3 楼sodwto(智茵)回复于 2004-09-03 14:11:30 得分 0
不对用mdiTop
4 楼qianduo(flyinsky)回复于 2004-09-03 14:12:49 得分 20
在主窗体里的resize里面
uo_statusbar.Width = This.WorkSpaceWidth()
uo_statusbar.Height = 72
uo_statusbar.X = 0
uo_statusbar.Y = This.WorkSpaceHeight() - uo_statusbar.HeightTop
5 楼wjlforever()回复于 2004-09-03 14:42:02 得分 0
把你的Email给我,我给你一个!
等你Top
6 楼sodwto(智茵)回复于 2004-09-03 15:12:25 得分 0
你看一下uo_2里有没有类似resize 自定义的事件Top
7 楼wjlforever()回复于 2004-09-03 16:51:13 得分 40
在w_main 的resize 中
long lng_height,lng_width
integer int_part
lng_height = this.workspaceheight()
lng_width = this.workspacewidth()
//配置状态栏的位置
uo_1.x = 0
uo_1.y = this.workspaceheight()+mdi_1.height+30
uo_1.width = lng_width + 4
uo_1.object.line_1_u.x2=uo_1.width
uo_1.line_1_d.x2=uo_1.widthTop
8 楼wjlforever()回复于 2004-09-03 16:52:59 得分 0
uo_2Top
9 楼dail2(碎南瓜)回复于 2004-09-03 22:34:33 得分 0
不好意思
刚下午突然断网了
已经自行解决这问题了
不过还是感谢楼上几位
而且楼上几位的思路相当好
^_^
Top




