SetWaitableTimer使用方法之:如何使用setwaitabletimer每个1秒发送一次信号

本文介绍了一个使用Windows API中的CreateWaitableTimer函数创建可等待定时器的例子。该定时器每秒触发一次,并通过控制台输出提示信息。文章展示了如何设置自动重置定时器并循环等待其触发。

摘要生成于 C知道 ,由 DeepSeek-R1 满血版支持, 前往体验 >

// waitabletimer.cpp : 定义控制台应用程序的入口点。
//

#include "stdafx.h"
#include <Windows.h>
#include <iostream>
using namespace std;

int _tmain(int argc, _TCHAR* argv[])
{
 HANDLE hTimer;
 LARGE_INTEGER perTime;
 perTime.QuadPart=-1000000;
 hTimer=CreateWaitableTimer(NULL,FALSE,NULL);//自动重置
 SetWaitableTimer(hTimer,&perTime,1000,NULL,NULL,TRUE);//1000代表每个1秒发送一个信号,如果为0则只发送一次信号
 while (1)
 { 
  WaitForSingleObject(hTimer,INFINITE);
  cout<<"主线程时间到了\n";
 }

 cin.get();
 return 0;
}

 

在Delphi中自定义一个能够控制发送指令间隔延迟10微的线程,你需要深入了解底层线程管理以及操作系统API。以下是一种可能的做法,涉及到使用Windows API的`CreateThread`函数和`SetThread准时器`(`CreateWaitableTimer`): ```delphi uses Windows; type TCustomTimerProc = procedure(ThreadID: DWORD; Timeout: ULONG_PTR) stdcall; procedure CustomThreadProc(Sender: TObject); var TimerHandle: HWIN32_FIND_DATAW; TimerInterval: LARGE_INTEGER; begin // 初始化定时器间隔为10微 TimerInterval.QuadPart := -1000 * 10; // 微转纳 // 创建等待定时器 if CreateWaitableTimer(nil, True, TimerProc, Integer(self.Handle), False) = 0 then begin // 设置定时器触发间隔 SetWaitableTimer(TimerHandle, @TimerInterval, 0, nil, nil, False); // 立即触发一次以避免第一次跳过间隔 SignalObject(TimerHandle, 0); // 开始循环接收信号发送指令 while not Terminated do begin WaitForSingleObject(TimerHandle, INFINITE); // 在这里添加发送指令的逻辑 // ... // 之后再次触发定时器 SignalObject(TimerHandle, 0); end; // 关闭定时器 CloseHandle(TimerHandle); end else begin // 错误处理 RaiseLastOSError; end; end; // 实现自定义线程类 TMyCustomThread = class(TThread) private FTimerHandle: HWIN32_FIND_DATAW; public constructor Create; destructor Destroy; override; Override procedure Execute; override; end; constructor TMyCustomThread.Create; begin inherited Create(False); // 线程不立即开始运行 Self.ThreadProc := CustomThreadProc; end; destructor TMyCustomThread.Destroy; begin inherited; Terminate; Join; // 确保线程完成 if Assigned(FTimerHandle) then CloseHandle(FTimerHandle); end; procedure TMyCustomThread.Execute; begin inherited; // 进入自定义线程处理器 Self.ThreadProc(Self); end; function ThreadProc(Sender: TObject): Boolean; var Result: Boolean; begin Result := True; // 执行自定义逻辑,包括发送指令 // ... end; ``` 请注意,这只是一个基本示例,实际应用可能需要考虑更多错误处理和资源管理细节。此外,由于计时器间隔的精确性受到系统性能的影响,特别是在并发环境里,可能会有小范围的误差。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值