我新建一个窗口,在窗口上添加一些控件,该怎么做才能让它随着窗口的缩放而缩放啊?????
5 Resize服务
概要
PFC的resize服务提供了当用户改变窗口的大小、Tab页的大小时可以自动移动控件、改变控件大小的函数。该服务允许你当窗口、Tab页大小改变时控制其中的控件的移动、大小变化等。它对应的对象是n_cst_resize 。
你可以使用n_cst_dwsrv_resize对象实现DataWindow的resize服务。
使用说明:
使用该服务控制窗口的大小变化。
开启Resize服务:
l_ 调用w_master、u_tab、u_tabpg的of_SetResize函数:
this.of_SetResize(TRUE)
PFC会自动的删除所有的服务。
注册需要resize的控件:
l_ 调用函数of_Register指定控件应该如何相应窗口、Tab页的resize 。注册时需要说明当发生resize时应该移动多少,大小变化的比例是多少。下面的例子使得DataWindow控件向下、向右扩展。
This.inv_resize.of_Register(dw_emplist, 0, 100, 100, 100)
设置Resize的下限:
l_ 调用函数of_SetMinSize设置大小的下限。你可以将该代码放在窗体的Open事件中指定下限小于当前大小一点。
Integer li_return
Li_return = this.inv_resize.of_SetMinSize(this.width ?200, this.hei
ght - 150)
在带有表单的MDI应用程序中使用resize服务:
l_ 采用如下方法之一:
l_ 以表单原大小打开:
OpenSheet(w_emp, 搘_emplist? w_frame, 0, Original!)
l_ 如果你使用其他的枚举变量。那么在控件进行resize服务的注册之间调用函数
of_SetOrigSize 。调用函数of_SetOrigSize时传递工作空间的宽度、高度为参数。
This.inv_resize.of_SetOrigSize(1200, 1000)