with GNATCOM.Dispinterface;

package MSHTML.IDOMTextEvent_Object is

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

   function Get_data
     (This : IDOMTextEvent_Type)
     return GNATCOM.Types.VARIANT;

   function Get_inputMethod
     (This : IDOMTextEvent_Type)
     return GNATCOM.Types.VARIANT;

   procedure initTextEvent
     (This        : IDOMTextEvent_Type;
      eventType   : GNATCOM.Types.VARIANT;
      canBubble   : GNATCOM.Types.VARIANT;
      cancelable  : GNATCOM.Types.VARIANT;
      viewArg     : GNATCOM.Types.VARIANT;
      dataArg     : GNATCOM.Types.VARIANT;
      inputMethod : GNATCOM.Types.VARIANT;
      locale      : GNATCOM.Types.VARIANT;
      Free        : Boolean := True);

   function Get_locale
     (This : IDOMTextEvent_Type)
     return GNATCOM.Types.VARIANT;

end MSHTML.IDOMTextEvent_Object;

