如何在activeform里面，关闭包含它的ie程序？

Question

比如说在activeform里面有个按钮，点击之后，把包含它的ie程序关闭？
shellexecute这个函数不行，只能隐藏这个activeform程序。
各位高人，谁能指教一二？

Answer 1

var   WinHanlde : HWnd;
begin
   WinHanlde := FindWIndow( 'IEFrame', nil );
   DestroyWindow(WinHanlde);
end;

Answer 2

多谢eastliangliang(青苹果)(十年铸剑，汗祭青锋)，
不过我还有点问题：
我是想在一个activeform程序里面触发一个事件，关闭当前的ie（即包含程序的IE），然后再打开一个新的ie，指向另外一个地址，该怎么做呢？
如果在
   WinHanlde := FindWIndow( 'IEFrame', nil );
   DestroyWindow(WinHanlde);
下面用shellexecute的话，会发生错误（因为当前的ie已经被关闭了）。
盼望指教！

Answer 3

to eastliangliang(青苹果)(十年铸剑，汗祭青锋) ：
放在前面的话，所有的ie都会被关调，怎么会出来一个新地址的ie呢？盼望指教！

Answer 4

WinHandle := FindWIndow( 'IEFrame', nil );
shellexecute(self.handle,'','http://www.csdn.net','','',0);
DestroyWindow(WinHanlde);