with GNATCOM.Dispinterface;

package MSHTML.DispHTMLWindowProxy_Object is

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

   function item
     (This      : DispHTMLWindowProxy_Type;
      pvarIndex : GNATCOM.Types.VARIANT;
      Free      : Boolean := True)
     return GNATCOM.Types.VARIANT;

   function Get_length
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Get_frames
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_defaultStatus
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_defaultStatus
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_status
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_status
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure clearTimeout
     (This    : DispHTMLWindowProxy_Type;
      timerID : GNATCOM.Types.VARIANT;
      Free    : Boolean := True);

   procedure alert
     (This    : DispHTMLWindowProxy_Type;
      message : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free    : Boolean := True);

   function confirm
     (This    : DispHTMLWindowProxy_Type;
      message : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free    : Boolean := True)
     return GNATCOM.Types.VARIANT;

   function prompt
     (This    : DispHTMLWindowProxy_Type;
      message : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      defstr  : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free    : Boolean := True)
     return GNATCOM.Types.VARIANT;

   function Get_location
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Get_history
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure close
     (This : DispHTMLWindowProxy_Type);

   procedure Put_opener
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_opener
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Get_navigator
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_name
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_name
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Get_parent
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function open
     (This     : DispHTMLWindowProxy_Type;
      url      : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      name     : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      features : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      replace  : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free     : Boolean := True)
     return GNATCOM.Types.VARIANT;

   function Get_self
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Get_top
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Get_window
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure navigate
     (This : DispHTMLWindowProxy_Type;
      url  : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   procedure Put_onfocus
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onfocus
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onblur
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onblur
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onload
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onload
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onbeforeunload
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onbeforeunload
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onunload
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onunload
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onhelp
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onhelp
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onerror
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onerror
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onresize
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onresize
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onscroll
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onscroll
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Get_document
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Get_event
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Getu_newEnum
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function showModalDialog
     (This       : DispHTMLWindowProxy_Type;
      dialog     : GNATCOM.Types.VARIANT;
      varArgIn   : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      varOptions : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free       : Boolean := True)
     return GNATCOM.Types.VARIANT;

   procedure showHelp
     (This     : DispHTMLWindowProxy_Type;
      helpURL  : GNATCOM.Types.VARIANT;
      helpArg  : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      features : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free     : Boolean := True);

   function Get_screen
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure focus
     (This : DispHTMLWindowProxy_Type);

   function Get_closed
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure blur
     (This : DispHTMLWindowProxy_Type);

   procedure scroll
     (This : DispHTMLWindowProxy_Type;
      x    : GNATCOM.Types.VARIANT;
      y    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_clientInformation
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure clearInterval
     (This    : DispHTMLWindowProxy_Type;
      timerID : GNATCOM.Types.VARIANT;
      Free    : Boolean := True);

   procedure Put_offscreenBuffering
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_offscreenBuffering
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function execScript
     (This     : DispHTMLWindowProxy_Type;
      code     : GNATCOM.Types.VARIANT;
      language : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free     : Boolean := True)
     return GNATCOM.Types.VARIANT;

   function toString
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure scrollBy
     (This : DispHTMLWindowProxy_Type;
      x    : GNATCOM.Types.VARIANT;
      y    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   procedure scrollTo
     (This : DispHTMLWindowProxy_Type;
      x    : GNATCOM.Types.VARIANT;
      y    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   procedure moveTo
     (This : DispHTMLWindowProxy_Type;
      x    : GNATCOM.Types.VARIANT;
      y    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   procedure moveBy
     (This : DispHTMLWindowProxy_Type;
      x    : GNATCOM.Types.VARIANT;
      y    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   procedure resizeTo
     (This : DispHTMLWindowProxy_Type;
      x    : GNATCOM.Types.VARIANT;
      y    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   procedure resizeBy
     (This : DispHTMLWindowProxy_Type;
      x    : GNATCOM.Types.VARIANT;
      y    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_external
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Get_screenLeft
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Get_screenTop
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function attachEvent
     (This  : DispHTMLWindowProxy_Type;
      event : GNATCOM.Types.VARIANT;
      pdisp : GNATCOM.Types.VARIANT;
      Free  : Boolean := True)
     return GNATCOM.Types.VARIANT;

   procedure detachEvent
     (This  : DispHTMLWindowProxy_Type;
      event : GNATCOM.Types.VARIANT;
      pdisp : GNATCOM.Types.VARIANT;
      Free  : Boolean := True);

   function setTimeout
     (This       : DispHTMLWindowProxy_Type;
      expression : GNATCOM.Types.VARIANT;
      msec       : GNATCOM.Types.VARIANT;
      language   : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free       : Boolean := True)
     return GNATCOM.Types.VARIANT;

   function setInterval
     (This       : DispHTMLWindowProxy_Type;
      expression : GNATCOM.Types.VARIANT;
      msec       : GNATCOM.Types.VARIANT;
      language   : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free       : Boolean := True)
     return GNATCOM.Types.VARIANT;

   procedure print
     (This : DispHTMLWindowProxy_Type);

   procedure Put_onbeforeprint
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onbeforeprint
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onafterprint
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onafterprint
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Get_clipboardData
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function showModelessDialog
     (This     : DispHTMLWindowProxy_Type;
      url      : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      varArgIn : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      options  : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free     : Boolean := True)
     return GNATCOM.Types.VARIANT;

   function createPopup
     (This     : DispHTMLWindowProxy_Type;
      varArgIn : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free     : Boolean := True)
     return GNATCOM.Types.VARIANT;

   function Get_frameElement
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Get_sessionStorage
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Get_localStorage
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onhashchange
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onhashchange
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Get_maxConnectionsPerServer
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure postMessage
     (This         : DispHTMLWindowProxy_Type;
      msg          : GNATCOM.Types.VARIANT;
      targetOrigin : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free         : Boolean := True);

   function toStaticHTML
     (This     : DispHTMLWindowProxy_Type;
      bstrHTML : GNATCOM.Types.VARIANT;
      Free     : Boolean := True)
     return GNATCOM.Types.VARIANT;

   procedure Put_onmessage
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmessage
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure msWriteProfilerMark
     (This                 : DispHTMLWindowProxy_Type;
      bstrProfilerMarkName : GNATCOM.Types.VARIANT;
      Free                 : Boolean := True);

   function getSelection
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function getComputedStyle
     (This          : DispHTMLWindowProxy_Type;
      varArgIn      : GNATCOM.Types.VARIANT;
      bstrPseudoElt : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free          : Boolean := True)
     return GNATCOM.Types.VARIANT;

   function Get_styleMedia
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_performance
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_performance
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Get_innerWidth
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Get_innerHeight
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Get_pageXOffset
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Get_pageYOffset
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Get_screenX
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Get_screenY
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Get_outerWidth
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Get_outerHeight
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onabort
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onabort
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_oncanplay
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_oncanplay
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_oncanplaythrough
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_oncanplaythrough
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onchange
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onchange
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onclick
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onclick
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_oncontextmenu
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_oncontextmenu
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_ondblclick
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_ondblclick
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_ondrag
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_ondrag
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_ondragend
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_ondragend
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_ondragenter
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_ondragenter
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_ondragleave
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_ondragleave
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_ondragover
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_ondragover
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_ondragstart
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_ondragstart
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_ondrop
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_ondrop
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_ondurationchange
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_ondurationchange
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onfocusin
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onfocusin
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onfocusout
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onfocusout
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_oninput
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_oninput
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onemptied
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onemptied
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onended
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onended
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onkeydown
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onkeydown
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onkeypress
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onkeypress
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onkeyup
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onkeyup
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onloadeddata
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onloadeddata
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onloadedmetadata
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onloadedmetadata
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onloadstart
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onloadstart
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onmousedown
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmousedown
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onmouseenter
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmouseenter
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onmouseleave
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmouseleave
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onmousemove
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmousemove
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onmouseout
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmouseout
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onmouseover
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmouseover
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onmouseup
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmouseup
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onmousewheel
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmousewheel
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onoffline
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onoffline
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_ononline
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_ononline
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onprogress
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onprogress
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onratechange
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onratechange
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onreadystatechange
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onreadystatechange
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onreset
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onreset
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onseeked
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onseeked
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onseeking
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onseeking
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onselect
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onselect
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onstalled
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onstalled
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onstorage
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onstorage
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onsubmit
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onsubmit
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onsuspend
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onsuspend
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_ontimeupdate
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_ontimeupdate
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onpause
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onpause
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onplay
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onplay
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onplaying
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onplaying
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onvolumechange
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onvolumechange
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onwaiting
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onwaiting
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onmspointerdown
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmspointerdown
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onmspointermove
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmspointermove
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onmspointerup
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmspointerup
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onmspointerover
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmspointerover
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onmspointerout
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmspointerout
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onmspointercancel
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmspointercancel
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onmspointerhover
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmspointerhover
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onmsgesturestart
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmsgesturestart
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onmsgesturechange
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmsgesturechange
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onmsgestureend
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmsgestureend
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onmsgesturehold
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmsgesturehold
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onmsgesturetap
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmsgesturetap
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onmsgesturedoubletap
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmsgesturedoubletap
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onmsinertiastart
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmsinertiastart
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Get_applicationCache
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_onpopstate
     (This : DispHTMLWindowProxy_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onpopstate
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   function Get_constructor
     (This : DispHTMLWindowProxy_Type)
     return GNATCOM.Types.VARIANT;

   procedure addEventListener
     (This       : DispHTMLWindowProxy_Type;
      utype      : GNATCOM.Types.VARIANT;
      listener   : GNATCOM.Types.VARIANT;
      useCapture : GNATCOM.Types.VARIANT;
      Free       : Boolean := True);

   procedure removeEventListener
     (This       : DispHTMLWindowProxy_Type;
      utype      : GNATCOM.Types.VARIANT;
      listener   : GNATCOM.Types.VARIANT;
      useCapture : GNATCOM.Types.VARIANT;
      Free       : Boolean := True);

   function dispatchEvent
     (This : DispHTMLWindowProxy_Type;
      evt  : GNATCOM.Types.VARIANT;
      Free : Boolean := True)
     return GNATCOM.Types.VARIANT;

end MSHTML.DispHTMLWindowProxy_Object;

