精易模块 程序_延时 在高次数循环里感觉反应迟钝啊

┈┾莪

精易模块   程序_延时 在高次数循环里感觉反应迟钝啊
通过百度找到了个这样的源码
.版本 2

.子程序 程序_延时, , , //
.参数 延时间隔, 整数型, , //
.局部变量 时间句柄, 整数型
.局部变量 时间, LARGE_INTEGER

处理事件 ()
时间.QuadPart ＝ -10 × 延时间隔 × 1000
时间句柄 ＝ CreateWaitableTimerA (0, 假, 0)
SetWaitableTimer (时间句柄, 时间, 0, 0, 0, 假)
.判断循环首 (MsgWaitForMultipleObjects (1, 时间句柄, 假, -1, 255) ≠ 0)
    处理事件 ()
.判断循环尾 ()
CloseHandle (时间句柄)
处理事件 ()

.版本 2

.数据类型 LARGE_INTEGER
    .成员 QuadPart, 长整数型, , , 占用8个字节

.版本 2

.DLL命令 CloseHandle, 逻辑型, , "CloseHandle", , 关闭一个内核对象。
    .参数 对象句柄, 整数型, , 欲关闭对象的句柄;


.版本 2

.DLL命令 SetWaitableTimer, 整数型, , "SetWaitableTimer"
    .参数 hTimer, 整数型
    .参数 pDueTime, LARGE_INTEGER
    .参数 lPeriod, 整数型
    .参数 pfnCompletionRoutine, 整数型
    .参数 lpArgToCompletionRoutine, 整数型
    .参数 fResume, 逻辑型

.DLL命令 CreateWaitableTimerA, 整数型, , "CreateWaitableTimerA"
    .参数 lpTimerAttributes, 整数型
    .参数 bManualReset, 逻辑型
    .参数 lpTimerName, 整数型

.DLL命令 MsgWaitForMultipleObjects, 整数型, , "MsgWaitForMultipleObjects"
    .参数 nCount, 整数型
    .参数 pHandles, 整数型, 传址
    .参数 fWaitAll, 逻辑型
    .参数 dwMilliseconds, 整数型
    .参数 dwWakeMask, 整数型

renxinmi

{:soso__243768207940266248_3:}   能用不就好了 卡顿无所谓   

┈┾莪

精易模块开发组 发表于 2014-5-19 00:04
有什么区别，一样的代码

反正在很高次数的循环中会出现卡顿现象

缘水禅心

精易模块开发组

有什么区别，一样的代码