关于Activex的简单问题(100分)

Delphi中Activex的Message是系统直接传给
Activex的吗？我用Application.Onmessage
和控件的windowproc均不能捕获。
是不是要用hook，该如何使用，
最好能有简单代码

是可以捕获的，我看过这样的程序，好像是重载WndProc；
TForm1 = calss(TForm)
private
procedure WndProc(var message : TMessage);override;
...
end;


procedure Tfrom1.WndProc(var message :TMessage);
begin
inherited(message);
if (message.msg=...) then
begin
...
end;
end;

接受答案了.