TWebbrowser frame neu laden warten bis fertig?

[gandime]

Hi,
ich habe bei meiner TWebbrowser Komponente ein Problem:

Ich habe eine Seite geladen mit zwei Frames.
dann lade ich einen der beiden Frames mit einer anderen inetadress mit folgendem code:

Delphi-Quellcode:

var
  ov: OleVariant;
begin
  web.Navigate('http://www.xyz.de','','Hauptframe',ov);
end;

blos wenn ich jetzt warte bis die Procedure DocumentComplete ausgelöst wird weiss ich nicht ob der komplette Frame geladen wurde oder nur ein Teil.
Code von DocumentComplete:

Delphi-Quellcode:

procedure TForm1.WebDocumentComplete(ASender: TObject;
  const pDisp: IDispatch; var URL: OleVariant);
var
  CurWebrowser: IWebBrowser;
  TopWebBrowser: IWebBrowser;
begin
  CurWebrowser := pDisp as IWebBrowser;
  TopWebBrowser := (ASender as TWebBrowser).DefaultInterface;
  if CurWebrowser = TopWebBrowser then
  begin
    b_web_f:=true;
    showmessage('haupt');
  end
  else
  begin
    showmessage('sub');// dieses wird bestimmt 5 mal wärend des ladens des neuen Frames ausgelöst (es ist aber nie die selbe Anzahlt!)
  end;
end;

Wie erkenne ich ob der Ladevorgang abgeschlossen is?

mfg
gandime