如果数据窗口已设置显示水平分隔条(即hsplitscroll=true),在调用数据窗口setfullstate后会出现双滚动条,界面出现一定的零乱。为解决该问题,可以在调用setfullstate后重新设置一下hsplitscroll属性,双滚动条就会消失。
以下是笔者自定义的of_setfullstate函数,建立在数据窗口祖先中,你可以使用of_setfullstate代替PB自带的setfullstate函数,你也可以以类似的代码重载setfullstate函数。
/*******************************************************************
函数名称:of_setfullstate()
参数: ablb_fullstate blob 数据窗口完整状态
返回值: long 是否成功(1表示成功,-1表示失败)
功能描述:设置数据窗口完整状态
创建人: 康剑民
创建日期:2006-07-27
版本号: V1.0
*******************************************************************/
long ll_return
boolean lb_hsplitscroll
ll_return = this.setfullstate(ablb_fullstate)
//如果设置hsplitscroll=true,PB在调用setfullstate后会出现双滚动条,使用下面的代码可以消除双滚动条
lb_hsplitscroll = this.hsplitscroll
if lb_hsplitscroll then
this.hsplitscroll = false
this.hsplitscroll = true
end if
return ll_return
写作日期:2006-07-27