TPreviewHTML Events

  • OnBeforeNavigate
  • OnAfterNavigate
  • OnStatusBusyChange

  • Events OnBeforeNavigate

    property OnBeforeNavigate : TNotifyEvent ;

    Description :
      This event occurs just before the PreviewHTML control load a new document .
      Example :
      procedure PreviewHTML1.OnBeforeNavigate(Sender:TObject);
      begin
        Statusbar.Panels[1].Text:='Loading...' ;
      end;

    Events OnAfterNavigate

    property OnAfterNavigate : TNotifyEvent ;

    Description :
      This event occurs when PreviewHTML control has successfully loaded a new document .
      Example :
      procedure PreviewHTML1.OnAfterNavigate(Sender:TObject);
      begin
        Statusbar.Panels[1].Text:='Loaded...' ;
      end;

    Events OnStatusBusyChange

    Type
    THTMLStatusBusyChange = procedure(Sender:TObject;const Busy:Boolean);
    property OnStatusBusyChange : THTMLStatusBusyChange ;

    Description :
      This event occurs when property Busy of PreviewHTML has changed .
      Example :When HTML is loading Busy=true and when HTML has loaded Busy=false .
      procedure PreviewHTML1.OnStatusBusyChange(Sender:TObject;Const Busy:Boolean);
      begin
        StopButton.Enable:=Busy ;
        Coolavi.Enable:=Busy ;
      end;

    TPreviewHTML Events   Gotop