SleepW9

SleepW9

SleepW9(n)

Макрос позволяет установить меньший интервал ожидания чем у стандартной функции sleep. Она попросту пропускает лишние остановки функции Sleep.

n - Число, на которое делится 1 миллисекунда, результатом макроса будет их частное от деления.

 Так если установить

• SleepW9(1) =  1 миллисекунда
• SleepW9(2) =  1/2 миллисекунды.
• SleepW9(3) =  1/3 миллисекунды.
• И так далее...

Может использоваться для функций WindowEvent, TheardCreate, Settimer и др.

Пример:

#Include "window9.bi"
Print "sleepW9=";
Var d=0
Var t=Timer
Do
 d+=1
 sleepw9(10)
Loop Until d=1000
t=Timer-t
? t
Print "original sleep=";
d=0
t=Timer
Do
 d+=1
 sleep(1)
Loop Until d=1000
t=Timer-t
? t
Sleep

http://mneniya.ucoz.ru/

Created with the Personal Edition of HelpNDoc: Full-featured Kindle eBooks generator