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