mshtml_tlb.pas

使用动态HTML的例子需要安装MS DHTML控制SDK(199KB)

    property textAlign: WideString read Get_textAlign write Set_textAlign;
    property textIndent: OleVariant read Get_textIndent write Set_textIndent;
    property lineHeight: OleVariant read Get_lineHeight write Set_lineHeight;
    property marginTop: OleVariant read Get_marginTop write Set_marginTop;
    property marginRight: OleVariant read Get_marginRight write Set_marginRight;
    property marginBottom: OleVariant read Get_marginBottom write Set_marginBottom;
    property marginLeft: OleVariant read Get_marginLeft write Set_marginLeft;
    property margin: WideString read Get_margin write Set_margin;
    property paddingTop: OleVariant read Get_paddingTop write Set_paddingTop;
    property paddingRight: OleVariant read Get_paddingRight write Set_paddingRight;
    property paddingBottom: OleVariant read Get_paddingBottom write Set_paddingBottom;
    property paddingLeft: OleVariant read Get_paddingLeft write Set_paddingLeft;
    property padding: WideString read Get_padding write Set_padding;
    property border: WideString read Get_border write Set_border;
    property borderTop: WideString read Get_borderTop write Set_borderTop;
    property borderRight: WideString read Get_borderRight write Set_borderRight;
    property borderBottom: WideString read Get_borderBottom write Set_borderBottom;
    property borderLeft: WideString read Get_borderLeft write Set_borderLeft;
    property borderColor: WideString read Get_borderColor write Set_borderColor;
    property borderTopColor: OleVariant read Get_borderTopColor write Set_borderTopColor;
    property borderRightColor: OleVariant read Get_borderRightColor write Set_borderRightColor;
    property borderBottomColor: OleVariant read Get_borderBottomColor write Set_borderBottomColor;
    property borderLeftColor: OleVariant read Get_borderLeftColor write Set_borderLeftColor;
    property borderWidth: WideString read Get_borderWidth write Set_borderWidth;
    property borderTopWidth: OleVariant read Get_borderTopWidth write Set_borderTopWidth;
    property borderRightWidth: OleVariant read Get_borderRightWidth write Set_borderRightWidth;
    property borderBottomWidth: OleVariant read Get_borderBottomWidth write Set_borderBottomWidth;
    property borderLeftWidth: OleVariant read Get_borderLeftWidth write Set_borderLeftWidth;
    property borderStyle: WideString read Get_borderStyle write Set_borderStyle;
    property borderTopStyle: WideString read Get_borderTopStyle write Set_borderTopStyle;
    property borderRightStyle: WideString read Get_borderRightStyle write Set_borderRightStyle;
    property borderBottomStyle: WideString read Get_borderBottomStyle write Set_borderBottomStyle;
    property borderLeftStyle: WideString read Get_borderLeftStyle write Set_borderLeftStyle;
    property width: OleVariant read Get_width write Set_width;
    property height: OleVariant read Get_height write Set_height;
    property styleFloat: WideString read Get_styleFloat write Set_styleFloat;
    property clear: WideString read Get_clear write Set_clear;
    property display: WideString read Get_display write Set_display;
    property visibility: WideString read Get_visibility write Set_visibility;
    property listStyleType: WideString read Get_listStyleType write Set_listStyleType;
    property listStylePosition: WideString read Get_listStylePosition write Set_listStylePosition;
    property listStyleImage: WideString read Get_listStyleImage write Set_listStyleImage;
    property listStyle: WideString read Get_listStyle write Set_listStyle;
    property whiteSpace: WideString read Get_whiteSpace write Set_whiteSpace;
    property top: OleVariant read Get_top write Set_top;
    property left: OleVariant read Get_left write Set_left;
    property position: WideString read Get_position;
    property zIndex: OleVariant read Get_zIndex write Set_zIndex;
    property overflow: WideString read Get_overflow write Set_overflow;
    property pageBreakBefore: WideString read Get_pageBreakBefore write Set_pageBreakBefore;
    property pageBreakAfter: WideString read Get_pageBreakAfter write Set_pageBreakAfter;
    property cssText: WideString read Get_cssText write Set_cssText;
    property pixelTop: Integer read Get_pixelTop write Set_pixelTop;
    property pixelLeft: Integer read Get_pixelLeft write Set_pixelLeft;
    property pixelWidth: Integer read Get_pixelWidth write Set_pixelWidth;
    property pixelHeight: Integer read Get_pixelHeight write Set_pixelHeight;
    property posTop: Single read Get_posTop write Set_posTop;
    property posLeft: Single read Get_posLeft write Set_posLeft;
    property posWidth: Single read Get_posWidth write Set_posWidth;
    property posHeight: Single read Get_posHeight write Set_posHeight;
    property cursor: WideString read Get_cursor write Set_cursor;
    property clip: WideString read Get_clip write Set_clip;
    property filter: WideString read Get_filter write Set_filter;
  end;

{ DispInterface declaration for Dual Interface IHTMLStyle }

  IHTMLStyleDisp = dispinterface
    ['{3050F25E-98B5-11CF-BB82-00AA00BDCE0B}']
    property fontFamily: WideString dispid -2147413094;
    property fontStyle: WideString dispid -2147413088;
    property fontVariant: WideString dispid -2147413087;
    property fontWeight: WideString dispid -2147413085;
    property fontSize: OleVariant dispid -2147413093;
    property font: WideString dispid -2147413071;
    property color: OleVariant dispid -2147413110;
    property background: WideString dispid -2147413080;
    property backgroundColor: OleVariant dispid -501;
    property backgroundImage: WideString dispid -2147413111;
    property backgroundRepeat: WideString dispid -2147413068;
    property backgroundAttachment: WideString dispid -2147413067;
    property backgroundPosition: WideString dispid -2147413066;
    property backgroundPositionX: OleVariant dispid -2147413079;
    property backgroundPositionY: OleVariant dispid -2147413078;
    property wordSpacing: OleVariant dispid -2147413065;
    property letterSpacing: OleVariant dispid -2147413104;
    property textDecoration: WideString dispid -2147413077;
    property textDecorationNone: WordBool dispid -2147413089;
    property textDecorationUnderline: WordBool dispid -2147413091;
    property textDecorationOverline: WordBool dispid -2147413043;
    property textDecorationLineThrough: WordBool dispid -2147413092;
    property textDecorationBlink: WordBool dispid -2147413090;
    property verticalAlign: OleVariant dispid -2147413064;
    property textTransform: WideString dispid -2147413108;
    property textAlign: WideString dispid -2147418040;
    property textIndent: OleVariant dispid -2147413105;
    property lineHeight: OleVariant dispid -2147413106;
    property marginTop: OleVariant dispid -2147413075;
    property marginRight: OleVariant dispid -2147413074;
    property marginBottom: OleVariant dispid -2147413073;
    property marginLeft: OleVariant dispid -2147413072;
    property margin: WideString dispid -2147413076;
    property paddingTop: OleVariant dispid -2147413100;
    property paddingRight: OleVariant dispid -2147413099;
    property paddingBottom: OleVariant dispid -2147413098;
    property paddingLeft: OleVariant dispid -2147413097;
    property padding: WideString dispid -2147413101;
    property border: WideString dispid -2147413063;
    property borderTop: WideString dispid -2147413062;
    property borderRight: WideString dispid -2147413061;
    property borderBottom: WideString dispid -2147413060;
    property borderLeft: WideString dispid -2147413059;
    property borderColor: WideString dispid -2147413058;
    property borderTopColor: OleVariant dispid -2147413057;
    property borderRightColor: OleVariant dispid -2147413056;
    property borderBottomColor: OleVariant dispid -2147413055;
    property borderLeftColor: OleVariant dispid -2147413054;
    property borderWidth: WideString dispid -2147413053;
    property borderTopWidth: OleVariant dispid -2147413052;
    property borderRightWidth: OleVariant dispid -2147413051;
    property borderBottomWidth: OleVariant dispid -2147413050;
    property borderLeftWidth: OleVariant dispid -2147413049;
    property borderStyle: WideString dispid -2147413048;
    property borderTopStyle: WideString dispid -2147413047;
    property borderRightStyle: WideString dispid -2147413046;
    property borderBottomStyle: WideString dispid -2147413045;
    property borderLeftStyle: WideString dispid -2147413044;
    property width: OleVariant dispid -2147418107;
    property height: OleVariant dispid -2147418106;
    property styleFloat: WideString dispid -2147413042;
    property clear: WideString dispid -2147413096;
    property display: WideString dispid -2147413041;
    property visibility: WideString dispid -2147413032;
    property listStyleType: WideString dispid -2147413040;
    property listStylePosition: WideString dispid -2147413039;
    property listStyleImage: WideString dispid -2147413038;
    property listStyle: WideString dispid -2147413037;
    property whiteSpace: WideString dispid -2147413036;
    property top: OleVariant dispid -2147418108;
    property left: OleVariant dispid -2147418109;
    property position: WideString readonly dispid -2147413022;
    property zIndex: OleVariant dispid -2147413021;
    property overflow: WideString dispid -2147413102;
    property pageBreakBefore: WideString dispid -2147413035;
    property pageBreakAfter: WideString dispid -2147413034;
    property cssText: WideString dispid -2147413013;
    property pixelTop: Integer dispid -2147414112;
    property pixelLeft: Integer dispid -2147414111;
    property pixelWidth: Integer dispid -2147414110;
    property pixelHeight: Integer dispid -2147414109;
    property posTop: Single dispid -2147414108;
    property posLeft: Single dispid -2147414107;
    property posWidth: Single dispid -2147414106;
    property posHeight: Single dispid -2147414105;
    property cursor: WideString dispid -2147413010;
    property clip: WideString dispid -2147413020;
    property filter: WideString dispid -2147413030;
    procedure setAttribute(const strAttributeName: WideString; AttributeValue: OleVariant; lFlags: Integer); dispid -2147417611;
    function getAttribute(const strAttributeName: WideString; lFlags: Integer): OleVariant; dispid -2147417610;
    function removeAttribute(const strAttributeName: WideString; lFlags: Integer): WordBool; dispid -2147417609;
    function toString: WideString; dispid -2147414104;
  end;

  IHTMLRuleStyle = interface(IDispatch)
    ['{3050F3CF-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_fontFamily(const Value: WideString); safecall;
    function Get_fontFamily: WideString; safecall;
    procedure Set_fontStyle(const Value: WideString); safecall;
    function Get_fontStyle: WideString; safecall;
    procedure Set_fontVariant(const Value: WideString); safecall;
    function Get_fontVariant: WideString; safecall;
    procedure Set_fontWeight(const Value: WideString); safecall;
    function Get_fontWeight: WideString; safecall;
    procedure Set_fontSize(Value: OleVariant); safecall;
    function Get_fontSize: OleVariant; safecall;
    procedure Set_font(const Value: WideString); safecall;
    function Get_font: WideString; safecall;
    procedure Set_color(Value: OleVariant); safecall;
    function Get_color: OleVariant; safecall;
    procedure Set_background(const Value: WideString); safecall;
    function Get_background: WideString; safecall;
    procedure Set_backgroundColor(Value: OleVariant); safecall;
    function Get_backgroundColor: OleVariant; safecall;
    procedure Set_backgroundImage(const Value: WideString); safecall;
    function Get_backgroundImage: WideString; safecall;
    procedure Set_backgroundRepeat(const Value: WideString); safecall;
    function Get_backgroundRepeat: WideString; safecall;
    procedure Set_backgroundAttachment(const Value: WideString); safecall;
    function Get_backgroundAttachment: WideString; safecall;
    procedure Set_backgroundPosition(const Value: WideString); safecall;
    function Get_backgroundPosition: WideString; safecall;
    procedure Set_backgroundPositionX(Value: OleVariant); safecall;
    function Get_backgroundPositionX: OleVariant; safecall;
    procedure Set_backgroundPositionY(Value: OleVariant); safecall;
    function Get_backgroundPositionY: OleVariant; safecall;
    procedure Set_wordSpacing(Value: OleVariant); safecall;
    function Get_wordSpacing: OleVariant; safecall;
    procedure Set_letterSpacing(Value: OleVariant); safecall;
    function Get_letterSpacing: OleVariant; safecall;
    procedure Set_textDecoration(const Value: WideString); safecall;
    function Get_textDecoration: WideString; safecall;
    procedure Set_textDecorationNone(Value: WordBool); safecall;
    function Get_textDecorationNone: WordBool; safecall;
    procedure Set_textDecorationUnderline(Value: WordBool); safecall;
    function Get_textDecorationUnderline: WordBool; safecall;
    procedure Set_textDecorationOverline(Value: WordBool); safecall;
    function Get_textDecorationOverline: WordBool; safecall;
    procedure Set_textDecorationLineThrough(Value: WordBool); safecall;
    function Get_textDecorationLineThrough: WordBool; safecall;
    procedure Set_textDecorationBlink(Value: WordBool); safecall;
    function Get_textDecorationBlink: WordBool; safecall;
    procedure Set_verticalAlign(Value: OleVariant); safecall;
    function Get_verticalAlign: OleVariant; safecall;
    procedure Set_textTransform(const Value: WideString); safecall;
    function Get_textTransform: WideString; safecall;
    procedure Set_textAlign(const Value: WideString); safecall;
    function Get_textAlign: WideString; safecall;
    procedure Set_textIndent(Value: OleVariant); safecall;
    function Get_textIndent: OleVariant; safecall;
    procedure Set_lineHeight(Value: OleVariant); safecall;
    function Get_lineHeight: OleVariant; safecall;
    procedure Set_marginTop(Value: OleVariant); safecall;
    function Get_marginTop: OleVariant; safecall;
    procedure Set_marginRight(Value: OleVariant); safecall;
    function Get_marginRight: OleVariant; safecall;
    procedure Set_marginBottom(Value: OleVariant); safecall;
    function Get_marginBottom: OleVariant; safecall;
    procedure Set_marginLeft(Value: OleVariant); safecall;
    function Get_marginLeft: OleVariant; safecall;
    procedure Set_margin(const Value: WideString); safecall;
    function Get_margin: WideString; safecall;
    procedure Set_paddingTop(Value: OleVariant); safecall;