首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > PB >

数据窗口,该如何解决

2013-01-06 
数据窗口数据窗口显示数据行数太多,想在time写个自动翻页,long ll_row,ll_crow,ll_rowsll_crowlong(dw_2.

数据窗口
数据窗口显示数据行数太多,想在time写个自动翻页,
long ll_row,ll_crow,ll_rows
ll_crow=long(dw_2.describe("evaluate('page()',"+string(dw_2.getrow())+")"))
ll_rows = long(dw_2.object.datawindow.lastrowonpage)  
if ll_crow < ll_rows then
dw_2.ScrollNextPage()
else
dw_2.ScrollToRow(1)
end if
用这段代码翻到最后一页时不能返回到第一页,请问问题出在什么地方,怎么改?谢谢
[解决办法]
long ll_row,ll_crow,ll_rows
ll_crow=long(dw_2.describe("evaluate('page()',"+string(dw_2.getrow())+")"))ll_rows = long(dw_2.object.datawindow.lastrowonpage)   
if ll_crow < ll_rows then 
dw_2.ScrollNextPage() 
else 
dw_2.ScrollToRow(1)
end if

你的ll_crow应该得到的是当行前在第几页吧 ,ll_crow应该小于ll_rows,

所以就不行执行 dw_2.scrolltorow(1)

你用下面的代码试一下
long ll_row,ll_crow,ll_rows

ll_rows = long(dw_2.object.datawindow.lastrowonpage) 
ll_crow=dw_2.rowcount()
if ll_crow> ll_rows then 
dw_2.ScrollNextPage() 
else 
dw_2.ScrollToRow(1)
end if

热点排行