递归火山软件开发平台

标题: 程序_延时_内核 [打印本页]

作者: 乐易论坛 时间: 2024-9-15 21:22
标题: 程序_延时_内核
程序_延时_内核

<火山程序类型 = "通常" 版本 = 1 />
方法程序_延时_内核 <公开静态类型 = 逻辑型注释 = "不占用cpu，窗口不卡死，不影响其它代码执行" @禁止流程检查 = 真 @输出名 = "SleepByNt">
参数参_延时间隔 <类型 = 整数注释 = "1000毫秒 = 1秒留空为不等待" @默认值 = -1>
{
变量局_真实时间 <类型 = 长整数 @输出名 = "dwMilliseconds">
@ typedef INT_P (WINAPI* ZwDelayExecution)(
@ BOOL bAlertable,
@ PLARGE_INTEGER dwMilliseconds
@ );
@ HMODULE timeNTDLL = GetModuleHandle(L"ntdll"); //取出NTDLL的句柄
@ ZwDelayExecution pZwDelayExecution = (ZwDelayExecution)::GetProcAddress(timeNTDLL, "ZwDelayExecution");
局_真实时间 = -参_延时间隔 * 10000
@ return pZwDelayExecution(false,(PLARGE_INTEGER)&dwMilliseconds) == 0;
}

复制代码

作者: yuangao 时间: 2024-9-15 22:28

程序_延时_内核 (5000)
// 界面延时 (5000)
标签1.标题 = "不卡死"

貌似窗口也卡住的，新手还请谅解。

作者: Xelloss0618 时间: 2024-9-15 22:37

yuangao 发表于 2024-9-15 22:28
程序_延时_内核 (5000)
// 界面延时 (5000)
标签1.标题 = "不卡死"

Sleep （普通延时）函数的实现会调用到 ZwDelayExecution，所以这玩意的作用根本不是界面延时。

作者: yuangao 时间: 2024-9-15 23:25

Xelloss0618 发表于 2024-9-15 22:37
Sleep （普通延时）函数的实现会调用到 ZwDelayExecution，所以这玩意的作用根本不是界面延时。 ...

感谢，大佬的解释。

作者: 乐易论坛 时间: 2024-9-15 23:48

yuangao 发表于 2024-9-15 22:28
程序_延时_内核 (5000)
// 界面延时 (5000)
标签1.标题 = "不卡死"

这个不卡死的的说法是从易语言的延时延伸过来的主要指的是不暂停程序运行..:噜阿噜备注啥的直接复制的懒得改了...

作者: yuangao 时间: 2024-9-17 08:41

乐易论坛发表于 2024-9-15 23:48
这个不卡死的的说法是从易语言的延时延伸过来的主要指的是不暂停程序运行..:噜阿噜备注啥的直接复 ...

好，好，明白

作者: ziyoulang168 时间: 4 小时前
论坛里的这个复制代码不能用,请后台调配下@飞翔的企鹅 (, 下载次数: 0)

欢迎光临递归火山软件开发平台 (https://bbs.voldp.com/)