with GNATCOM.Dispinterface;

package MSHTML.DispHTMLRuleStyle_Object is

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

   procedure Put_fontFamily
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_fontFamily
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_fontStyle
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_fontStyle
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_fontVariant
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_fontVariant
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_fontWeight
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_fontWeight
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_fontSize
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_fontSize
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_font
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_font
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_color
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_color
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_background
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_background
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_backgroundColor
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_backgroundColor
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_backgroundImage
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_backgroundImage
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_backgroundRepeat
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_backgroundRepeat
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_backgroundAttachment
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_backgroundAttachment
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_backgroundPosition
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_backgroundPosition
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_backgroundPositionX
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_backgroundPositionX
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_backgroundPositionY
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_backgroundPositionY
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_wordSpacing
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_wordSpacing
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_letterSpacing
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_letterSpacing
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_textDecoration
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_textDecoration
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_textDecorationNone
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_textDecorationNone
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_textDecorationUnderline
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_textDecorationUnderline
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_textDecorationOverline
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_textDecorationOverline
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_textDecorationLineThrough
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_textDecorationLineThrough
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_textDecorationBlink
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_textDecorationBlink
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_verticalAlign
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_verticalAlign
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_textTransform
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_textTransform
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_textAlign
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_textAlign
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_textIndent
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_textIndent
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_lineHeight
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_lineHeight
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_marginTop
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_marginTop
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_marginRight
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_marginRight
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_marginBottom
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_marginBottom
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_marginLeft
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_marginLeft
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_margin
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_margin
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_paddingTop
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_paddingTop
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_paddingRight
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_paddingRight
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_paddingBottom
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_paddingBottom
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_paddingLeft
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_paddingLeft
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_padding
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_padding
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_border
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_border
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderTop
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderTop
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderRight
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderRight
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderBottom
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderBottom
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderLeft
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderLeft
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderColor
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderColor
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderTopColor
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderTopColor
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderRightColor
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderRightColor
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderBottomColor
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderBottomColor
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderLeftColor
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderLeftColor
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderWidth
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderWidth
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderTopWidth
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderTopWidth
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderRightWidth
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderRightWidth
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderBottomWidth
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderBottomWidth
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderLeftWidth
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderLeftWidth
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderStyle
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderStyle
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderTopStyle
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderTopStyle
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderRightStyle
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderRightStyle
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderBottomStyle
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderBottomStyle
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderLeftStyle
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderLeftStyle
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_width
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_width
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_height
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_height
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_styleFloat
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_styleFloat
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_clear
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_clear
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_display
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_display
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_visibility
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_visibility
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_listStyleType
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_listStyleType
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_listStylePosition
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_listStylePosition
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_listStyleImage
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_listStyleImage
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_listStyle
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_listStyle
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_whiteSpace
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_whiteSpace
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_top
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

   procedure Put_left
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_left
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_zIndex
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_zIndex
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_overflow
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_overflow
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_pageBreakBefore
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_pageBreakBefore
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_pageBreakAfter
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_pageBreakAfter
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_cssText
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_cssText
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_cursor
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_cursor
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_clip
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_clip
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_filter
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_filter
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure setAttribute
     (This             : DispHTMLRuleStyle_Type;
      strAttributeName : GNATCOM.Types.VARIANT;
      AttributeValue   : GNATCOM.Types.VARIANT;
      lFlags           : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free             : Boolean := True);

   function getAttribute
     (This             : DispHTMLRuleStyle_Type;
      strAttributeName : GNATCOM.Types.VARIANT;
      lFlags           : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free             : Boolean := True)
     return GNATCOM.Types.VARIANT;

   function removeAttribute
     (This             : DispHTMLRuleStyle_Type;
      strAttributeName : GNATCOM.Types.VARIANT;
      lFlags           : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free             : Boolean := True)
     return GNATCOM.Types.VARIANT;

   procedure Put_tableLayout
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_tableLayout
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderCollapse
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderCollapse
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_direction
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_direction
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_behavior
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_behavior
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_position
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_position
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_unicodeBidi
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_unicodeBidi
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_bottom
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_bottom
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_right
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_right
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_pixelBottom
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_pixelBottom
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_pixelRight
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_pixelRight
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_posBottom
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_posBottom
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_posRight
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_posRight
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_imeMode
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_imeMode
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_rubyAlign
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_rubyAlign
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_rubyPosition
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_rubyPosition
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_rubyOverhang
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_rubyOverhang
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_layoutGridChar
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_layoutGridChar
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_layoutGridLine
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_layoutGridLine
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_layoutGridMode
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_layoutGridMode
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_layoutGridType
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_layoutGridType
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_layoutGrid
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_layoutGrid
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_textAutospace
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_textAutospace
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_wordBreak
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_wordBreak
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_lineBreak
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_lineBreak
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_textJustify
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_textJustify
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_textJustifyTrim
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_textJustifyTrim
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_textKashida
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_textKashida
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_overflowX
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_overflowX
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_overflowY
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_overflowY
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_accelerator
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_accelerator
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_layoutFlow
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_layoutFlow
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_zoom
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_zoom
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_wordWrap
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_wordWrap
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_textUnderlinePosition
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_textUnderlinePosition
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_scrollbarBaseColor
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_scrollbarBaseColor
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_scrollbarFaceColor
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_scrollbarFaceColor
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_scrollbar3dLightColor
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_scrollbar3dLightColor
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_scrollbarShadowColor
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_scrollbarShadowColor
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_scrollbarHighlightColor
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_scrollbarHighlightColor
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_scrollbarDarkShadowColor
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_scrollbarDarkShadowColor
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_scrollbarArrowColor
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_scrollbarArrowColor
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_scrollbarTrackColor
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_scrollbarTrackColor
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_writingMode
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_writingMode
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_textAlignLast
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_textAlignLast
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_textKashidaSpace
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_textKashidaSpace
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_textOverflow
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_textOverflow
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_minHeight
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_minHeight
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msInterpolationMode
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msInterpolationMode
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_maxHeight
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_maxHeight
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_minWidth
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_minWidth
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_maxWidth
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_maxWidth
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_content
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_content
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_captionSide
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_captionSide
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_counterIncrement
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_counterIncrement
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_counterReset
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_counterReset
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_outline
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_outline
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_outlineWidth
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_outlineWidth
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_outlineStyle
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_outlineStyle
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_outlineColor
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_outlineColor
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_boxSizing
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_boxSizing
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderSpacing
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderSpacing
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_orphans
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_orphans
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_widows
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_widows
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_pageBreakInside
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_pageBreakInside
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_emptyCells
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_emptyCells
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msBlockProgression
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msBlockProgression
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_quotes
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_quotes
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

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

   function Get_parentRule
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   function getPropertyValue
     (This             : DispHTMLRuleStyle_Type;
      bstrPropertyName : GNATCOM.Types.VARIANT;
      Free             : Boolean := True)
     return GNATCOM.Types.VARIANT;

   function getPropertyPriority
     (This             : DispHTMLRuleStyle_Type;
      bstrPropertyName : GNATCOM.Types.VARIANT;
      Free             : Boolean := True)
     return GNATCOM.Types.VARIANT;

   function removeProperty
     (This             : DispHTMLRuleStyle_Type;
      bstrPropertyName : GNATCOM.Types.VARIANT;
      Free             : Boolean := True)
     return GNATCOM.Types.VARIANT;

   procedure setProperty
     (This                 : DispHTMLRuleStyle_Type;
      bstrPropertyName     : GNATCOM.Types.VARIANT;
      pvarPropertyValue    : GNATCOM.Types.VARIANT;
      pvarPropertyPriority : GNATCOM.Types.VARIANT
        := GNATCOM.Types.VARIANT_MISSING;
      Free                 : Boolean := True);

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

   procedure Put_msScrollChaining
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msScrollChaining
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msContentZooming
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msContentZooming
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msContentZoomSnapType
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msContentZoomSnapType
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msScrollRails
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msScrollRails
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msContentZoomChaining
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msContentZoomChaining
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msScrollSnapType
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msScrollSnapType
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msContentZoomLimit
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msContentZoomLimit
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msContentZoomSnap
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msContentZoomSnap
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msContentZoomSnapPoints
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msContentZoomSnapPoints
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msContentZoomLimitMin
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msContentZoomLimitMin
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msContentZoomLimitMax
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msContentZoomLimitMax
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msScrollSnapX
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msScrollSnapX
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msScrollSnapY
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msScrollSnapY
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msScrollSnapPointsX
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msScrollSnapPointsX
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msScrollSnapPointsY
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msScrollSnapPointsY
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msGridColumn
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msGridColumn
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msGridColumnAlign
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msGridColumnAlign
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msGridColumns
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msGridColumns
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msGridColumnSpan
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msGridColumnSpan
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msGridRow
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msGridRow
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msGridRowAlign
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msGridRowAlign
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msGridRows
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msGridRows
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msGridRowSpan
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msGridRowSpan
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msWrapThrough
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msWrapThrough
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msWrapMargin
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msWrapMargin
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msWrapFlow
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msWrapFlow
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msAnimationName
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msAnimationName
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msAnimationDuration
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msAnimationDuration
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msAnimationTimingFunction
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msAnimationTimingFunction
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msAnimationDelay
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msAnimationDelay
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msAnimationDirection
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msAnimationDirection
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msAnimationPlayState
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msAnimationPlayState
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msAnimationIterationCount
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msAnimationIterationCount
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msAnimation
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msAnimation
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msAnimationFillMode
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msAnimationFillMode
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_colorInterpolationFilters
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_colorInterpolationFilters
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_columnCount
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_columnCount
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_columnWidth
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_columnWidth
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_columnGap
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_columnGap
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_columnFill
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_columnFill
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_columnSpan
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_columnSpan
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_columns
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_columns
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_columnRule
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_columnRule
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_columnRuleColor
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_columnRuleColor
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_columnRuleStyle
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_columnRuleStyle
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_columnRuleWidth
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_columnRuleWidth
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_breakBefore
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_breakBefore
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_breakAfter
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_breakAfter
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_breakInside
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_breakInside
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_floodColor
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_floodColor
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_floodOpacity
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_floodOpacity
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_lightingColor
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_lightingColor
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msScrollLimitXMin
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msScrollLimitXMin
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msScrollLimitYMin
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msScrollLimitYMin
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msScrollLimitXMax
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msScrollLimitXMax
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msScrollLimitYMax
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msScrollLimitYMax
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msScrollLimit
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msScrollLimit
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_textShadow
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_textShadow
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msFlowFrom
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msFlowFrom
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msFlowInto
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msFlowInto
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msHyphens
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msHyphens
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msHyphenateLimitZone
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msHyphenateLimitZone
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msHyphenateLimitChars
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msHyphenateLimitChars
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msHyphenateLimitLines
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msHyphenateLimitLines
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msHighContrastAdjust
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msHighContrastAdjust
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_enableBackground
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_enableBackground
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msFontFeatureSettings
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msFontFeatureSettings
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msUserSelect
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msUserSelect
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msOverflowStyle
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msOverflowStyle
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msTransformStyle
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msTransformStyle
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msBackfaceVisibility
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msBackfaceVisibility
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msPerspective
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msPerspective
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msPerspectiveOrigin
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msPerspectiveOrigin
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msTransitionProperty
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msTransitionProperty
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msTransitionDuration
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msTransitionDuration
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msTransitionTimingFunction
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msTransitionTimingFunction
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msTransitionDelay
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msTransitionDelay
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msTransition
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msTransition
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msTouchAction
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msTouchAction
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msScrollTranslation
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msScrollTranslation
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msFlex
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msFlex
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msFlexPositive
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msFlexPositive
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msFlexNegative
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msFlexNegative
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msFlexPreferredSize
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msFlexPreferredSize
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msFlexFlow
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msFlexFlow
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msFlexDirection
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msFlexDirection
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msFlexWrap
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msFlexWrap
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msFlexAlign
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msFlexAlign
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msFlexItemAlign
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msFlexItemAlign
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msFlexPack
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msFlexPack
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msFlexLinePack
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msFlexLinePack
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msFlexOrder
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msFlexOrder
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msTouchSelect
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msTouchSelect
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_transform
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_transform
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_transformOrigin
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_transformOrigin
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_transformStyle
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_transformStyle
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_backfaceVisibility
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_backfaceVisibility
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_perspective
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_perspective
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_perspectiveOrigin
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_perspectiveOrigin
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_transitionProperty
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_transitionProperty
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_transitionDuration
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_transitionDuration
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_transitionTimingFunction
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_transitionTimingFunction
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_transitionDelay
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_transitionDelay
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_transition
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_transition
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_fontFeatureSettings
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_fontFeatureSettings
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_animationName
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_animationName
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_animationDuration
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_animationDuration
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_animationTimingFunction
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_animationTimingFunction
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_animationDelay
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_animationDelay
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_animationDirection
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_animationDirection
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_animationPlayState
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_animationPlayState
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_animationIterationCount
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_animationIterationCount
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_animation
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_animation
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_animationFillMode
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_animationFillMode
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_flex
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_flex
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_flexDirection
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_flexDirection
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_flexWrap
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_flexWrap
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_flexFlow
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_flexFlow
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_flexGrow
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_flexGrow
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_flexShrink
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_flexShrink
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_flexBasis
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_flexBasis
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_justifyContent
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_justifyContent
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_alignItems
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_alignItems
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_alignSelf
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_alignSelf
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_alignContent
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_alignContent
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderImage
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderImage
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderImageSource
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderImageSource
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderImageSlice
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderImageSlice
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderImageWidth
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderImageWidth
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderImageOutset
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderImageOutset
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_borderImageRepeat
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_borderImageRepeat
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msImeAlign
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msImeAlign
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msTextCombineHorizontal
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msTextCombineHorizontal
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_touchAction
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_touchAction
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitAppearance
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitAppearance
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitUserSelect
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitUserSelect
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBoxAlign
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBoxAlign
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBoxOrdinalGroup
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBoxOrdinalGroup
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBoxPack
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBoxPack
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBoxFlex
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBoxFlex
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBoxOrient
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBoxOrient
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBoxDirection
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBoxDirection
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitTransform
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitTransform
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBackgroundSize
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBackgroundSize
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBackfaceVisibility
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBackfaceVisibility
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitAnimation
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitAnimation
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitTransition
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitTransition
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitAnimationName
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitAnimationName
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitAnimationDuration
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitAnimationDuration
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitAnimationTimingFunction
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitAnimationTimingFunction
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitAnimationDelay
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitAnimationDelay
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitAnimationIterationCount
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitAnimationIterationCount
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitAnimationDirection
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitAnimationDirection
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitAnimationPlayState
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitAnimationPlayState
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitTransitionProperty
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitTransitionProperty
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitTransitionDuration
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitTransitionDuration
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitTransitionTimingFunction
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitTransitionTimingFunction
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitTransitionDelay
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitTransitionDelay
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBackgroundAttachment
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBackgroundAttachment
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBackgroundColor
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBackgroundColor
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBackgroundClip
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBackgroundClip
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBackgroundImage
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBackgroundImage
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBackgroundRepeat
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBackgroundRepeat
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBackgroundOrigin
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBackgroundOrigin
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBackgroundPosition
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBackgroundPosition
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBackgroundPositionX
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBackgroundPositionX
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBackgroundPositionY
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBackgroundPositionY
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBackground
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBackground
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitTransformOrigin
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitTransformOrigin
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_msTextSizeAdjust
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_msTextSizeAdjust
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitTextSizeAdjust
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitTextSizeAdjust
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBorderImage
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBorderImage
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBorderImageSource
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBorderImageSource
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBorderImageSlice
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBorderImageSlice
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBorderImageWidth
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBorderImageWidth
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBorderImageOutset
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBorderImageOutset
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBorderImageRepeat
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBorderImageRepeat
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitBoxSizing
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitBoxSizing
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   procedure Put_webkitAnimationFillMode
     (This : DispHTMLRuleStyle_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

   function Get_webkitAnimationFillMode
     (This : DispHTMLRuleStyle_Type)
     return GNATCOM.Types.VARIANT;

   function msGetPropertyEnabled
     (This : DispHTMLRuleStyle_Type;
      name : GNATCOM.Types.VARIANT;
      Free : Boolean := True)
     return GNATCOM.Types.VARIANT;

   procedure msPutPropertyEnabled
     (This : DispHTMLRuleStyle_Type;
      name : GNATCOM.Types.VARIANT;
      b    : GNATCOM.Types.VARIANT;
      Free : Boolean := True);

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

end MSHTML.DispHTMLRuleStyle_Object;

