我写了一个进度条程序,首先打开窗口:
在窗口的OPEN事件中写下:time(1)
然后在timer事件中写下:
DECLARE ....
OPEN.....
FETCH....
DO WHILE
数据库操作。。。。。
update 。。。
hpb_1.StepIt( )
FETCH
LOOP
由于数据库目前的数据较少,执行很快,我的疑问是:
如果time事件中的程序没有执行完成,会执行下一个time事件吗?
------解决方案--------------------
感觉不会执行下一个Timer事件,建议楼主不要在Timer事件里写太复杂的代码
------解决方案--------------------
同一窗口只有一个定时器。
要定义多个定时器,要用timing 对象。。。
------解决方案--------------------
不会
我timer(1)
下面代码执行要5秒,listbox里的值是:
10:59:40 -- 10:59:45
10:59:45 -- 10:59:50
10:59:50 -- 10:59:55
----说明是一次循环结束,才开始新循环!因为,如果会重开timer,值应该是:
10:59:40 -- 10:59:45
10:59:41 -- 10:59:46
10:59:42 -- 10:59:47
string ls_1,ls_2
time ldt_1
long ii,j
ldt_1 = now()
for j = 1 to 5
for ii = 1 to 5000
ls_2 = ls_2 + '1111111111'
next
ls_1 = ls_1 + ls_2
ls_2 = ''
next
lb_1.additem(string(ldt_1) + "," + string(now()))