PB中如何实现延时呀？

[zw3214]

例如：在按钮的click事件中，执行了一锻代码后，想延时5秒再执行下面的代码，该如何实现？

[hygougou]

高版本用　

sleep()

[hygougou]

This example pauses the application for 5 seconds:

Sleep ( 5 )


低版本可用该函数

//*******************************************************************************//
// Function : 延时函数
//
// Parameter : ac_DelaySecs 需延时的秒数(可为小数)
//
// Return :
//
// Author : Rocky
// Created :
// Modified :
// Log :
//*******************************************************************************//

IF ac_DelaySecs <= 0 THEN RETURN

long ll_CPUTime

ll_CPUTime = CPU()

DO WHILE CPU() - ll_CPUTime < ac_DelaySecs * 1000
LOOP

RETURN

[zw3214]

多高版本？

[hygougou]

8,９吧

具体记得不太清了

[hygougou]

奇怪，自己怎么不先试？

[zw3214]

sorry！主要不是我要用，有个朋友昨天问我，我也不晓得他是用的什么版本的pb，呵呵！

[zw3214]

非常感谢！结帖了！