问一个关于WebBrowser的问题。(100分)

我把WebBrowser设为AlClient方式，覆盖了整个form.
但是当WebBrowser连接到一个网页后，它好象屏蔽了所有传给form的消息。
如Mouse的消息。怎样才能让form仍然能正常地获取各种消息呢？

你是指什么消息呢?
- 是由鼠标操作产生的消息吗?
如果是,当然不行了,因为鼠标已经接触不到form了呀!
- 是用sendmessage 之类函数直接发送给form的消息吗?
如果是,不应该呀!

unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
AppEvnts, OleCtrls, SHDocVw, StdCtrls;
type
TForm1 = class(TForm)
WebBrowser1: TWebBrowser;
Button1: TButton;
procedure ApplicationEvents1Message(var Msg: tagMSG;
var Handled: Boolean);
procedure FormCreate(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG;
var Handled: Boolean);
begin
if Msg.message=WM_LBUTTONDBLCLK then
button1.Caption:='a';
Handled:=false;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
Application.OnMessage:=ApplicationEvents1Message;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
webbrowser1.Navigate('www.gislab.ecnu.edu.cn');
end;

end.

多人接受答案了。