with GNATCOM.Dispinterface;

package MSHTML.IHTMLDocument6_Object is

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

   function Get_compatible
     (This : IHTMLDocument6_Type)
     return GNATCOM.Types.VARIANT;

   function Get_documentMode
     (This : IHTMLDocument6_Type)
     return GNATCOM.Types.VARIANT;

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

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

   procedure Put_onstoragecommit
     (This : IHTMLDocument6_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_onstoragecommit
     (This : IHTMLDocument6_Type)
     return GNATCOM.Types.VARIANT;

   function getElementById
     (This   : IHTMLDocument6_Type;
      bstrId : GNATCOM.Types.VARIANT;
      Free   : Boolean := True)
     return GNATCOM.Types.VARIANT;

   procedure updateSettings
     (This : IHTMLDocument6_Type);

end MSHTML.IHTMLDocument6_Object;

