with GNATCOM.Dispinterface;

package MSHTML.IDOMDragEvent_Object is

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

   function Get_dataTransfer
     (This : IDOMDragEvent_Type)
     return GNATCOM.Types.VARIANT;

   procedure initDragEvent
     (This             : IDOMDragEvent_Type;
      eventType        : GNATCOM.Types.VARIANT;
      canBubble        : GNATCOM.Types.VARIANT;
      cancelable       : GNATCOM.Types.VARIANT;
      viewArg          : GNATCOM.Types.VARIANT;
      detailArg        : GNATCOM.Types.VARIANT;
      screenXArg       : GNATCOM.Types.VARIANT;
      screenYArg       : GNATCOM.Types.VARIANT;
      clientXArg       : GNATCOM.Types.VARIANT;
      clientYArg       : GNATCOM.Types.VARIANT;
      ctrlKeyArg       : GNATCOM.Types.VARIANT;
      altKeyArg        : GNATCOM.Types.VARIANT;
      shiftKeyArg      : GNATCOM.Types.VARIANT;
      metaKeyArg       : GNATCOM.Types.VARIANT;
      buttonArg        : GNATCOM.Types.VARIANT;
      relatedTargetArg : GNATCOM.Types.VARIANT;
      dataTransferArg  : GNATCOM.Types.VARIANT;
      Free             : Boolean := True);

end MSHTML.IDOMDragEvent_Object;

