with GNATCOM.Dispinterface;

package MSHTML.IDOMMSTransitionEvent_Object is

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

   function Get_propertyName
     (This : IDOMMSTransitionEvent_Type)
     return GNATCOM.Types.VARIANT;

   function Get_elapsedTime
     (This : IDOMMSTransitionEvent_Type)
     return GNATCOM.Types.VARIANT;

   procedure initMSTransitionEvent
     (This         : IDOMMSTransitionEvent_Type;
      eventType    : GNATCOM.Types.VARIANT;
      canBubble    : GNATCOM.Types.VARIANT;
      cancelable   : GNATCOM.Types.VARIANT;
      propertyName : GNATCOM.Types.VARIANT;
      elapsedTime  : GNATCOM.Types.VARIANT;
      Free         : Boolean := True);

end MSHTML.IDOMMSTransitionEvent_Object;

