为什么没有createwindow却可以响应windows的消息呢？

2005-12-01 03:50:51 172 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

swift5分钟语法速记如果你依然在编程的世界里迷茫，不知道自己的未来规划，小编给大家推荐一个IOS高级交流群：458839238 里面可以与大神一起交流并走出迷茫。小白可进群免费领取学习资料，看看前辈们是如何在编程的世界里傲然前行！群内提供数据结构与算法、底层进阶、swift、逆向、整合面试题等免费资料附上一份收集的各大厂面试题（附答案） ! 群文件直接获取各大厂面试题又把swift相关语法部分看了一遍，... 阅读详情

TTEST = class(TObject)
private
FWindowHandle: HWND;
procedure WndProc(var Msg: TMessage);
protected
public
constructor Create;
destructor Destroy; override;
end;

constructor TUSB.Create;
begin
FWindowHandle := AllocateHWnd(WndProc);
USBRegister;
end;

destructor TUSB.Destroy;
begin
DeallocateHWnd(FWindowHandle);
inherited Destroy;
end;

procedure TUSB.WndProc(var Msg: TMessage);
begin
if (Msg.Msg = WM_DEVICECHANGE) then
begin
try
//WMDeviceChange(Msg);
except
Application.HandleException(Self);
end;
end
else
Msg.Result := DefWindowProc(FWindowHandle, Msg.Msg, Msg.wParam, Msg.lParam);
end;

这个东东是从TObject继承下来的，为什么加了个 procedure WndProc(var Msg: TMessage);
就可以接收windows的消息了呢？我的理解好像是要有Window才可以处理消息循环的啊？？？

偶搞了6年的delphi了，看来是白学了。

...全文