admin管理员组

文章数量:1122850

PB

原理：在线程中调用pb数据窗口进行retrieve

pb代码：

// 动态库函数定义
function ulong pb_retrieve(datawindow dw,...) system library "easypj.dll" alias for "pb_retrieve"
function ulong pb_cancel(datawindow dw) system library "easypj.dll" alias for "pb_cancel"
// 查询按钮代码
st_s.text ='0'
timer(1)pb_retrieve(dw_1)

// timer代码
long ll_zhs,ll_rt
ll_zhs = long(st_all.text)
if(ll_zhs = 0) thentimer(0)
elsest_s.text =string( long(st_s.text ) + 1)ll_rt = dw_1.rowcount()st_psd.text = string(ll_rt / long(st_s.text) )st_sd.text = string( ll_rt - long(st_done.text) )st_done.text = string(ll_rt)st_sy.text = string(ll_zhs - ll_rt)if ll_zhs = ll_rt then timer(0)hpb_1.Position = ll_rt* 100 / ll_zhs
end if

效果:

 

datawindow后台检索

 

 

本文标签： PB

版权声明：本文标题：PB 内容由网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：http://www.betaflare.com/biancheng/1705057738a638584.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。