解决分割数据窗口两个水平滚动栏效果不理想的问题

呵呵，这个东西算是第一个完全是自己做的发布的程序，主要是解决当我们设置数据窗口左右分割的时候（即EXCEL的冻结），两个滚动栏都可以移动，效果不理想的问题。解决方法非常简单，呵呵，我找了一堆API想了半天还是不行，后来发现PB的几个属性就可以完成了。苯啊，舍近而求远。。。。。。
压缩包里头是一个窗口和一个数据窗口的导出文件，用PB6做的。
如果大家不想下载的话，只需要把下面的东西复制到DW的scrollhorizontol事件就可以：
int i 
i = integer(this.Object.DataWindow.HorizontalScrollSplit)
if i < 1 then return 
if pane = 1 then 
if scrollpos > 0 then
//send(handle(this),276,0,0)
  this.object.datawindow.horizontalScrollPosition = 0
end if
else
if i > scrollpos then
this.object.datawindow.horizontalScrollPosition2 = i
end if
end if
呵呵，如果想看看具体的效果和当DW分割与不分割时的区别，还是导入看看吧：） 



编译以后有问题，改成以下就可以了
int i 
if pane = 1 then 
i = integer(this.object.datawindow.horizontalscrollposition2)
  if i < 1 or isnull(i) then return 
if scrollpos > 0 then
//send(handle(this),276,0,0)
  this.object.datawindow.horizontalScrollPosition = 0
end if
else