with GNATCOM.Dispinterface;

package MSHTML.HTMLDocumentEvents3_Object is

   type HTMLDocumentEvents3_Type is
     new GNATCOM.Dispinterface.Dispinterface_Type with null record;

   procedure onstorage
     (This    : HTMLDocumentEvents3_Type;
      pEvtObj : GNATCOM.Types.VARIANT;
      Free    : Boolean := True);

   procedure onstoragecommit
     (This    : HTMLDocumentEvents3_Type;
      pEvtObj : GNATCOM.Types.VARIANT;
      Free    : Boolean := True);

end MSHTML.HTMLDocumentEvents3_Object;

