with GNATCOM.Dispinterface;

package MSHTML.IHTMLDocument7_Interface is

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

   procedure Initialize (This : in out IHTMLDocument7_Type);

   function Pointer (This : IHTMLDocument7_Type)
     return Pointer_To_IHTMLDocument7;

   procedure Attach (This    : in out IHTMLDocument7_Type;
                     Pointer : in     Pointer_To_IHTMLDocument7);

   function Get_defaultView
     (This : IHTMLDocument7_Type)
     return Pointer_To_IHTMLWindow2;

   function createCDATASection
     (This                : IHTMLDocument7_Type;
      text                : GNATCOM.Types.BSTR;
      Free                : Boolean := True)
     return Pointer_To_IHTMLDOMNode;

   function getSelection
     (This             : IHTMLDocument7_Type)
     return Pointer_To_IHTMLSelection;

   function getElementsByTagNameNS
     (This          : IHTMLDocument7_Type;
      pvarNS        : access GNATCOM.Types.VARIANT :=
        GNATCOM.Types.PVARIANT_MISSING;
      bstrLocalName : GNATCOM.Types.BSTR;
      Free          : Boolean := True)
     return Pointer_To_IHTMLElementCollection;

   function createElementNS
     (This    : IHTMLDocument7_Type;
      pvarNS  : access GNATCOM.Types.VARIANT :=
        GNATCOM.Types.PVARIANT_MISSING;
      bstrTag : GNATCOM.Types.BSTR;
      Free    : Boolean := True)
     return Pointer_To_IHTMLElement;

   function createAttributeNS
     (This         : IHTMLDocument7_Type;
      pvarNS       : access GNATCOM.Types.VARIANT :=
        GNATCOM.Types.PVARIANT_MISSING;
      bstrAttrName : GNATCOM.Types.BSTR;
      Free         : Boolean := True)
     return Pointer_To_IHTMLDOMAttribute;

   procedure Put_onmsthumbnailclick
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmsthumbnailclick
     (This : IHTMLDocument7_Type)
     return GNATCOM.Types.VARIANT;

   function Get_characterSet
     (This : IHTMLDocument7_Type)
     return GNATCOM.Types.BSTR;

   function createElement
     (This    : IHTMLDocument7_Type;
      bstrTag : GNATCOM.Types.BSTR;
      Free    : Boolean := True)
     return Pointer_To_IHTMLElement;

   function createAttribute
     (This         : IHTMLDocument7_Type;
      bstrAttrName : GNATCOM.Types.BSTR;
      Free         : Boolean := True)
     return Pointer_To_IHTMLDOMAttribute;

   function getElementsByClassName
     (This : IHTMLDocument7_Type;
      v    : GNATCOM.Types.BSTR;
      Free : Boolean := True)
     return Pointer_To_IHTMLElementCollection;

   function createProcessingInstruction
     (This                     : IHTMLDocument7_Type;
      bstrTarget               : GNATCOM.Types.BSTR;
      bstrData                 : GNATCOM.Types.BSTR;
      Free                     : Boolean := True)
     return Pointer_To_IDOMProcessingInstruction;

   function adoptNode
     (This        : IHTMLDocument7_Type;
      pNodeSource : Pointer_To_IHTMLDOMNode)
     return Pointer_To_IHTMLDOMNode3;

   procedure Put_onmssitemodejumplistitemremoved
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onmssitemodejumplistitemremoved
     (This : IHTMLDocument7_Type)
     return GNATCOM.Types.VARIANT;

   function Get_all
     (This : IHTMLDocument7_Type)
     return Pointer_To_IHTMLElementCollection;

   function Get_inputEncoding
     (This : IHTMLDocument7_Type)
     return GNATCOM.Types.BSTR;

   function Get_xmlEncoding
     (This : IHTMLDocument7_Type)
     return GNATCOM.Types.BSTR;

   procedure Put_xmlStandalone
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT_BOOL);

   function Get_xmlStandalone
     (This : IHTMLDocument7_Type)
     return GNATCOM.Types.VARIANT_BOOL;

   procedure Put_xmlVersion
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.BSTR;
      Free : Boolean := True);

   function Get_xmlVersion
     (This : IHTMLDocument7_Type)
     return GNATCOM.Types.BSTR;

   function hasAttributes
     (This            : IHTMLDocument7_Type)
     return GNATCOM.Types.VARIANT_BOOL;

   procedure Put_onabort
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onblur
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_oncanplay
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_oncanplaythrough
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onchange
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_ondrag
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_ondragend
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_ondragenter
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_ondragleave
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_ondragover
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_ondrop
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_ondurationchange
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onemptied
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onended
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onerror
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onfocus
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_oninput
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onload
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onloadeddata
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onloadedmetadata
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onloadstart
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onpause
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onplay
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onplaying
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onprogress
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onratechange
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onreset
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onscroll
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onseeked
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onseeking
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onselect
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onstalled
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onsubmit
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onsuspend
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_ontimeupdate
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onvolumechange
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_onwaiting
     (This : IHTMLDocument7_Type;
      p    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure normalize
     (This : IHTMLDocument7_Type);

   function importNode
     (This        : IHTMLDocument7_Type;
      pNodeSource : Pointer_To_IHTMLDOMNode;
      fDeep       : GNATCOM.Types.VARIANT_BOOL)
     return Pointer_To_IHTMLDOMNode3;

   function Get_parentWindow
     (This : IHTMLDocument7_Type)
     return Pointer_To_IHTMLWindow2;

   procedure PutRef_body
     (This : IHTMLDocument7_Type;
      p    : Pointer_To_IHTMLElement);

   function Get_body
     (This : IHTMLDocument7_Type)
     return Pointer_To_IHTMLElement;

   function Get_head
     (This : IHTMLDocument7_Type)
     return Pointer_To_IHTMLElement;

end MSHTML.IHTMLDocument7_Interface;

