PB如何让数据窗口可以一分为2,中间出现一条分隔线,分隔线右边可以随便拉动,左边固定,方便数据窗口列比较多,且要查看左边的某些数据用.

PB如何让数据窗口可以一分为2,中间出现一条分隔线,分隔线右边可以随便拉动,左边固定,方便数据窗口列比较多,且要查看左边的某些数据用.一把数据窗口的HSplitScroll属性选中,二在dw控件的constructor事件中写如下代码设置那些列固定不动.intli_posli_pos=integer(this.describe("code.width"))+i…

大家好,欢迎来到IT知识分享网。PB如何让数据窗口可以一分为2,中间出现一条分隔线,分隔线右边可以随便拉动,左边固定,方便数据窗口列比较多,且要查看左边的某些数据用.



一 把数据窗口的HSplitScroll属性选中,


二 在dw控件的constructor事件中 写如下代码设置那些列固定不动.


int li_pos


li_pos=integer(this.describe(“code.width”))+integer(this.describe(“wo_code.x”))+20


//code为dw控件中dataobject中的某列名.以该列为分界线把数据窗口分为2部分,左边的固定不变右边可以拉动.


this.Object.DataWindow.HorizontalScrollSplit=li_pos


三 然后在dw的scrollhorizontal事件中 写代码处理点击滚动条的处理.


Int i


IF pane = 1 THEN


 i = Integer(This.Object.datawindow.horizontalscrollposition2)


 IF i < 1 Or IsNull(i) THEN RETURN


 IF scrollpos > 0 THEN


  This.Object.datawindow.horizontalScrollPosition = 0


 END IF


ELSE


 i = Integer(This.Object.datawindow.HorizontalScrollSplit)


 IF i < 1 Or IsNull(i) THEN RETURN


 IF i > scrollpos THEN


  This.Object.datawindow.horizontalscrollposition2 = i


 END IF


END IF

免责声明:本站所有文章内容,图片,视频等均是来源于用户投稿和互联网及文摘转载整编而成,不代表本站观点,不承担相关法律责任。其著作权各归其原作者或其出版社所有。如发现本站有涉嫌抄袭侵权/违法违规的内容,侵犯到您的权益,请在线联系站长,一经查实,本站将立刻删除。 本文来自网络,若有侵权,请联系删除,如若转载,请注明出处:https://yundeesoft.com/34197.html

(0)

相关推荐

发表回复

您的电子邮箱地址不会被公开。 必填项已用 * 标注

关注微信