with GNATCOM.Dispinterface;

package MSHTML.IDOMCloseEvent_Object is

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

   function Get_wasClean
     (This : IDOMCloseEvent_Type)
     return GNATCOM.Types.VARIANT;

   procedure initCloseEvent
     (This       : IDOMCloseEvent_Type;
      eventType  : GNATCOM.Types.VARIANT;
      canBubble  : GNATCOM.Types.VARIANT;
      cancelable : GNATCOM.Types.VARIANT;
      wasClean   : GNATCOM.Types.VARIANT;
      code       : GNATCOM.Types.VARIANT;
      reason     : GNATCOM.Types.VARIANT;
      Free       : Boolean := True);

end MSHTML.IDOMCloseEvent_Object;

