我正在考虑以优雅的方式将 WinAPI 回调封装在一个类中。假设我正在创建一个处理异步 I/O 的类。所有 Windows 回调都应该是 stdcall 函数，而不是类方法（例如，我需要将它们的地址传递给 ReadFileEx WinAPI 函数）。所以，我不能只将方法地址作为回调例程传递给 WinAPI 函数。
将这种类型的功能封装在类中的最优雅的方法是什么，以便该类具有事件 OnReadCompleted 和 OnWriteCompleted（我使用 Delphi 作为主要语言，但我想 C++ 中的情况必须相同，因为类方法和简单的方法不同，它的第一个隐藏参数是this链接。当然这个类不是单例的，app可以同时创建多个.
您认为实现这一点的好方法是什么？
【问题讨论】：
我怀疑这无论如何都是优雅的，但是，IMO，最简单的方法是将类的方法的地址转换为过程地址并将其传递给 winapi。当然，这是一个 hack，但 VCL 对 classes.MakeObjectInstance 的作用相同，如果只是针对特定构造的话。请参阅 this question 以获取 source 以了解这种实现以及其他一些更多的 OO 方法来处理情况。
【讨论】：
您可以为此使用 static 关键字。但它仅在新的 Delphi 版本中可用。
像这样：
type
TMyThread = class
private
// ...
class function ThreadProc(Param: Pointer): DWord; stdcall; static; // <- WinAPI call back
function Execute: DWord; // <- actual callback
public
constructor Create;
// ...
end;
{ TMyThread }
constructor TMyThread.Create;
begin
// ...
FHandle := CreateThread(nil, 0, @ThreadProc, Self, 0, FID);
end;
class function TMyThread.ThreadProc(Param: Pointer): DWord;
begin
Result := TMyThread(Param).Execute;
end;
function TMyThread.Execute: DWord;
begin
MessageBox(0, 'Hello from thread', 'Information', MB_OK or MB_ICONINFORMATION);
Result := 0;
end;
这里：ThreadProc 是 WinAPI 回调例程。它需要有某种形式的自定义参数，您可以在其中传递 Self。它不能访问实例成员。这就是为什么它只是一个真正的回调（Execute）的包装器，它是类的一部分，可以访问它的字段和方法。
【讨论】：