TWebBrowser saber cuando se cargo la pagina

[Insomne]

Hola

Tu pregunta es antigua, pero por ai acaso te mando un codigo del evento OnDocumentComplete que pille por ahi. Funciona con marcos tambien.
Un saludo.

Código Delphi [-]
procedure TForm1.Wb1DocumentComplete(Sender: TObject;
               const pDisp: IDispatch; var URL: OLEvariant);
var
  CurWebrowser : IWebBrowser;
  TopWebBrowser: IWebBrowser;
  Document     : OLEvariant;
  WindowName   : string;
begin { TForm1.WebBrowser1DocumentComplete }
  CurWebrowser := pDisp as IWebBrowser;
  TopWebBrowser := (Sender as TWebBrowser).DefaultInterface;
  if CurWebrowser=TopWebBrowser then
  begin
    ShowMessage('Document is complete.');
    FCambiandoDePag := FALSE;
  end
  else
  begin
    Document := CurWebrowser.Document;
    WindowName := Document.ParentWindow.Name;
    ShowMessage('Frame ' + WindowName + ' is loaded.')
  end;
end;

[ivan022481]

Muchas gracias, lo estoy probando