如何让ie控制我的程序?(50分)

我写了一个from，内容如下。
procedure TForm1.Button1Click(Sender: TObject);
procedure OpenInIE(aURL: string);
begin
IE := CreateOleObject('InternetExplorer.Application');
IE.Visible := true;
IE.Navigate(aURL);
end;
begin
OpenInIE('ftp://aaa:aaa@ftp.mk.com');
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
try
IE.Quit;
except
free
end
end;

程序执行后，若果关闭程序，ie也会连带关闭。

问题：
如何在我关闭我用程序打开的ie的时候，我的程序也会关闭呢？？

可以做个BHO就可以搞定。

请问appfirst，何谓bho阿?

用钩子函数给这个IE注入一个钩子，监控它的消息队列，如果检测到有关闭的消息，则把自己的程序也给关了。

又简单一点的方法么??

bho 就是browser help object,也就是IE的扩展对象。

appfirst 能不能说得详细一点阿？？