webbrowser 关闭出错(100分)

procedure TFrmWeb.WbrQueryDocumentComplete(Sender: TObject;
const pDisp: IDispatch; var URL: OleVariant);
var
Doc: IHTMLDocument2;
ElementCollection: IHTMLElementCollection;
HtmlElement: IHTMLElement;
InputElement:IHTMLInputElement;
InputFileElement:IHTMLInputFileElement;
I: Integer;
begin
Doc:=(Sender as Twebbrowser).Document as IHTMLDocument2;
end;
使用webquery.navigator(url)
后
关闭窗体跳出cpu的窗体，好像是接口有什么问题
还有
我在d5下使用tinternetexplorer由非法的数组操作的错误。不知道为何

参数不全
var
Flags:OLEVariant;
begin
webbrowser1.Navigate(url, Flags, Flags, Flags, Flags);
end;

webbrowser1.Navigate(url, 0, 0, 0, 0);
保你能通过。

怪事，现在没有问题了。不用参数一样的，在接口里好像有却省参数的