unit MSHTML_TLB;

{ This file contains pascal declarations imported from a type library.
  This file will be written during each import or refresh of the type
  library editor.  Changes to this file will be discarded during the
  refresh process. }

{ Microsoft HTML Object Library }
{ Version 4.0 }


interface

uses Windows, ActiveX, Classes, Graphics, OleCtrls, StdVCL;

const
  LIBID_MSHTML: TGUID = '{3050F1C5-98B5-11CF-BB82-00AA00BDCE0B}';

const

{ Component class GUIDs }
  Class_HTMLStyle: TGUID = '{3050F285-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLRuleStyle: TGUID = '{3050F3D0-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLFiltersCollection: TGUID = '{3050F3EF-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLStyleSheetRule: TGUID = '{3050F3CE-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLStyleSheetRulesCollection: TGUID = '{3050F3CD-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLStyleSheet: TGUID = '{3050F2E4-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLStyleSheetsCollection: TGUID = '{3050F37F-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLLinkElement: TGUID = '{3050F277-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLFormElement: TGUID = '{3050F251-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLTextElement: TGUID = '{3050F26A-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLImg: TGUID = '{3050F241-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLInputImage: TGUID = '{3050F2C4-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLImageElementFactory: TGUID = '{3050F38F-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLBody: TGUID = '{3050F24A-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLFontElement: TGUID = '{3050F27B-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLAnchorElement: TGUID = '{3050F248-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLLabelElement: TGUID = '{3050F32B-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLListElement: TGUID = '{3050F272-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLUListElement: TGUID = '{3050F269-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLOListElement: TGUID = '{3050F270-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLLIElement: TGUID = '{3050F273-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLBlockElement: TGUID = '{3050F281-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLDivElement: TGUID = '{3050F27E-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLDDElement: TGUID = '{3050F27F-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLDTElement: TGUID = '{3050F27C-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLBRElement: TGUID = '{3050F280-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLDListElement: TGUID = '{3050F27D-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLHRElement: TGUID = '{3050F252-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLParaElement: TGUID = '{3050F26F-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLHeaderElement: TGUID = '{3050F27A-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLSelectElement: TGUID = '{3050F245-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLOptionElement: TGUID = '{3050F24D-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLOptionElementFactory: TGUID = '{3050F38D-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLInputTextElement: TGUID = '{3050F2AB-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLTextAreaElement: TGUID = '{3050F2AC-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLInputButtonElement: TGUID = '{3050F2B4-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLButtonElement: TGUID = '{3050F2C6-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLInputFileElement: TGUID = '{3050F2AE-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLMarqueeElement: TGUID = '{3050F2B9-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLOptionButtonElement: TGUID = '{3050F2BE-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLTitleElement: TGUID = '{3050F284-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLMetaElement: TGUID = '{3050F275-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLBaseElement: TGUID = '{3050F276-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLIsIndexElement: TGUID = '{3050F278-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLNextIdElement: TGUID = '{3050F279-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLBaseFontElement: TGUID = '{3050F282-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLUnknownElement: TGUID = '{3050F268-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLHistory: TGUID = '{FECEAAA3-8405-11CF-8BA1-00AA00476DA6}';
  Class_CMimeTypes: TGUID = '{3050F3FE-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_CPlugins: TGUID = '{3050F3FF-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_COpsProfile: TGUID = '{3050F402-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLNavigator: TGUID = '{FECEAAA6-8405-11CF-8BA1-00AA00476DA6}';
  Class_HTMLLocation: TGUID = '{163BB1E1-6E00-11CF-837A-48DC04C10000}';
  Class_HTMLScreen: TGUID = '{3050F35D-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLWindow2: TGUID = '{D48A6EC6-6A4A-11CF-94A7-444553540000}';
  Class_HTMLWindowProxy: TGUID = '{3050F391-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLDocument: TGUID = '{25336920-03F9-11CF-8FD0-00AA00686F13}';
  Class_HTMLEmbed: TGUID = '{3050F25D-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLMapElement: TGUID = '{3050F271-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLAreaElement: TGUID = '{3050F283-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLTableCaption: TGUID = '{3050F2EC-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLCommentElement: TGUID = '{3050F317-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLPhraseElement: TGUID = '{3050F26E-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLSpanElement: TGUID = '{3050F3F5-98B4-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLTable: TGUID = '{3050F26B-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLTableCol: TGUID = '{3050F26C-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLTableSection: TGUID = '{3050F2E9-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLTableRow: TGUID = '{3050F26D-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLTableCell: TGUID = '{3050F246-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLScriptElement: TGUID = '{3050F28C-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLNoShowElement: TGUID = '{3050F38B-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLObjectElement: TGUID = '{3050F24E-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLFrameBase: TGUID = '{3050F312-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLFrameElement: TGUID = '{3050F314-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLIFrame: TGUID = '{3050F316-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLDivPosition: TGUID = '{3050F249-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLFieldSetElement: TGUID = '{3050F3E8-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLLegendElement: TGUID = '{3050F3E9-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLSpanFlow: TGUID = '{3050F3E6-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLFrameSetSite: TGUID = '{3050F31A-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLBGsound: TGUID = '{3050F370-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLStyleElement: TGUID = '{3050F37D-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLStyleFontFace: TGUID = '{3050F3D4-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_HTMLDialog: TGUID = '{3050F28A-98B5-11CF-BB82-00AA00BDCE0B}';
  Class_OldHTMLDocument: TGUID = '{D48A6EC9-6A4A-11CF-94A7-444553540000}';
  Class_OldHTMLFormElement: TGUID = '{0D04D285-6BEC-11CF-8B97-00AA00476DA6}';

type

{ Forward declarations: Interfaces }
  IHTMLStyle = interface;
  IHTMLStyleDisp = dispinterface;
  IHTMLRuleStyle = interface;
  IHTMLRuleStyleDisp = dispinterface;
  IHTMLElement = interface;
  IHTMLElementDisp = dispinterface;
  IHTMLFiltersCollection = interface;
  IHTMLFiltersCollectionDisp = dispinterface;
  ICSSFilterSite = interface;
  ICSSFilterSiteDisp = dispinterface;
  ICSSFilter = interface;
  ICSSFilterDisp = dispinterface;
  HTMLElementEvents = dispinterface;
  IHTMLDatabinding = interface;
  IHTMLDatabindingDisp = dispinterface;
  IHTMLStyleSheetRule = interface;
  IHTMLStyleSheetRuleDisp = dispinterface;
  IHTMLStyleSheetRulesCollection = interface;
  IHTMLStyleSheetRulesCollectionDisp = dispinterface;
  IHTMLStyleSheetsCollection = interface;
  IHTMLStyleSheetsCollectionDisp = dispinterface;
  IHTMLStyleSheet = interface;
  IHTMLStyleSheetDisp = dispinterface;
  HTMLLinkElementEvents = dispinterface;
  IHTMLLinkElement = interface;
  IHTMLLinkElementDisp = dispinterface;
  DispIHTMLLinkElement = dispinterface;
  IHTMLTxtRange = interface;
  IHTMLTxtRangeDisp = dispinterface;
  HTMLFormElementEvents = dispinterface;
  IHTMLFormElement = interface;
  IHTMLFormElementDisp = dispinterface;
  DispIHTMLFormElement = dispinterface;
  HTMLControlElementEvents = dispinterface;
  IHTMLControlElement = interface;
  IHTMLControlElementDisp = dispinterface;
  DispIHTMLControlElement = dispinterface;
  IHTMLTextElement = interface;
  IHTMLTextElementDisp = dispinterface;
  DispIHTMLTextElement = dispinterface;
  HTMLTextContainerEvents = dispinterface;
  IHTMLTextContainer = interface;
  IHTMLTextContainerDisp = dispinterface;
  DispIHTMLTextContainer = dispinterface;
  IHTMLControlRange = interface;
  IHTMLControlRangeDisp = dispinterface;
  HTMLImgEvents = dispinterface;
  HTMLInputImageEvents = dispinterface;
  IHTMLImgElement = interface;
  IHTMLImgElementDisp = dispinterface;
  IHTMLInputImage = interface;
  IHTMLInputImageDisp = dispinterface;
  IHTMLImageElementFactory = interface;
  IHTMLImageElementFactoryDisp = dispinterface;
  DispIHTMLImgElement = dispinterface;
  DispIHTMLInputImage = dispinterface;
  IHTMLBodyElement = interface;
  IHTMLBodyElementDisp = dispinterface;
  DispIHTMLBodyElement = dispinterface;
  IHTMLFontElement = interface;
  IHTMLFontElementDisp = dispinterface;
  DispIHTMLFontElement = dispinterface;
  HTMLAnchorEvents = dispinterface;
  IHTMLAnchorElement = interface;
  IHTMLAnchorElementDisp = dispinterface;
  DispIHTMLAnchorElement = dispinterface;
  HTMLLabelEvents = dispinterface;
  IHTMLLabelElement = interface;
  IHTMLLabelElementDisp = dispinterface;
  DispIHTMLLabelElement = dispinterface;
  IHTMLListElement = interface;
  IHTMLListElementDisp = dispinterface;
  DispIHTMLListElement = dispinterface;
  IHTMLUListElement = interface;
  IHTMLUListElementDisp = dispinterface;
  DispIHTMLUListElement = dispinterface;
  IHTMLOListElement = interface;
  IHTMLOListElementDisp = dispinterface;
  DispIHTMLOListElement = dispinterface;
  IHTMLLIElement = interface;
  IHTMLLIElementDisp = dispinterface;
  DispIHTMLLIElement = dispinterface;
  IHTMLBlockElement = interface;
  IHTMLBlockElementDisp = dispinterface;
  DispIHTMLBlockElement = dispinterface;
  IHTMLDivElement = interface;
  IHTMLDivElementDisp = dispinterface;
  DispIHTMLDivElement = dispinterface;
  IHTMLDDElement = interface;
  IHTMLDDElementDisp = dispinterface;
  DispIHTMLDDElement = dispinterface;
  IHTMLDTElement = interface;
  IHTMLDTElementDisp = dispinterface;
  DispIHTMLDTElement = dispinterface;
  IHTMLBRElement = interface;
  IHTMLBRElementDisp = dispinterface;
  DispIHTMLBRElement = dispinterface;
  IHTMLDListElement = interface;
  IHTMLDListElementDisp = dispinterface;
  DispIHTMLDListElement = dispinterface;
  IHTMLHRElement = interface;
  IHTMLHRElementDisp = dispinterface;
  DispIHTMLHRElement = dispinterface;
  IHTMLParaElement = interface;
  IHTMLParaElementDisp = dispinterface;
  DispIHTMLParaElement = dispinterface;
  IHTMLElementCollection = interface;
  IHTMLElementCollectionDisp = dispinterface;
  IHTMLHeaderElement = interface;
  IHTMLHeaderElementDisp = dispinterface;
  DispIHTMLHeaderElement = dispinterface;
  HTMLSelectElementEvents = dispinterface;
  IHTMLSelectElement = interface;
  IHTMLSelectElementDisp = dispinterface;
  DispIHTMLSelectElement = dispinterface;
  IHTMLSelectionObject = interface;
  IHTMLSelectionObjectDisp = dispinterface;
  IHTMLOptionElement = interface;
  IHTMLOptionElementDisp = dispinterface;
  IHTMLOptionElementFactory = interface;
  IHTMLOptionElementFactoryDisp = dispinterface;
  DispIHTMLOptionElement = dispinterface;
  HTMLInputTextElementEvents = dispinterface;
  IHTMLInputHiddenElement = interface;
  IHTMLInputHiddenElementDisp = dispinterface;
  IHTMLInputTextElement = interface;
  IHTMLInputTextElementDisp = dispinterface;
  IHTMLTextAreaElement = interface;
  IHTMLTextAreaElementDisp = dispinterface;
  DispIHTMLInputTextElement = dispinterface;
  DispIHTMLTextAreaElement = dispinterface;
  HTMLButtonElementEvents = dispinterface;
  IHTMLInputButtonElement = interface;
  IHTMLInputButtonElementDisp = dispinterface;
  IHTMLButtonElement = interface;
  IHTMLButtonElementDisp = dispinterface;
  DispIHTMLInputButtonElement = dispinterface;
  DispIHTMLButtonElement = dispinterface;
  HTMLInputFileElementEvents = dispinterface;
  IHTMLInputFileElement = interface;
  IHTMLInputFileElementDisp = dispinterface;
  DispIHTMLInputFileElement = dispinterface;
  HTMLMarqueeElementEvents = dispinterface;
  IHTMLMarqueeElement = interface;
  IHTMLMarqueeElementDisp = dispinterface;
  DispIHTMLMarqueeElement = dispinterface;
  HTMLOptionButtonElementEvents = dispinterface;
  IHTMLOptionButtonElement = interface;
  IHTMLOptionButtonElementDisp = dispinterface;
  DispIHTMLOptionButtonElement = dispinterface;
  IHTMLTitleElement = interface;
  IHTMLTitleElementDisp = dispinterface;
  IHTMLMetaElement = interface;
  IHTMLMetaElementDisp = dispinterface;
  IHTMLBaseElement = interface;
  IHTMLBaseElementDisp = dispinterface;
  IHTMLIsIndexElement = interface;
  IHTMLIsIndexElementDisp = dispinterface;
  IHTMLNextIdElement = interface;
  IHTMLNextIdElementDisp = dispinterface;
  DispIHTMLTitleElement = dispinterface;
  DispIHTMLMetaElement = dispinterface;
  DispIHTMLBaseElement = dispinterface;
  DispIHTMLIsIndexElement = dispinterface;
  DispIHTMLNextIdElement = dispinterface;
  IHTMLBaseFontElement = interface;
  IHTMLBaseFontElementDisp = dispinterface;
  DispIHTMLBaseFontElement = dispinterface;
  IHTMLUnknownElement = interface;
  IHTMLUnknownElementDisp = dispinterface;
  DispIHTMLUnknownElement = dispinterface;
  IOmHistory = interface;
  IOmHistoryDisp = dispinterface;
  IHTMLMimeTypesCollection = interface;
  IHTMLMimeTypesCollectionDisp = dispinterface;
  IHTMLPluginsCollection = interface;
  IHTMLPluginsCollectionDisp = dispinterface;
  IHTMLOpsProfile = interface;
  IHTMLOpsProfileDisp = dispinterface;
  IOmNavigator = interface;
  IOmNavigatorDisp = dispinterface;
  IHTMLLocation = interface;
  IHTMLLocationDisp = dispinterface;
  HTMLWindowEvents = dispinterface;
  IHTMLDocument = interface;
  IHTMLDocumentDisp = dispinterface;
  IHTMLDocument2 = interface;
  IHTMLDocument2Disp = dispinterface;
  IHTMLFramesCollection2 = interface;
  IHTMLFramesCollection2Disp = dispinterface;
  IHTMLWindow2 = interface;
  IHTMLWindow2Disp = dispinterface;
  IHTMLEventObj = interface;
  IHTMLEventObjDisp = dispinterface;
  IHTMLScreen = interface;
  IHTMLScreenDisp = dispinterface;
  HTMLDocumentEvents = dispinterface;
  IHTMLEmbedElement = interface;
  IHTMLEmbedElementDisp = dispinterface;
  DispIHTMLEmbedElement = dispinterface;
  HTMLMapEvents = dispinterface;
  IHTMLAreasCollection = interface;
  IHTMLAreasCollectionDisp = dispinterface;
  IHTMLMapElement = interface;
  IHTMLMapElementDisp = dispinterface;
  DispIHTMLMapElement = dispinterface;
  HTMLAreaEvents = dispinterface;
  IHTMLAreaElement = interface;
  IHTMLAreaElementDisp = dispinterface;
  DispIHTMLAreaElement = dispinterface;
  IHTMLTableCaption = interface;
  IHTMLTableCaptionDisp = dispinterface;
  DispIHTMLTableCaption = dispinterface;
  IHTMLCommentElement = interface;
  IHTMLCommentElementDisp = dispinterface;
  DispIHTMLCommentElement = dispinterface;
  IHTMLPhraseElement = interface;
  IHTMLPhraseElementDisp = dispinterface;
  IHTMLSpanElement = interface;
  IHTMLSpanElementDisp = dispinterface;
  DispIHTMLPhraseElement = dispinterface;
  DispIHTMLSpanElement = dispinterface;
  HTMLTableEvents = dispinterface;
  IHTMLTableSection = interface;
  IHTMLTableSectionDisp = dispinterface;
  IHTMLTable = interface;
  IHTMLTableDisp = dispinterface;
  IHTMLTableCol = interface;
  IHTMLTableColDisp = dispinterface;
  IHTMLTableRow = interface;
  IHTMLTableRowDisp = dispinterface;
  IHTMLTableCell = interface;
  IHTMLTableCellDisp = dispinterface;
  DispIHTMLTable = dispinterface;
  DispIHTMLTableCol = dispinterface;
  DispIHTMLTableSection = dispinterface;
  DispIHTMLTableRow = dispinterface;
  DispIHTMLTableCell = dispinterface;
  HTMLScriptEvents = dispinterface;
  IHTMLScriptElement = interface;
  IHTMLScriptElementDisp = dispinterface;
  DispIHTMLScriptElement = dispinterface;
  IHTMLNoShowElement = interface;
  IHTMLNoShowElementDisp = dispinterface;
  DispIHTMLNoShowElement = dispinterface;
  HTMLObjectElementEvents = dispinterface;
  IHTMLObjectElement = interface;
  IHTMLObjectElementDisp = dispinterface;
  DispIHTMLObjectElement = dispinterface;
  IHTMLFrameBase = interface;
  IHTMLFrameBaseDisp = dispinterface;
  DispIHTMLFrameBase = dispinterface;
  IHTMLFrameElement = interface;
  IHTMLFrameElementDisp = dispinterface;
  DispIHTMLFrameElement = dispinterface;
  IHTMLIFrameElement = interface;
  IHTMLIFrameElementDisp = dispinterface;
  DispIHTMLIFrameElement = dispinterface;
  IHTMLDivPosition = interface;
  IHTMLDivPositionDisp = dispinterface;
  IHTMLFieldSetElement = interface;
  IHTMLFieldSetElementDisp = dispinterface;
  IHTMLLegendElement = interface;
  IHTMLLegendElementDisp = dispinterface;
  DispIHTMLDivPosition = dispinterface;
  DispIHTMLFieldSetElement = dispinterface;
  DispIHTMLLegendElement = dispinterface;
  IHTMLSpanFlow = interface;
  IHTMLSpanFlowDisp = dispinterface;
  DispIHTMLSpanFlow = dispinterface;
  IHTMLFrameSetElement = interface;
  IHTMLFrameSetElementDisp = dispinterface;
  DispIHTMLFrameSetElement = dispinterface;
  IHTMLBGsound = interface;
  IHTMLBGsoundDisp = dispinterface;
  DispIHTMLBGsound = dispinterface;
  IHTMLFontNamesCollection = interface;
  IHTMLFontNamesCollectionDisp = dispinterface;
  IHTMLFontSizesCollection = interface;
  IHTMLFontSizesCollectionDisp = dispinterface;
  IHTMLOptionsHolder = interface;
  IHTMLOptionsHolderDisp = dispinterface;
  HTMLStyleElementEvents = dispinterface;
  IHTMLStyleElement = interface;
  IHTMLStyleElementDisp = dispinterface;
  DispIHTMLStyleElement = dispinterface;
  IHTMLStyleFontFace = interface;
  IHTMLStyleFontFaceDisp = dispinterface;
  IHTMLDialog = interface;
  IHTMLDialogDisp = dispinterface;

{ Forward declarations: CoClasses }
  HTMLStyle = IHTMLStyle;
  HTMLRuleStyle = IHTMLRuleStyle;
  HTMLFiltersCollection = IHTMLFiltersCollection;
  HTMLStyleSheetRule = IHTMLStyleSheetRule;
  HTMLStyleSheetRulesCollection = IHTMLStyleSheetRulesCollection;
  HTMLStyleSheet = IHTMLStyleSheet;
  HTMLStyleSheetsCollection = IHTMLStyleSheetsCollection;
  HTMLLinkElement = DispIHTMLLinkElement;
  HTMLFormElement = DispIHTMLFormElement;
  HTMLTextElement = DispIHTMLTextElement;
  HTMLImg = DispIHTMLImgElement;
  HTMLInputImage = DispIHTMLInputImage;
  HTMLImageElementFactory = IHTMLImageElementFactory;
  HTMLBody = DispIHTMLBodyElement;
  HTMLFontElement = DispIHTMLFontElement;
  HTMLAnchorElement = DispIHTMLAnchorElement;
  HTMLLabelElement = DispIHTMLLabelElement;
  HTMLListElement = DispIHTMLListElement;
  HTMLUListElement = DispIHTMLUListElement;
  HTMLOListElement = DispIHTMLOListElement;
  HTMLLIElement = DispIHTMLLIElement;
  HTMLBlockElement = DispIHTMLBlockElement;
  HTMLDivElement = DispIHTMLDivElement;
  HTMLDDElement = DispIHTMLDDElement;
  HTMLDTElement = DispIHTMLDTElement;
  HTMLBRElement = DispIHTMLBRElement;
  HTMLDListElement = DispIHTMLDListElement;
  HTMLHRElement = DispIHTMLHRElement;
  HTMLParaElement = DispIHTMLParaElement;
  HTMLHeaderElement = DispIHTMLHeaderElement;
  HTMLSelectElement = DispIHTMLSelectElement;
  HTMLOptionElement = DispIHTMLOptionElement;
  HTMLOptionElementFactory = IHTMLOptionElementFactory;
  HTMLInputTextElement = DispIHTMLInputTextElement;
  HTMLTextAreaElement = DispIHTMLTextAreaElement;
  HTMLInputButtonElement = DispIHTMLInputButtonElement;
  HTMLButtonElement = DispIHTMLButtonElement;
  HTMLInputFileElement = DispIHTMLInputFileElement;
  HTMLMarqueeElement = DispIHTMLMarqueeElement;
  HTMLOptionButtonElement = DispIHTMLOptionButtonElement;
  HTMLTitleElement = DispIHTMLTitleElement;
  HTMLMetaElement = DispIHTMLMetaElement;
  HTMLBaseElement = DispIHTMLBaseElement;
  HTMLIsIndexElement = DispIHTMLIsIndexElement;
  HTMLNextIdElement = DispIHTMLNextIdElement;
  HTMLBaseFontElement = DispIHTMLBaseFontElement;
  HTMLUnknownElement = DispIHTMLUnknownElement;
  HTMLHistory = IOmHistory;
  CMimeTypes = IHTMLMimeTypesCollection;
  CPlugins = IHTMLPluginsCollection;
  COpsProfile = IHTMLOpsProfile;
  HTMLNavigator = IOmNavigator;
  HTMLLocation = IHTMLLocation;
  HTMLScreen = IHTMLScreen;
  HTMLWindow2 = IHTMLWindow2;
  HTMLWindowProxy = IHTMLWindow2;
  HTMLDocument = IHTMLDocument2;
  HTMLEmbed = DispIHTMLEmbedElement;
  HTMLMapElement = DispIHTMLMapElement;
  HTMLAreaElement = DispIHTMLAreaElement;
  HTMLTableCaption = DispIHTMLTableCaption;
  HTMLCommentElement = DispIHTMLCommentElement;
  HTMLPhraseElement = DispIHTMLPhraseElement;
  HTMLSpanElement = DispIHTMLSpanElement;
  HTMLTable = DispIHTMLTable;
  HTMLTableCol = DispIHTMLTableCol;
  HTMLTableSection = DispIHTMLTableSection;
  HTMLTableRow = DispIHTMLTableRow;
  HTMLTableCell = DispIHTMLTableCell;
  HTMLScriptElement = DispIHTMLScriptElement;
  HTMLNoShowElement = DispIHTMLNoShowElement;
  HTMLObjectElement = DispIHTMLObjectElement;
  HTMLFrameBase = DispIHTMLFrameBase;
  HTMLFrameElement = DispIHTMLFrameElement;
  HTMLIFrame = DispIHTMLIFrameElement;
  HTMLDivPosition = DispIHTMLDivPosition;
  HTMLFieldSetElement = DispIHTMLFieldSetElement;
  HTMLLegendElement = DispIHTMLLegendElement;
  HTMLSpanFlow = DispIHTMLSpanFlow;
  HTMLFrameSetSite = DispIHTMLFrameSetElement;
  HTMLBGsound = DispIHTMLBGsound;
  HTMLStyleElement = DispIHTMLStyleElement;
  HTMLStyleFontFace = IHTMLStyleFontFace;
  HTMLDialog = IHTMLDialog;
  OldHTMLDocument = IHTMLDocument2;
  OldHTMLFormElement = DispIHTMLFormElement;

  IHTMLStyle = interface(IDispatch)
    ['{3050F25E-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;
    function Get_paddingTop: OleVariant; safecall;
    procedure Set_paddingRight(Value: OleVariant); safecall;
    function Get_paddingRight: OleVariant; safecall;
    procedure Set_paddingBottom(Value: OleVariant); safecall;
    function Get_paddingBottom: OleVariant; safecall;
    procedure Set_paddingLeft(Value: OleVariant); safecall;
    function Get_paddingLeft: OleVariant; safecall;
    procedure Set_padding(const Value: WideString); safecall;
    function Get_padding: WideString; safecall;
    procedure Set_border(const Value: WideString); safecall;
    function Get_border: WideString; safecall;
    procedure Set_borderTop(const Value: WideString); safecall;
    function Get_borderTop: WideString; safecall;
    procedure Set_borderRight(const Value: WideString); safecall;
    function Get_borderRight: WideString; safecall;
    procedure Set_borderBottom(const Value: WideString); safecall;
    function Get_borderBottom: WideString; safecall;
    procedure Set_borderLeft(const Value: WideString); safecall;
    function Get_borderLeft: WideString; safecall;
    procedure Set_borderColor(const Value: WideString); safecall;
    function Get_borderColor: WideString; safecall;
    procedure Set_borderTopColor(Value: OleVariant); safecall;
    function Get_borderTopColor: OleVariant; safecall;
    procedure Set_borderRightColor(Value: OleVariant); safecall;
    function Get_borderRightColor: OleVariant; safecall;
    procedure Set_borderBottomColor(Value: OleVariant); safecall;
    function Get_borderBottomColor: OleVariant; safecall;
    procedure Set_borderLeftColor(Value: OleVariant); safecall;
    function Get_borderLeftColor: OleVariant; safecall;
    procedure Set_borderWidth(const Value: WideString); safecall;
    function Get_borderWidth: WideString; safecall;
    procedure Set_borderTopWidth(Value: OleVariant); safecall;
    function Get_borderTopWidth: OleVariant; safecall;
    procedure Set_borderRightWidth(Value: OleVariant); safecall;
    function Get_borderRightWidth: OleVariant; safecall;
    procedure Set_borderBottomWidth(Value: OleVariant); safecall;
    function Get_borderBottomWidth: OleVariant; safecall;
    procedure Set_borderLeftWidth(Value: OleVariant); safecall;
    function Get_borderLeftWidth: OleVariant; safecall;
    procedure Set_borderStyle(const Value: WideString); safecall;
    function Get_borderStyle: WideString; safecall;
    procedure Set_borderTopStyle(const Value: WideString); safecall;
    function Get_borderTopStyle: WideString; safecall;
    procedure Set_borderRightStyle(const Value: WideString); safecall;
    function Get_borderRightStyle: WideString; safecall;
    procedure Set_borderBottomStyle(const Value: WideString); safecall;
    function Get_borderBottomStyle: WideString; safecall;
    procedure Set_borderLeftStyle(const Value: WideString); safecall;
    function Get_borderLeftStyle: WideString; safecall;
    procedure Set_width(Value: OleVariant); safecall;
    function Get_width: OleVariant; safecall;
    procedure Set_height(Value: OleVariant); safecall;
    function Get_height: OleVariant; safecall;
    procedure Set_styleFloat(const Value: WideString); safecall;
    function Get_styleFloat: WideString; safecall;
    procedure Set_clear(const Value: WideString); safecall;
    function Get_clear: WideString; safecall;
    procedure Set_display(const Value: WideString); safecall;
    function Get_display: WideString; safecall;
    procedure Set_visibility(const Value: WideString); safecall;
    function Get_visibility: WideString; safecall;
    procedure Set_listStyleType(const Value: WideString); safecall;
    function Get_listStyleType: WideString; safecall;
    procedure Set_listStylePosition(const Value: WideString); safecall;
    function Get_listStylePosition: WideString; safecall;
    procedure Set_listStyleImage(const Value: WideString); safecall;
    function Get_listStyleImage: WideString; safecall;
    procedure Set_listStyle(const Value: WideString); safecall;
    function Get_listStyle: WideString; safecall;
    procedure Set_whiteSpace(const Value: WideString); safecall;
    function Get_whiteSpace: WideString; safecall;
    procedure Set_top(Value: OleVariant); safecall;
    function Get_top: OleVariant; safecall;
    procedure Set_left(Value: OleVariant); safecall;
    function Get_left: OleVariant; safecall;
    function Get_position: WideString; safecall;
    procedure Set_zIndex(Value: OleVariant); safecall;
    function Get_zIndex: OleVariant; safecall;
    procedure Set_overflow(const Value: WideString); safecall;
    function Get_overflow: WideString; safecall;
    procedure Set_pageBreakBefore(const Value: WideString); safecall;
    function Get_pageBreakBefore: WideString; safecall;
    procedure Set_pageBreakAfter(const Value: WideString); safecall;
    function Get_pageBreakAfter: WideString; safecall;
    procedure Set_cssText(const Value: WideString); safecall;
    function Get_cssText: WideString; safecall;
    procedure Set_pixelTop(Value: Integer); safecall;
    function Get_pixelTop: Integer; safecall;
    procedure Set_pixelLeft(Value: Integer); safecall;
    function Get_pixelLeft: Integer; safecall;
    procedure Set_pixelWidth(Value: Integer); safecall;
    function Get_pixelWidth: Integer; safecall;
    procedure Set_pixelHeight(Value: Integer); safecall;
    function Get_pixelHeight: Integer; safecall;
    procedure Set_posTop(Value: Single); safecall;
    function Get_posTop: Single; safecall;
    procedure Set_posLeft(Value: Single); safecall;
    function Get_posLeft: Single; safecall;
    procedure Set_posWidth(Value: Single); safecall;
    function Get_posWidth: Single; safecall;
    procedure Set_posHeight(Value: Single); safecall;
    function Get_posHeight: Single; safecall;
    procedure Set_cursor(const Value: WideString); safecall;
    function Get_cursor: WideString; safecall;
    procedure Set_clip(const Value: WideString); safecall;
    function Get_clip: WideString; safecall;
    procedure Set_filter(const Value: WideString); safecall;
    function Get_filter: WideString; safecall;
    procedure setAttribute(const strAttributeName: WideString; AttributeValue: OleVariant; lFlags: Integer); safecall;
    function getAttribute(const strAttributeName: WideString; lFlags: Integer): OleVariant; safecall;
    function removeAttribute(const strAttributeName: WideString; lFlags: Integer): WordBool; safecall;
    function toString: WideString; safecall;
    property fontFamily: WideString read Get_fontFamily write Set_fontFamily;
    property fontStyle: WideString read Get_fontStyle write Set_fontStyle;
    property fontVariant: WideString read Get_fontVariant write Set_fontVariant;
    property fontWeight: WideString read Get_fontWeight write Set_fontWeight;
    property fontSize: OleVariant read Get_fontSize write Set_fontSize;
    property font: WideString read Get_font write Set_font;
    property color: OleVariant read Get_color write Set_color;
    property background: WideString read Get_background write Set_background;
    property backgroundColor: OleVariant read Get_backgroundColor write Set_backgroundColor;
    property backgroundImage: WideString read Get_backgroundImage write Set_backgroundImage;
    property backgroundRepeat: WideString read Get_backgroundRepeat write Set_backgroundRepeat;
    property backgroundAttachment: WideString read Get_backgroundAttachment write Set_backgroundAttachment;
    property backgroundPosition: WideString read Get_backgroundPosition write Set_backgroundPosition;
    property backgroundPositionX: OleVariant read Get_backgroundPositionX write Set_backgroundPositionX;
    property backgroundPositionY: OleVariant read Get_backgroundPositionY write Set_backgroundPositionY;
    property wordSpacing: OleVariant read Get_wordSpacing write Set_wordSpacing;
    property letterSpacing: OleVariant read Get_letterSpacing write Set_letterSpacing;
    property textDecoration: WideString read Get_textDecoration write Set_textDecoration;
    property textDecorationNone: WordBool read Get_textDecorationNone write Set_textDecorationNone;
    property textDecorationUnderline: WordBool read Get_textDecorationUnderline write Set_textDecorationUnderline;
    property textDecorationOverline: WordBool read Get_textDecorationOverline write Set_textDecorationOverline;
    property textDecorationLineThrough: WordBool read Get_textDecorationLineThrough write Set_textDecorationLineThrough;
    property textDecorationBlink: WordBool read Get_textDecorationBlink write Set_textDecorationBlink;
    property verticalAlign: OleVariant read Get_verticalAlign write Set_verticalAlign;
    property textTransform: WideString read Get_textTransform write Set_textTransform;
    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;
    function Get_paddingTop: OleVariant; safecall;
    procedure Set_paddingRight(Value: OleVariant); safecall;
    function Get_paddingRight: OleVariant; safecall;
    procedure Set_paddingBottom(Value: OleVariant); safecall;
    function Get_paddingBottom: OleVariant; safecall;
    procedure Set_paddingLeft(Value: OleVariant); safecall;
    function Get_paddingLeft: OleVariant; safecall;
    procedure Set_padding(const Value: WideString); safecall;
    function Get_padding: WideString; safecall;
    procedure Set_border(const Value: WideString); safecall;
    function Get_border: WideString; safecall;
    procedure Set_borderTop(const Value: WideString); safecall;
    function Get_borderTop: WideString; safecall;
    procedure Set_borderRight(const Value: WideString); safecall;
    function Get_borderRight: WideString; safecall;
    procedure Set_borderBottom(const Value: WideString); safecall;
    function Get_borderBottom: WideString; safecall;
    procedure Set_borderLeft(const Value: WideString); safecall;
    function Get_borderLeft: WideString; safecall;
    procedure Set_borderColor(const Value: WideString); safecall;
    function Get_borderColor: WideString; safecall;
    procedure Set_borderTopColor(Value: OleVariant); safecall;
    function Get_borderTopColor: OleVariant; safecall;
    procedure Set_borderRightColor(Value: OleVariant); safecall;
    function Get_borderRightColor: OleVariant; safecall;
    procedure Set_borderBottomColor(Value: OleVariant); safecall;
    function Get_borderBottomColor: OleVariant; safecall;
    procedure Set_borderLeftColor(Value: OleVariant); safecall;
    function Get_borderLeftColor: OleVariant; safecall;
    procedure Set_borderWidth(const Value: WideString); safecall;
    function Get_borderWidth: WideString; safecall;
    procedure Set_borderTopWidth(Value: OleVariant); safecall;
    function Get_borderTopWidth: OleVariant; safecall;
    procedure Set_borderRightWidth(Value: OleVariant); safecall;
    function Get_borderRightWidth: OleVariant; safecall;
    procedure Set_borderBottomWidth(Value: OleVariant); safecall;
    function Get_borderBottomWidth: OleVariant; safecall;
    procedure Set_borderLeftWidth(Value: OleVariant); safecall;
    function Get_borderLeftWidth: OleVariant; safecall;
    procedure Set_borderStyle(const Value: WideString); safecall;
    function Get_borderStyle: WideString; safecall;
    procedure Set_borderTopStyle(const Value: WideString); safecall;
    function Get_borderTopStyle: WideString; safecall;
    procedure Set_borderRightStyle(const Value: WideString); safecall;
    function Get_borderRightStyle: WideString; safecall;
    procedure Set_borderBottomStyle(const Value: WideString); safecall;
    function Get_borderBottomStyle: WideString; safecall;
    procedure Set_borderLeftStyle(const Value: WideString); safecall;
    function Get_borderLeftStyle: WideString; safecall;
    procedure Set_width(Value: OleVariant); safecall;
    function Get_width: OleVariant; safecall;
    procedure Set_height(Value: OleVariant); safecall;
    function Get_height: OleVariant; safecall;
    procedure Set_styleFloat(const Value: WideString); safecall;
    function Get_styleFloat: WideString; safecall;
    procedure Set_clear(const Value: WideString); safecall;
    function Get_clear: WideString; safecall;
    procedure Set_display(const Value: WideString); safecall;
    function Get_display: WideString; safecall;
    procedure Set_visibility(const Value: WideString); safecall;
    function Get_visibility: WideString; safecall;
    procedure Set_listStyleType(const Value: WideString); safecall;
    function Get_listStyleType: WideString; safecall;
    procedure Set_listStylePosition(const Value: WideString); safecall;
    function Get_listStylePosition: WideString; safecall;
    procedure Set_listStyleImage(const Value: WideString); safecall;
    function Get_listStyleImage: WideString; safecall;
    procedure Set_listStyle(const Value: WideString); safecall;
    function Get_listStyle: WideString; safecall;
    procedure Set_whiteSpace(const Value: WideString); safecall;
    function Get_whiteSpace: WideString; safecall;
    procedure Set_top(Value: OleVariant); safecall;
    function Get_top: OleVariant; safecall;
    procedure Set_left(Value: OleVariant); safecall;
    function Get_left: OleVariant; safecall;
    function Get_position: WideString; safecall;
    procedure Set_zIndex(Value: OleVariant); safecall;
    function Get_zIndex: OleVariant; safecall;
    procedure Set_overflow(const Value: WideString); safecall;
    function Get_overflow: WideString; safecall;
    procedure Set_pageBreakBefore(const Value: WideString); safecall;
    function Get_pageBreakBefore: WideString; safecall;
    procedure Set_pageBreakAfter(const Value: WideString); safecall;
    function Get_pageBreakAfter: WideString; safecall;
    procedure Set_cssText(const Value: WideString); safecall;
    function Get_cssText: WideString; safecall;
    procedure Set_cursor(const Value: WideString); safecall;
    function Get_cursor: WideString; safecall;
    procedure Set_clip(const Value: WideString); safecall;
    function Get_clip: WideString; safecall;
    procedure Set_filter(const Value: WideString); safecall;
    function Get_filter: WideString; safecall;
    procedure setAttribute(const strAttributeName: WideString; AttributeValue: OleVariant; lFlags: Integer); safecall;
    function getAttribute(const strAttributeName: WideString; lFlags: Integer): OleVariant; safecall;
    function removeAttribute(const strAttributeName: WideString; lFlags: Integer): WordBool; safecall;
    property fontFamily: WideString read Get_fontFamily write Set_fontFamily;
    property fontStyle: WideString read Get_fontStyle write Set_fontStyle;
    property fontVariant: WideString read Get_fontVariant write Set_fontVariant;
    property fontWeight: WideString read Get_fontWeight write Set_fontWeight;
    property fontSize: OleVariant read Get_fontSize write Set_fontSize;
    property font: WideString read Get_font write Set_font;
    property color: OleVariant read Get_color write Set_color;
    property background: WideString read Get_background write Set_background;
    property backgroundColor: OleVariant read Get_backgroundColor write Set_backgroundColor;
    property backgroundImage: WideString read Get_backgroundImage write Set_backgroundImage;
    property backgroundRepeat: WideString read Get_backgroundRepeat write Set_backgroundRepeat;
    property backgroundAttachment: WideString read Get_backgroundAttachment write Set_backgroundAttachment;
    property backgroundPosition: WideString read Get_backgroundPosition write Set_backgroundPosition;
    property backgroundPositionX: OleVariant read Get_backgroundPositionX write Set_backgroundPositionX;
    property backgroundPositionY: OleVariant read Get_backgroundPositionY write Set_backgroundPositionY;
    property wordSpacing: OleVariant read Get_wordSpacing write Set_wordSpacing;
    property letterSpacing: OleVariant read Get_letterSpacing write Set_letterSpacing;
    property textDecoration: WideString read Get_textDecoration write Set_textDecoration;
    property textDecorationNone: WordBool read Get_textDecorationNone write Set_textDecorationNone;
    property textDecorationUnderline: WordBool read Get_textDecorationUnderline write Set_textDecorationUnderline;
    property textDecorationOverline: WordBool read Get_textDecorationOverline write Set_textDecorationOverline;
    property textDecorationLineThrough: WordBool read Get_textDecorationLineThrough write Set_textDecorationLineThrough;
    property textDecorationBlink: WordBool read Get_textDecorationBlink write Set_textDecorationBlink;
    property verticalAlign: OleVariant read Get_verticalAlign write Set_verticalAlign;
    property textTransform: WideString read Get_textTransform write Set_textTransform;
    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 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 IHTMLRuleStyle }

  IHTMLRuleStyleDisp = dispinterface
    ['{3050F3CF-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 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;
  end;

  IHTMLElement = interface(IDispatch)
    ['{3050F1FF-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure setAttribute(const strAttributeName: WideString; AttributeValue: OleVariant; lFlags: Integer); safecall;
    function getAttribute(const strAttributeName: WideString; lFlags: Integer): OleVariant; safecall;
    function removeAttribute(const strAttributeName: WideString; lFlags: Integer): WordBool; safecall;
    procedure Set_className(const Value: WideString); safecall;
    function Get_className: WideString; safecall;
    procedure Set_id(const Value: WideString); safecall;
    function Get_id: WideString; safecall;
    function Get_tagName: WideString; safecall;
    function Get_parentElement: IHTMLElement; safecall;
    function Get_style: IHTMLStyle; safecall;
    procedure Set_onhelp(Value: OleVariant); safecall;
    function Get_onhelp: OleVariant; safecall;
    procedure Set_onclick(Value: OleVariant); safecall;
    function Get_onclick: OleVariant; safecall;
    procedure Set_ondblclick(Value: OleVariant); safecall;
    function Get_ondblclick: OleVariant; safecall;
    procedure Set_onkeydown(Value: OleVariant); safecall;
    function Get_onkeydown: OleVariant; safecall;
    procedure Set_onkeyup(Value: OleVariant); safecall;
    function Get_onkeyup: OleVariant; safecall;
    procedure Set_onkeypress(Value: OleVariant); safecall;
    function Get_onkeypress: OleVariant; safecall;
    procedure Set_onmouseout(Value: OleVariant); safecall;
    function Get_onmouseout: OleVariant; safecall;
    procedure Set_onmouseover(Value: OleVariant); safecall;
    function Get_onmouseover: OleVariant; safecall;
    procedure Set_onmousemove(Value: OleVariant); safecall;
    function Get_onmousemove: OleVariant; safecall;
    procedure Set_onmousedown(Value: OleVariant); safecall;
    function Get_onmousedown: OleVariant; safecall;
    procedure Set_onmouseup(Value: OleVariant); safecall;
    function Get_onmouseup: OleVariant; safecall;
    function Get_document: IDispatch; safecall;
    procedure Set_title(const Value: WideString); safecall;
    function Get_title: WideString; safecall;
    procedure Set_language(const Value: WideString); safecall;
    function Get_language: WideString; safecall;
    procedure Set_onselectstart(Value: OleVariant); safecall;
    function Get_onselectstart: OleVariant; safecall;
    procedure scrollIntoView(varargStart: OleVariant); safecall;
    function contains(const pChild: IHTMLElement): WordBool; safecall;
    function Get_sourceIndex: Integer; safecall;
    function Get_recordNumber: OleVariant; safecall;
    procedure Set_lang(const Value: WideString); safecall;
    function Get_lang: WideString; safecall;
    function Get_offsetLeft: Integer; safecall;
    function Get_offsetTop: Integer; safecall;
    function Get_offsetWidth: Integer; safecall;
    function Get_offsetHeight: Integer; safecall;
    function Get_offsetParent: IHTMLElement; safecall;
    procedure Set_innerHTML(const Value: WideString); safecall;
    function Get_innerHTML: WideString; safecall;
    procedure Set_innerText(const Value: WideString); safecall;
    function Get_innerText: WideString; safecall;
    procedure Set_outerHTML(const Value: WideString); safecall;
    function Get_outerHTML: WideString; safecall;
    procedure Set_outerText(const Value: WideString); safecall;
    function Get_outerText: WideString; safecall;
    procedure insertAdjacentHTML(const where, html: WideString); safecall;
    procedure insertAdjacentText(const where, text: WideString); safecall;
    function Get_parentTextEdit: IHTMLElement; safecall;
    function Get_isTextEdit: WordBool; safecall;
    procedure click; safecall;
    function Get_filters: IHTMLFiltersCollection; safecall;
    procedure Set_ondragstart(Value: OleVariant); safecall;
    function Get_ondragstart: OleVariant; safecall;
    function toString: WideString; safecall;
    procedure Set_onbeforeupdate(Value: OleVariant); safecall;
    function Get_onbeforeupdate: OleVariant; safecall;
    procedure Set_onafterupdate(Value: OleVariant); safecall;
    function Get_onafterupdate: OleVariant; safecall;
    procedure Set_onerrorupdate(Value: OleVariant); safecall;
    function Get_onerrorupdate: OleVariant; safecall;
    procedure Set_onrowexit(Value: OleVariant); safecall;
    function Get_onrowexit: OleVariant; safecall;
    procedure Set_onrowenter(Value: OleVariant); safecall;
    function Get_onrowenter: OleVariant; safecall;
    procedure Set_ondatasetchanged(Value: OleVariant); safecall;
    function Get_ondatasetchanged: OleVariant; safecall;
    procedure Set_ondataavailable(Value: OleVariant); safecall;
    function Get_ondataavailable: OleVariant; safecall;
    procedure Set_ondatasetcomplete(Value: OleVariant); safecall;
    function Get_ondatasetcomplete: OleVariant; safecall;
    procedure Set_onfilterchange(Value: OleVariant); safecall;
    function Get_onfilterchange: OleVariant; safecall;
    function Get_children: IDispatch; safecall;
    function Get_all: IDispatch; safecall;
    property className: WideString read Get_className write Set_className;
    property id: WideString read Get_id write Set_id;
    property tagName: WideString read Get_tagName;
    property parentElement: IHTMLElement read Get_parentElement;
    property style: IHTMLStyle read Get_style;
    property onhelp: OleVariant read Get_onhelp write Set_onhelp;
    property onclick: OleVariant read Get_onclick write Set_onclick;
    property ondblclick: OleVariant read Get_ondblclick write Set_ondblclick;
    property onkeydown: OleVariant read Get_onkeydown write Set_onkeydown;
    property onkeyup: OleVariant read Get_onkeyup write Set_onkeyup;
    property onkeypress: OleVariant read Get_onkeypress write Set_onkeypress;
    property onmouseout: OleVariant read Get_onmouseout write Set_onmouseout;
    property onmouseover: OleVariant read Get_onmouseover write Set_onmouseover;
    property onmousemove: OleVariant read Get_onmousemove write Set_onmousemove;
    property onmousedown: OleVariant read Get_onmousedown write Set_onmousedown;
    property onmouseup: OleVariant read Get_onmouseup write Set_onmouseup;
    property document: IDispatch read Get_document;
    property title: WideString read Get_title write Set_title;
    property language: WideString read Get_language write Set_language;
    property onselectstart: OleVariant read Get_onselectstart write Set_onselectstart;
    property sourceIndex: Integer read Get_sourceIndex;
    property recordNumber: OleVariant read Get_recordNumber;
    property lang: WideString read Get_lang write Set_lang;
    property offsetLeft: Integer read Get_offsetLeft;
    property offsetTop: Integer read Get_offsetTop;
    property offsetWidth: Integer read Get_offsetWidth;
    property offsetHeight: Integer read Get_offsetHeight;
    property offsetParent: IHTMLElement read Get_offsetParent;
    property innerHTML: WideString read Get_innerHTML write Set_innerHTML;
    property innerText: WideString read Get_innerText write Set_innerText;
    property outerHTML: WideString read Get_outerHTML write Set_outerHTML;
    property outerText: WideString read Get_outerText write Set_outerText;
    property parentTextEdit: IHTMLElement read Get_parentTextEdit;
    property isTextEdit: WordBool read Get_isTextEdit;
    property filters: IHTMLFiltersCollection read Get_filters;
    property ondragstart: OleVariant read Get_ondragstart write Set_ondragstart;
    property onbeforeupdate: OleVariant read Get_onbeforeupdate write Set_onbeforeupdate;
    property onafterupdate: OleVariant read Get_onafterupdate write Set_onafterupdate;
    property onerrorupdate: OleVariant read Get_onerrorupdate write Set_onerrorupdate;
    property onrowexit: OleVariant read Get_onrowexit write Set_onrowexit;
    property onrowenter: OleVariant read Get_onrowenter write Set_onrowenter;
    property ondatasetchanged: OleVariant read Get_ondatasetchanged write Set_ondatasetchanged;
    property ondataavailable: OleVariant read Get_ondataavailable write Set_ondataavailable;
    property ondatasetcomplete: OleVariant read Get_ondatasetcomplete write Set_ondatasetcomplete;
    property onfilterchange: OleVariant read Get_onfilterchange write Set_onfilterchange;
    property children: IDispatch read Get_children;
    property all: IDispatch read Get_all;
  end;

{ DispInterface declaration for Dual Interface IHTMLElement }

  IHTMLElementDisp = dispinterface
    ['{3050F1FF-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
  end;

  IHTMLFiltersCollection = interface(IDispatch)
    ['{3050F3EE-98B5-11CF-BB82-00AA00BDCE0B}']
    function Get_length: Integer; safecall;
    function Get__newEnum: IUnknown; safecall;
    function item(var pvarIndex: OleVariant): OleVariant; safecall;
    property length: Integer read Get_length;
    property _newEnum: IUnknown read Get__newEnum;
  end;

{ DispInterface declaration for Dual Interface IHTMLFiltersCollection }

  IHTMLFiltersCollectionDisp = dispinterface
    ['{3050F3EE-98B5-11CF-BB82-00AA00BDCE0B}']
    property length: Integer readonly dispid 1001;
    function item(var pvarIndex: OleVariant): OleVariant; dispid 0;
  end;

  ICSSFilterSite = interface(IDispatch)
    ['{3050F3ED-98B5-11CF-BB82-00AA00BDCE0B}']
    function GetElement: IHTMLElement; safecall;
    procedure FireOnFilterChangeEvent; safecall;
  end;

{ DispInterface declaration for Dual Interface ICSSFilterSite }

  ICSSFilterSiteDisp = dispinterface
    ['{3050F3ED-98B5-11CF-BB82-00AA00BDCE0B}']
    function GetElement: IHTMLElement; dispid 1610678272;
    procedure FireOnFilterChangeEvent; dispid 1610678273;
  end;

  ICSSFilter = interface(IDispatch)
    ['{3050F3EC-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure SetSite(const pSink: ICSSFilterSite); safecall;
    procedure OnAmbientPropertyChange(dispid: Integer); safecall;
  end;

{ DispInterface declaration for Dual Interface ICSSFilter }

  ICSSFilterDisp = dispinterface
    ['{3050F3EC-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure SetSite(const pSink: ICSSFilterSite); dispid 1610678272;
    procedure OnAmbientPropertyChange(dispid: Integer); dispid 1610678273;
  end;

  HTMLElementEvents = dispinterface
    ['{3050F33C-98B5-11CF-BB82-00AA00BDCE0B}']
    function onhelp: WordBool; dispid -2147418102;
    function onclick: WordBool; dispid -600;
    function ondblclick: WordBool; dispid -601;
    function onkeypress: WordBool; dispid -603;
    procedure onkeydown; dispid -602;
    procedure onkeyup; dispid -604;
    procedure onmouseout; dispid -2147418103;
    procedure onmouseover; dispid -2147418104;
    procedure onmousemove; dispid -606;
    procedure onmousedown; dispid -605;
    procedure onmouseup; dispid -607;
    function onselectstart: WordBool; dispid -2147418100;
    procedure onfilterchange; dispid -2147418095;
    function ondragstart: WordBool; dispid -2147418101;
    function onbeforeupdate: WordBool; dispid -2147418108;
    procedure onafterupdate; dispid -2147418107;
    function onerrorupdate: WordBool; dispid -2147418099;
    function onrowexit: WordBool; dispid -2147418106;
    procedure onrowenter; dispid -2147418105;
    procedure ondatasetchanged; dispid -2147418098;
    procedure ondataavailable; dispid -2147418097;
    procedure ondatasetcomplete; dispid -2147418096;
  end;

  IHTMLDatabinding = interface(IDispatch)
    ['{3050F3F2-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_dataFld(const Value: WideString); safecall;
    function Get_dataFld: WideString; safecall;
    procedure Set_dataSrc(const Value: WideString); safecall;
    function Get_dataSrc: WideString; safecall;
    procedure Set_dataFormatAs(const Value: WideString); safecall;
    function Get_dataFormatAs: WideString; safecall;
    property dataFld: WideString read Get_dataFld write Set_dataFld;
    property dataSrc: WideString read Get_dataSrc write Set_dataSrc;
    property dataFormatAs: WideString read Get_dataFormatAs write Set_dataFormatAs;
  end;

{ DispInterface declaration for Dual Interface IHTMLDatabinding }

  IHTMLDatabindingDisp = dispinterface
    ['{3050F3F2-98B5-11CF-BB82-00AA00BDCE0B}']
    property dataFld: WideString dispid -2147417091;
    property dataSrc: WideString dispid -2147417090;
    property dataFormatAs: WideString dispid -2147417089;
  end;

  IHTMLStyleSheetRule = interface(IDispatch)
    ['{3050F357-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_selectorText(const Value: WideString); safecall;
    function Get_selectorText: WideString; safecall;
    function Get_style: IHTMLRuleStyle; safecall;
    function Get_readOnly: WordBool; safecall;
    property selectorText: WideString read Get_selectorText write Set_selectorText;
    property style: IHTMLRuleStyle read Get_style;
    property readOnly: WordBool read Get_readOnly;
  end;

{ DispInterface declaration for Dual Interface IHTMLStyleSheetRule }

  IHTMLStyleSheetRuleDisp = dispinterface
    ['{3050F357-98B5-11CF-BB82-00AA00BDCE0B}']
    property selectorText: WideString dispid 1001;
    property style: IHTMLRuleStyle readonly dispid -2147418038;
    property readOnly: WordBool readonly dispid 1002;
  end;

  IHTMLStyleSheetRulesCollection = interface(IDispatch)
    ['{3050F2E5-98B5-11CF-BB82-00AA00BDCE0B}']
    function Get_length: Integer; safecall;
    function item(index: Integer): IHTMLStyleSheetRule; safecall;
    property length: Integer read Get_length;
  end;

{ DispInterface declaration for Dual Interface IHTMLStyleSheetRulesCollection }

  IHTMLStyleSheetRulesCollectionDisp = dispinterface
    ['{3050F2E5-98B5-11CF-BB82-00AA00BDCE0B}']
    property length: Integer readonly dispid 1001;
    function item(index: Integer): IHTMLStyleSheetRule; dispid 0;
  end;

  IHTMLStyleSheetsCollection = interface(IDispatch)
    ['{3050F37E-98B5-11CF-BB82-00AA00BDCE0B}']
    function Get_length: Integer; safecall;
    function Get__newEnum: IUnknown; safecall;
    function item(var pvarIndex: OleVariant): OleVariant; safecall;
    property length: Integer read Get_length;
    property _newEnum: IUnknown read Get__newEnum;
  end;

{ DispInterface declaration for Dual Interface IHTMLStyleSheetsCollection }

  IHTMLStyleSheetsCollectionDisp = dispinterface
    ['{3050F37E-98B5-11CF-BB82-00AA00BDCE0B}']
    property length: Integer readonly dispid 1001;
    function item(var pvarIndex: OleVariant): OleVariant; dispid 0;
  end;

  IHTMLStyleSheet = interface(IDispatch)
    ['{3050F2E3-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_title(const Value: WideString); safecall;
    function Get_title: WideString; safecall;
    function Get_parentStyleSheet: IHTMLStyleSheet; safecall;
    function Get_owningElement: IHTMLElement; safecall;
    procedure Set_disabled(Value: WordBool); safecall;
    function Get_disabled: WordBool; safecall;
    function Get_readOnly: WordBool; safecall;
    function Get_imports: IHTMLStyleSheetsCollection; safecall;
    procedure Set_href(const Value: WideString); safecall;
    function Get_href: WideString; safecall;
    function Get_type_: WideString; safecall;
    function Get_id: WideString; safecall;
    function addImport(const bstrURL: WideString; lIndex: Integer): Integer; safecall;
    function addRule(const bstrSelector, bstrStyle: WideString; lIndex: Integer): Integer; safecall;
    procedure removeImport(lIndex: Integer); safecall;
    procedure removeRule(lIndex: Integer); safecall;
    procedure Set_media(const Value: WideString); safecall;
    function Get_media: WideString; safecall;
    procedure Set_cssText(const Value: WideString); safecall;
    function Get_cssText: WideString; safecall;
    function Get_rules: IHTMLStyleSheetRulesCollection; safecall;
    property title: WideString read Get_title write Set_title;
    property parentStyleSheet: IHTMLStyleSheet read Get_parentStyleSheet;
    property owningElement: IHTMLElement read Get_owningElement;
    property disabled: WordBool read Get_disabled write Set_disabled;
    property readOnly: WordBool read Get_readOnly;
    property imports: IHTMLStyleSheetsCollection read Get_imports;
    property href: WideString read Get_href write Set_href;
    property type_: WideString read Get_type_;
    property id: WideString read Get_id;
    property media: WideString read Get_media write Set_media;
    property cssText: WideString read Get_cssText write Set_cssText;
    property rules: IHTMLStyleSheetRulesCollection read Get_rules;
  end;

{ DispInterface declaration for Dual Interface IHTMLStyleSheet }

  IHTMLStyleSheetDisp = dispinterface
    ['{3050F2E3-98B5-11CF-BB82-00AA00BDCE0B}']
    property title: WideString dispid 1001;
    property parentStyleSheet: IHTMLStyleSheet readonly dispid 1002;
    property owningElement: IHTMLElement readonly dispid 1003;
    property disabled: WordBool dispid -2147418036;
    property readOnly: WordBool readonly dispid 1004;
    property imports: IHTMLStyleSheetsCollection readonly dispid 1005;
    property href: WideString dispid 1006;
    property type_: WideString readonly dispid 1007;
    property id: WideString readonly dispid 1008;
    function addImport(const bstrURL: WideString; lIndex: Integer): Integer; dispid 1009;
    function addRule(const bstrSelector, bstrStyle: WideString; lIndex: Integer): Integer; dispid 1010;
    procedure removeImport(lIndex: Integer); dispid 1011;
    procedure removeRule(lIndex: Integer); dispid 1012;
    property media: WideString dispid 1013;
    property cssText: WideString dispid 1014;
    property rules: IHTMLStyleSheetRulesCollection readonly dispid 1015;
  end;

  HTMLLinkElementEvents = dispinterface
    ['{3050F3CC-98B5-11CF-BB82-00AA00BDCE0B}']
    function onhelp: WordBool; dispid -2147418102;
    function onclick: WordBool; dispid -600;
    function ondblclick: WordBool; dispid -601;
    function onkeypress: WordBool; dispid -603;
    procedure onkeydown; dispid -602;
    procedure onkeyup; dispid -604;
    procedure onmouseout; dispid -2147418103;
    procedure onmouseover; dispid -2147418104;
    procedure onmousemove; dispid -606;
    procedure onmousedown; dispid -605;
    procedure onmouseup; dispid -607;
    function onselectstart: WordBool; dispid -2147418100;
    procedure onfilterchange; dispid -2147418095;
    function ondragstart: WordBool; dispid -2147418101;
    function onbeforeupdate: WordBool; dispid -2147418108;
    procedure onafterupdate; dispid -2147418107;
    function onerrorupdate: WordBool; dispid -2147418099;
    function onrowexit: WordBool; dispid -2147418106;
    procedure onrowenter; dispid -2147418105;
    procedure ondatasetchanged; dispid -2147418098;
    procedure ondataavailable; dispid -2147418097;
    procedure ondatasetcomplete; dispid -2147418096;
    procedure onreadystatechange; dispid -609;
    procedure onload; dispid 1003;
    procedure onerror; dispid 1002;
  end;

  IHTMLLinkElement = interface(IDispatch)
    ['{3050F205-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_href(const Value: WideString); safecall;
    function Get_href: WideString; safecall;
    procedure Set_rel(const Value: WideString); safecall;
    function Get_rel: WideString; safecall;
    procedure Set_rev(const Value: WideString); safecall;
    function Get_rev: WideString; safecall;
    procedure Set_type_(const Value: WideString); safecall;
    function Get_type_: WideString; safecall;
    function Get_readyState: WideString; safecall;
    procedure Set_onreadystatechange(Value: OleVariant); safecall;
    function Get_onreadystatechange: OleVariant; safecall;
    procedure Set_onload(Value: OleVariant); safecall;
    function Get_onload: OleVariant; safecall;
    procedure Set_onerror(Value: OleVariant); safecall;
    function Get_onerror: OleVariant; safecall;
    function Get_styleSheet: IHTMLStyleSheet; safecall;
    procedure Set_disabled(Value: WordBool); safecall;
    function Get_disabled: WordBool; safecall;
    procedure Set_media(const Value: WideString); safecall;
    function Get_media: WideString; safecall;
    property href: WideString read Get_href write Set_href;
    property rel: WideString read Get_rel write Set_rel;
    property rev: WideString read Get_rev write Set_rev;
    property type_: WideString read Get_type_ write Set_type_;
    property readyState: WideString read Get_readyState;
    property onreadystatechange: OleVariant read Get_onreadystatechange write Set_onreadystatechange;
    property onload: OleVariant read Get_onload write Set_onload;
    property onerror: OleVariant read Get_onerror write Set_onerror;
    property styleSheet: IHTMLStyleSheet read Get_styleSheet;
    property disabled: WordBool read Get_disabled write Set_disabled;
    property media: WideString read Get_media write Set_media;
  end;

{ DispInterface declaration for Dual Interface IHTMLLinkElement }

  IHTMLLinkElementDisp = dispinterface
    ['{3050F205-98B5-11CF-BB82-00AA00BDCE0B}']
    property href: WideString dispid 1005;
    property rel: WideString dispid 1006;
    property rev: WideString dispid 1007;
    property type_: WideString dispid 1008;
    property readyState: WideString readonly dispid 1009;
    property onreadystatechange: OleVariant dispid -2147412087;
    property onload: OleVariant dispid -2147412080;
    property onerror: OleVariant dispid -2147412083;
    property styleSheet: IHTMLStyleSheet readonly dispid 1014;
    property disabled: WordBool dispid 1015;
    property media: WideString dispid 1016;
  end;

  DispIHTMLLinkElement = dispinterface
    ['{3050F524-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property href: WideString dispid 1005;
    property rel: WideString dispid 1006;
    property rev: WideString dispid 1007;
    property type_: WideString dispid 1008;
    property readyState: WideString readonly dispid 1009;
    property onreadystatechange: OleVariant dispid -2147412087;
    property onload: OleVariant dispid -2147412080;
    property onerror: OleVariant dispid -2147412083;
    property styleSheet: IHTMLStyleSheet readonly dispid 1014;
    property disabled: WordBool dispid 1015;
    property media: WideString dispid 1016;
  end;

  IHTMLTxtRange = interface(IDispatch)
    ['{3050F220-98B5-11CF-BB82-00AA00BDCE0B}']
    function Get_htmlText: WideString; safecall;
    procedure Set_text(const Value: WideString); safecall;
    function Get_text: WideString; safecall;
    function parentElement: IHTMLElement; safecall;
    function duplicate: IHTMLTxtRange; safecall;
    function inRange(const Range: IHTMLTxtRange): WordBool; safecall;
    function isEqual(const Range: IHTMLTxtRange): WordBool; safecall;
    procedure scrollIntoView(fStart: WordBool); safecall;
    procedure collapse(Start: WordBool); safecall;
    function expand(const Unit_: WideString): WordBool; safecall;
    function move(const Unit_: WideString; Count: Integer): Integer; safecall;
    function moveStart(const Unit_: WideString; Count: Integer): Integer; safecall;
    function moveEnd(const Unit_: WideString; Count: Integer): Integer; safecall;
    procedure select; safecall;
    procedure pasteHTML(const html: WideString); safecall;
    procedure moveToElementText(const element: IHTMLElement); safecall;
    procedure setEndPoint(const how: WideString; const SourceRange: IHTMLTxtRange); safecall;
    function compareEndPoints(const how: WideString; const SourceRange: IHTMLTxtRange): Integer; safecall;
    function findText(const String_: WideString; Count, Flags: Integer): WordBool; safecall;
    procedure moveToPoint(x, y: Integer); safecall;
    function getBookmark: WideString; safecall;
    function moveToBookmark(const Bookmark: WideString): WordBool; safecall;
    function queryCommandSupported(const cmdID: WideString): WordBool; safecall;
    function queryCommandEnabled(const cmdID: WideString): WordBool; safecall;
    function queryCommandState(const cmdID: WideString): WordBool; safecall;
    function queryCommandIndeterm(const cmdID: WideString): WordBool; safecall;
    function queryCommandText(const cmdID: WideString): WideString; safecall;
    function queryCommandValue(const cmdID: WideString): OleVariant; safecall;
    function execCommand(const cmdID: WideString; showUI: WordBool; value: OleVariant): WordBool; safecall;
    function execCommandShowHelp(const cmdID: WideString): WordBool; safecall;
    property htmlText: WideString read Get_htmlText;
    property text: WideString read Get_text write Set_text;
  end;

{ DispInterface declaration for Dual Interface IHTMLTxtRange }

  IHTMLTxtRangeDisp = dispinterface
    ['{3050F220-98B5-11CF-BB82-00AA00BDCE0B}']
    property htmlText: WideString readonly dispid 1003;
    property text: WideString dispid 1004;
    function parentElement: IHTMLElement; dispid 1006;
    function duplicate: IHTMLTxtRange; dispid 1008;
    function inRange(const Range: IHTMLTxtRange): WordBool; dispid 1010;
    function isEqual(const Range: IHTMLTxtRange): WordBool; dispid 1011;
    procedure scrollIntoView(fStart: WordBool); dispid 1012;
    procedure collapse(Start: WordBool); dispid 1013;
    function expand(const Unit_: WideString): WordBool; dispid 1014;
    function move(const Unit_: WideString; Count: Integer): Integer; dispid 1015;
    function moveStart(const Unit_: WideString; Count: Integer): Integer; dispid 1016;
    function moveEnd(const Unit_: WideString; Count: Integer): Integer; dispid 1017;
    procedure select; dispid 1024;
    procedure pasteHTML(const html: WideString); dispid 1026;
    procedure moveToElementText(const element: IHTMLElement); dispid 1001;
    procedure setEndPoint(const how: WideString; const SourceRange: IHTMLTxtRange); dispid 1025;
    function compareEndPoints(const how: WideString; const SourceRange: IHTMLTxtRange): Integer; dispid 1018;
    function findText(const String_: WideString; Count, Flags: Integer): WordBool; dispid 1019;
    procedure moveToPoint(x, y: Integer); dispid 1020;
    function getBookmark: WideString; dispid 1021;
    function moveToBookmark(const Bookmark: WideString): WordBool; dispid 1009;
    function queryCommandSupported(const cmdID: WideString): WordBool; dispid 1027;
    function queryCommandEnabled(const cmdID: WideString): WordBool; dispid 1028;
    function queryCommandState(const cmdID: WideString): WordBool; dispid 1029;
    function queryCommandIndeterm(const cmdID: WideString): WordBool; dispid 1030;
    function queryCommandText(const cmdID: WideString): WideString; dispid 1031;
    function queryCommandValue(const cmdID: WideString): OleVariant; dispid 1032;
    function execCommand(const cmdID: WideString; showUI: WordBool; value: OleVariant): WordBool; dispid 1033;
    function execCommandShowHelp(const cmdID: WideString): WordBool; dispid 1034;
  end;

  HTMLFormElementEvents = dispinterface
    ['{3050F364-98B5-11CF-BB82-00AA00BDCE0B}']
    function onhelp: WordBool; dispid -2147418102;
    function onclick: WordBool; dispid -600;
    function ondblclick: WordBool; dispid -601;
    function onkeypress: WordBool; dispid -603;
    procedure onkeydown; dispid -602;
    procedure onkeyup; dispid -604;
    procedure onmouseout; dispid -2147418103;
    procedure onmouseover; dispid -2147418104;
    procedure onmousemove; dispid -606;
    procedure onmousedown; dispid -605;
    procedure onmouseup; dispid -607;
    function onselectstart: WordBool; dispid -2147418100;
    procedure onfilterchange; dispid -2147418095;
    function ondragstart: WordBool; dispid -2147418101;
    function onbeforeupdate: WordBool; dispid -2147418108;
    procedure onafterupdate; dispid -2147418107;
    function onerrorupdate: WordBool; dispid -2147418099;
    function onrowexit: WordBool; dispid -2147418106;
    procedure onrowenter; dispid -2147418105;
    procedure ondatasetchanged; dispid -2147418098;
    procedure ondataavailable; dispid -2147418097;
    procedure ondatasetcomplete; dispid -2147418096;
    function onsubmit: WordBool; dispid 1007;
    function onreset: WordBool; dispid 1015;
  end;

  IHTMLFormElement = interface(IDispatch)
    ['{3050F1F7-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_action(const Value: WideString); safecall;
    function Get_action: WideString; safecall;
    procedure Set_dir(const Value: WideString); safecall;
    function Get_dir: WideString; safecall;
    procedure Set_encoding(const Value: WideString); safecall;
    function Get_encoding: WideString; safecall;
    procedure Set_method(const Value: WideString); safecall;
    function Get_method: WideString; safecall;
    function Get_elements: IDispatch; safecall;
    procedure Set_target(const Value: WideString); safecall;
    function Get_target: WideString; safecall;
    procedure Set_name(const Value: WideString); safecall;
    function Get_name: WideString; safecall;
    procedure Set_onsubmit(Value: OleVariant); safecall;
    function Get_onsubmit: OleVariant; safecall;
    procedure Set_onreset(Value: OleVariant); safecall;
    function Get_onreset: OleVariant; safecall;
    procedure submit; safecall;
    procedure reset; safecall;
    procedure Set_length(Value: Integer); safecall;
    function Get_length: Integer; safecall;
    function Get__newEnum: IUnknown; safecall;
    function item(name, index: OleVariant): IDispatch; safecall;
    function tags(tagName: OleVariant): IDispatch; safecall;
    property action: WideString read Get_action write Set_action;
    property dir: WideString read Get_dir write Set_dir;
    property encoding: WideString read Get_encoding write Set_encoding;
    property method: WideString read Get_method write Set_method;
    property elements: IDispatch read Get_elements;
    property target: WideString read Get_target write Set_target;
    property name: WideString read Get_name write Set_name;
    property onsubmit: OleVariant read Get_onsubmit write Set_onsubmit;
    property onreset: OleVariant read Get_onreset write Set_onreset;
    property length: Integer read Get_length write Set_length;
    property _newEnum: IUnknown read Get__newEnum;
  end;

{ DispInterface declaration for Dual Interface IHTMLFormElement }

  IHTMLFormElementDisp = dispinterface
    ['{3050F1F7-98B5-11CF-BB82-00AA00BDCE0B}']
    property action: WideString dispid 1001;
    property dir: WideString dispid 1002;
    property encoding: WideString dispid 1003;
    property method: WideString dispid 1004;
    property elements: IDispatch readonly dispid 1005;
    property target: WideString dispid 1006;
    property name: WideString dispid -2147418112;
    property onsubmit: OleVariant dispid -2147412101;
    property onreset: OleVariant dispid -2147412100;
    procedure submit; dispid 1009;
    procedure reset; dispid 1010;
    property length: Integer dispid 1500;
    function item(name, index: OleVariant): IDispatch; dispid 0;
    function tags(tagName: OleVariant): IDispatch; dispid 1502;
  end;

  DispIHTMLFormElement = dispinterface
    ['{3050F510-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property action: WideString dispid 1001;
    property dir: WideString dispid 1002;
    property encoding: WideString dispid 1003;
    property method: WideString dispid 1004;
    property elements: IDispatch readonly dispid 1005;
    property target: WideString dispid 1006;
    property name: WideString dispid -2147418112;
    property onsubmit: OleVariant dispid -2147412101;
    property onreset: OleVariant dispid -2147412100;
    procedure submit; dispid 1009;
    procedure reset; dispid 1010;
    property length: Integer dispid 1500;
    function item(name, index: OleVariant): IDispatch; dispid 0;
    function tags(tagName: OleVariant): IDispatch; dispid 1502;
  end;

  HTMLControlElementEvents = dispinterface
    ['{9A4BBF53-4E46-101B-8BBD-00AA003E3B29}']
    function onhelp: WordBool; dispid -2147418102;
    function onclick: WordBool; dispid -600;
    function ondblclick: WordBool; dispid -601;
    function onkeypress: WordBool; dispid -603;
    procedure onkeydown; dispid -602;
    procedure onkeyup; dispid -604;
    procedure onmouseout; dispid -2147418103;
    procedure onmouseover; dispid -2147418104;
    procedure onmousemove; dispid -606;
    procedure onmousedown; dispid -605;
    procedure onmouseup; dispid -607;
    function onselectstart: WordBool; dispid -2147418100;
    procedure onfilterchange; dispid -2147418095;
    function ondragstart: WordBool; dispid -2147418101;
    function onbeforeupdate: WordBool; dispid -2147418108;
    procedure onafterupdate; dispid -2147418107;
    function onerrorupdate: WordBool; dispid -2147418099;
    function onrowexit: WordBool; dispid -2147418106;
    procedure onrowenter; dispid -2147418105;
    procedure ondatasetchanged; dispid -2147418098;
    procedure ondataavailable; dispid -2147418097;
    procedure ondatasetcomplete; dispid -2147418096;
    procedure onfocus; dispid -2147418111;
    procedure onblur; dispid -2147418112;
    procedure onresize; dispid 1016;
  end;

  IHTMLControlElement = interface(IDispatch)
    ['{04598FC6-866C-11CF-AB7C-00AA00C08FCF}']
    procedure Set_tabIndex(Value: Smallint); safecall;
    function Get_tabIndex: Smallint; safecall;
    procedure focus; safecall;
    procedure Set_accessKey(const Value: WideString); safecall;
    function Get_accessKey: WideString; safecall;
    procedure Set_onblur(Value: OleVariant); safecall;
    function Get_onblur: OleVariant; safecall;
    procedure Set_onfocus(Value: OleVariant); safecall;
    function Get_onfocus: OleVariant; safecall;
    procedure Set_onresize(Value: OleVariant); safecall;
    function Get_onresize: OleVariant; safecall;
    procedure blur; safecall;
    procedure addFilter(pUnk: IUnknown); safecall;
    procedure removeFilter(pUnk: IUnknown); safecall;
    function Get_clientHeight: Integer; safecall;
    function Get_clientWidth: Integer; safecall;
    function Get_clientTop: Integer; safecall;
    function Get_clientLeft: Integer; safecall;
    property tabIndex: Smallint read Get_tabIndex write Set_tabIndex;
    property accessKey: WideString read Get_accessKey write Set_accessKey;
    property onblur: OleVariant read Get_onblur write Set_onblur;
    property onfocus: OleVariant read Get_onfocus write Set_onfocus;
    property onresize: OleVariant read Get_onresize write Set_onresize;
    property clientHeight: Integer read Get_clientHeight;
    property clientWidth: Integer read Get_clientWidth;
    property clientTop: Integer read Get_clientTop;
    property clientLeft: Integer read Get_clientLeft;
  end;

{ DispInterface declaration for Dual Interface IHTMLControlElement }

  IHTMLControlElementDisp = dispinterface
    ['{04598FC6-866C-11CF-AB7C-00AA00C08FCF}']
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
  end;

  DispIHTMLControlElement = dispinterface
    ['{3050F53F-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
  end;

  IHTMLTextElement = interface(IDispatch)
    ['{3050F218-98B5-11CF-BB82-00AA00BDCE0B}']
  end;

{ DispInterface declaration for Dual Interface IHTMLTextElement }

  IHTMLTextElementDisp = dispinterface
    ['{3050F218-98B5-11CF-BB82-00AA00BDCE0B}']
  end;

  DispIHTMLTextElement = dispinterface
    ['{3050F537-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
  end;

  HTMLTextContainerEvents = dispinterface
    ['{1FF6AA72-5842-11CF-A707-00AA00C0098D}']
    function onhelp: WordBool; dispid -2147418102;
    function onclick: WordBool; dispid -600;
    function ondblclick: WordBool; dispid -601;
    function onkeypress: WordBool; dispid -603;
    procedure onkeydown; dispid -602;
    procedure onkeyup; dispid -604;
    procedure onmouseout; dispid -2147418103;
    procedure onmouseover; dispid -2147418104;
    procedure onmousemove; dispid -606;
    procedure onmousedown; dispid -605;
    procedure onmouseup; dispid -607;
    function onselectstart: WordBool; dispid -2147418100;
    procedure onfilterchange; dispid -2147418095;
    function ondragstart: WordBool; dispid -2147418101;
    function onbeforeupdate: WordBool; dispid -2147418108;
    procedure onafterupdate; dispid -2147418107;
    function onerrorupdate: WordBool; dispid -2147418099;
    function onrowexit: WordBool; dispid -2147418106;
    procedure onrowenter; dispid -2147418105;
    procedure ondatasetchanged; dispid -2147418098;
    procedure ondataavailable; dispid -2147418097;
    procedure ondatasetcomplete; dispid -2147418096;
    procedure onfocus; dispid -2147418111;
    procedure onblur; dispid -2147418112;
    procedure onresize; dispid 1016;
    procedure onchange; dispid 1001;
    procedure onscroll; dispid 1014;
    procedure onselect; dispid 1006;
  end;

  IHTMLTextContainer = interface(IDispatch)
    ['{3050F230-98B5-11CF-BB82-00AA00BDCE0B}']
    function createControlRange: IDispatch; safecall;
    function Get_scrollHeight: Integer; safecall;
    function Get_scrollWidth: Integer; safecall;
    procedure Set_scrollTop(Value: Integer); safecall;
    function Get_scrollTop: Integer; safecall;
    procedure Set_scrollLeft(Value: Integer); safecall;
    function Get_scrollLeft: Integer; safecall;
    procedure Set_onscroll(Value: OleVariant); safecall;
    function Get_onscroll: OleVariant; safecall;
    property scrollHeight: Integer read Get_scrollHeight;
    property scrollWidth: Integer read Get_scrollWidth;
    property scrollTop: Integer read Get_scrollTop write Set_scrollTop;
    property scrollLeft: Integer read Get_scrollLeft write Set_scrollLeft;
    property onscroll: OleVariant read Get_onscroll write Set_onscroll;
  end;

{ DispInterface declaration for Dual Interface IHTMLTextContainer }

  IHTMLTextContainerDisp = dispinterface
    ['{3050F230-98B5-11CF-BB82-00AA00BDCE0B}']
    function createControlRange: IDispatch; dispid 1001;
    property scrollHeight: Integer readonly dispid 1002;
    property scrollWidth: Integer readonly dispid 1003;
    property scrollTop: Integer dispid 1004;
    property scrollLeft: Integer dispid 1005;
    property onscroll: OleVariant dispid -2147412081;
  end;

  DispIHTMLTextContainer = dispinterface
    ['{3050F53E-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    function createControlRange: IDispatch; dispid 1001;
    property scrollHeight: Integer readonly dispid 1002;
    property scrollWidth: Integer readonly dispid 1003;
    property scrollTop: Integer dispid 1004;
    property scrollLeft: Integer dispid 1005;
    property onscroll: OleVariant dispid -2147412081;
  end;

  IHTMLControlRange = interface(IDispatch)
    ['{3050F29C-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure select; safecall;
    procedure add(const item: IHTMLControlElement); safecall;
    procedure remove(index: Integer); safecall;
    function item(index: Integer): IHTMLElement; safecall;
    procedure scrollIntoView(varargStart: OleVariant); safecall;
    function queryCommandSupported(const cmdID: WideString): WordBool; safecall;
    function queryCommandEnabled(const cmdID: WideString): WordBool; safecall;
    function queryCommandState(const cmdID: WideString): WordBool; safecall;
    function queryCommandIndeterm(const cmdID: WideString): WordBool; safecall;
    function queryCommandText(const cmdID: WideString): WideString; safecall;
    function queryCommandValue(const cmdID: WideString): OleVariant; safecall;
    function execCommand(const cmdID: WideString; showUI: WordBool; value: OleVariant): WordBool; safecall;
    function execCommandShowHelp(const cmdID: WideString): WordBool; safecall;
    function commonParentElement: IHTMLElement; safecall;
    function Get_length: Integer; safecall;
    property length: Integer read Get_length;
  end;

{ DispInterface declaration for Dual Interface IHTMLControlRange }

  IHTMLControlRangeDisp = dispinterface
    ['{3050F29C-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure select; dispid 1002;
    procedure add(const item: IHTMLControlElement); dispid 1003;
    procedure remove(index: Integer); dispid 1004;
    function item(index: Integer): IHTMLElement; dispid 0;
    procedure scrollIntoView(varargStart: OleVariant); dispid 1006;
    function queryCommandSupported(const cmdID: WideString): WordBool; dispid 1007;
    function queryCommandEnabled(const cmdID: WideString): WordBool; dispid 1008;
    function queryCommandState(const cmdID: WideString): WordBool; dispid 1009;
    function queryCommandIndeterm(const cmdID: WideString): WordBool; dispid 1010;
    function queryCommandText(const cmdID: WideString): WideString; dispid 1011;
    function queryCommandValue(const cmdID: WideString): OleVariant; dispid 1012;
    function execCommand(const cmdID: WideString; showUI: WordBool; value: OleVariant): WordBool; dispid 1013;
    function execCommandShowHelp(const cmdID: WideString): WordBool; dispid 1014;
    function commonParentElement: IHTMLElement; dispid 1015;
    property length: Integer readonly dispid 1005;
  end;

  HTMLImgEvents = dispinterface
    ['{3050F25B-98B5-11CF-BB82-00AA00BDCE0B}']
    function onhelp: WordBool; dispid -2147418102;
    function onclick: WordBool; dispid -600;
    function ondblclick: WordBool; dispid -601;
    function onkeypress: WordBool; dispid -603;
    procedure onkeydown; dispid -602;
    procedure onkeyup; dispid -604;
    procedure onmouseout; dispid -2147418103;
    procedure onmouseover; dispid -2147418104;
    procedure onmousemove; dispid -606;
    procedure onmousedown; dispid -605;
    procedure onmouseup; dispid -607;
    function onselectstart: WordBool; dispid -2147418100;
    procedure onfilterchange; dispid -2147418095;
    function ondragstart: WordBool; dispid -2147418101;
    function onbeforeupdate: WordBool; dispid -2147418108;
    procedure onafterupdate; dispid -2147418107;
    function onerrorupdate: WordBool; dispid -2147418099;
    function onrowexit: WordBool; dispid -2147418106;
    procedure onrowenter; dispid -2147418105;
    procedure ondatasetchanged; dispid -2147418098;
    procedure ondataavailable; dispid -2147418097;
    procedure ondatasetcomplete; dispid -2147418096;
    procedure onfocus; dispid -2147418111;
    procedure onblur; dispid -2147418112;
    procedure onresize; dispid 1016;
    procedure onreadystatechange; dispid -609;
    procedure onload; dispid 1003;
    procedure onerror; dispid 1002;
    procedure onabort; dispid 1000;
  end;

  HTMLInputImageEvents = dispinterface
    ['{3050F2C3-98B5-11CF-BB82-00AA00BDCE0B}']
    function onhelp: WordBool; dispid -2147418102;
    function onclick: WordBool; dispid -600;
    function ondblclick: WordBool; dispid -601;
    function onkeypress: WordBool; dispid -603;
    procedure onkeydown; dispid -602;
    procedure onkeyup; dispid -604;
    procedure onmouseout; dispid -2147418103;
    procedure onmouseover; dispid -2147418104;
    procedure onmousemove; dispid -606;
    procedure onmousedown; dispid -605;
    procedure onmouseup; dispid -607;
    function onselectstart: WordBool; dispid -2147418100;
    procedure onfilterchange; dispid -2147418095;
    function ondragstart: WordBool; dispid -2147418101;
    function onbeforeupdate: WordBool; dispid -2147418108;
    procedure onafterupdate; dispid -2147418107;
    function onerrorupdate: WordBool; dispid -2147418099;
    function onrowexit: WordBool; dispid -2147418106;
    procedure onrowenter; dispid -2147418105;
    procedure ondatasetchanged; dispid -2147418098;
    procedure ondataavailable; dispid -2147418097;
    procedure ondatasetcomplete; dispid -2147418096;
    procedure onfocus; dispid -2147418111;
    procedure onblur; dispid -2147418112;
    procedure onresize; dispid 1016;
    procedure onreadystatechange; dispid -609;
    procedure onload; dispid 1003;
    procedure onerror; dispid 1002;
    procedure onabort; dispid 1000;
  end;

  IHTMLImgElement = interface(IDispatch)
    ['{3050F240-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_isMap(Value: WordBool); safecall;
    function Get_isMap: WordBool; safecall;
    procedure Set_useMap(const Value: WideString); safecall;
    function Get_useMap: WideString; safecall;
    function Get_mimeType: WideString; safecall;
    function Get_fileSize: WideString; safecall;
    function Get_fileCreatedDate: WideString; safecall;
    function Get_fileModifiedDate: WideString; safecall;
    function Get_fileUpdatedDate: WideString; safecall;
    function Get_protocol: WideString; safecall;
    function Get_href: WideString; safecall;
    function Get_nameProp: WideString; safecall;
    procedure Set_border(Value: OleVariant); safecall;
    function Get_border: OleVariant; safecall;
    procedure Set_vspace(Value: Integer); safecall;
    function Get_vspace: Integer; safecall;
    procedure Set_hspace(Value: Integer); safecall;
    function Get_hspace: Integer; safecall;
    procedure Set_alt(const Value: WideString); safecall;
    function Get_alt: WideString; safecall;
    procedure Set_src(const Value: WideString); safecall;
    function Get_src: WideString; safecall;
    procedure Set_lowsrc(const Value: WideString); safecall;
    function Get_lowsrc: WideString; safecall;
    procedure Set_vrml(const Value: WideString); safecall;
    function Get_vrml: WideString; safecall;
    procedure Set_dynsrc(const Value: WideString); safecall;
    function Get_dynsrc: WideString; safecall;
    function Get_readyState: WideString; safecall;
    function Get_complete: WordBool; safecall;
    procedure Set_loop(Value: OleVariant); safecall;
    function Get_loop: OleVariant; safecall;
    procedure Set_align(const Value: WideString); safecall;
    function Get_align: WideString; safecall;
    procedure Set_onload(Value: OleVariant); safecall;
    function Get_onload: OleVariant; safecall;
    procedure Set_onerror(Value: OleVariant); safecall;
    function Get_onerror: OleVariant; safecall;
    procedure Set_onabort(Value: OleVariant); safecall;
    function Get_onabort: OleVariant; safecall;
    procedure Set_name(const Value: WideString); safecall;
    function Get_name: WideString; safecall;
    procedure Set_width(Value: Integer); safecall;
    function Get_width: Integer; safecall;
    procedure Set_height(Value: Integer); safecall;
    function Get_height: Integer; safecall;
    procedure Set_Start(const Value: WideString); safecall;
    function Get_Start: WideString; safecall;
    property isMap: WordBool read Get_isMap write Set_isMap;
    property useMap: WideString read Get_useMap write Set_useMap;
    property mimeType: WideString read Get_mimeType;
    property fileSize: WideString read Get_fileSize;
    property fileCreatedDate: WideString read Get_fileCreatedDate;
    property fileModifiedDate: WideString read Get_fileModifiedDate;
    property fileUpdatedDate: WideString read Get_fileUpdatedDate;
    property protocol: WideString read Get_protocol;
    property href: WideString read Get_href;
    property nameProp: WideString read Get_nameProp;
    property border: OleVariant read Get_border write Set_border;
    property vspace: Integer read Get_vspace write Set_vspace;
    property hspace: Integer read Get_hspace write Set_hspace;
    property alt: WideString read Get_alt write Set_alt;
    property src: WideString read Get_src write Set_src;
    property lowsrc: WideString read Get_lowsrc write Set_lowsrc;
    property vrml: WideString read Get_vrml write Set_vrml;
    property dynsrc: WideString read Get_dynsrc write Set_dynsrc;
    property readyState: WideString read Get_readyState;
    property complete: WordBool read Get_complete;
    property loop: OleVariant read Get_loop write Set_loop;
    property align: WideString read Get_align write Set_align;
    property onload: OleVariant read Get_onload write Set_onload;
    property onerror: OleVariant read Get_onerror write Set_onerror;
    property onabort: OleVariant read Get_onabort write Set_onabort;
    property name: WideString read Get_name write Set_name;
    property width: Integer read Get_width write Set_width;
    property height: Integer read Get_height write Set_height;
    property Start: WideString read Get_Start write Set_Start;
  end;

{ DispInterface declaration for Dual Interface IHTMLImgElement }

  IHTMLImgElementDisp = dispinterface
    ['{3050F240-98B5-11CF-BB82-00AA00BDCE0B}']
    property isMap: WordBool dispid 2002;
    property useMap: WideString dispid 2008;
    property mimeType: WideString readonly dispid 2010;
    property fileSize: WideString readonly dispid 2011;
    property fileCreatedDate: WideString readonly dispid 2012;
    property fileModifiedDate: WideString readonly dispid 2013;
    property fileUpdatedDate: WideString readonly dispid 2014;
    property protocol: WideString readonly dispid 2015;
    property href: WideString readonly dispid 2016;
    property nameProp: WideString readonly dispid 2017;
    property border: OleVariant dispid 1004;
    property vspace: Integer dispid 1005;
    property hspace: Integer dispid 1006;
    property alt: WideString dispid 1002;
    property src: WideString dispid 1003;
    property lowsrc: WideString dispid 1007;
    property vrml: WideString dispid 1008;
    property dynsrc: WideString dispid 1009;
    property readyState: WideString readonly dispid 1012;
    property complete: WordBool readonly dispid 1010;
    property loop: OleVariant dispid 1011;
    property align: WideString dispid -2147418039;
    property onload: OleVariant dispid -2147412080;
    property onerror: OleVariant dispid -2147412083;
    property onabort: OleVariant dispid -2147412084;
    property name: WideString dispid -2147418112;
    property width: Integer dispid -2147418107;
    property height: Integer dispid -2147418106;
    property Start: WideString dispid 1013;
  end;

  IHTMLInputImage = interface(IDispatch)
    ['{3050F2C2-98B5-11CF-BB82-00AA00BDCE0B}']
    function Get_type_: WideString; safecall;
    procedure Set_disabled(Value: WordBool); safecall;
    function Get_disabled: WordBool; safecall;
    procedure Set_border(Value: OleVariant); safecall;
    function Get_border: OleVariant; safecall;
    procedure Set_vspace(Value: Integer); safecall;
    function Get_vspace: Integer; safecall;
    procedure Set_hspace(Value: Integer); safecall;
    function Get_hspace: Integer; safecall;
    procedure Set_alt(const Value: WideString); safecall;
    function Get_alt: WideString; safecall;
    procedure Set_src(const Value: WideString); safecall;
    function Get_src: WideString; safecall;
    procedure Set_lowsrc(const Value: WideString); safecall;
    function Get_lowsrc: WideString; safecall;
    procedure Set_vrml(const Value: WideString); safecall;
    function Get_vrml: WideString; safecall;
    procedure Set_dynsrc(const Value: WideString); safecall;
    function Get_dynsrc: WideString; safecall;
    function Get_readyState: WideString; safecall;
    function Get_complete: WordBool; safecall;
    procedure Set_loop(Value: OleVariant); safecall;
    function Get_loop: OleVariant; safecall;
    procedure Set_align(const Value: WideString); safecall;
    function Get_align: WideString; safecall;
    procedure Set_onload(Value: OleVariant); safecall;
    function Get_onload: OleVariant; safecall;
    procedure Set_onerror(Value: OleVariant); safecall;
    function Get_onerror: OleVariant; safecall;
    procedure Set_onabort(Value: OleVariant); safecall;
    function Get_onabort: OleVariant; safecall;
    procedure Set_name(const Value: WideString); safecall;
    function Get_name: WideString; safecall;
    procedure Set_width(Value: Integer); safecall;
    function Get_width: Integer; safecall;
    procedure Set_height(Value: Integer); safecall;
    function Get_height: Integer; safecall;
    procedure Set_Start(const Value: WideString); safecall;
    function Get_Start: WideString; safecall;
    property type_: WideString read Get_type_;
    property disabled: WordBool read Get_disabled write Set_disabled;
    property border: OleVariant read Get_border write Set_border;
    property vspace: Integer read Get_vspace write Set_vspace;
    property hspace: Integer read Get_hspace write Set_hspace;
    property alt: WideString read Get_alt write Set_alt;
    property src: WideString read Get_src write Set_src;
    property lowsrc: WideString read Get_lowsrc write Set_lowsrc;
    property vrml: WideString read Get_vrml write Set_vrml;
    property dynsrc: WideString read Get_dynsrc write Set_dynsrc;
    property readyState: WideString read Get_readyState;
    property complete: WordBool read Get_complete;
    property loop: OleVariant read Get_loop write Set_loop;
    property align: WideString read Get_align write Set_align;
    property onload: OleVariant read Get_onload write Set_onload;
    property onerror: OleVariant read Get_onerror write Set_onerror;
    property onabort: OleVariant read Get_onabort write Set_onabort;
    property name: WideString read Get_name write Set_name;
    property width: Integer read Get_width write Set_width;
    property height: Integer read Get_height write Set_height;
    property Start: WideString read Get_Start write Set_Start;
  end;

{ DispInterface declaration for Dual Interface IHTMLInputImage }

  IHTMLInputImageDisp = dispinterface
    ['{3050F2C2-98B5-11CF-BB82-00AA00BDCE0B}']
    property type_: WideString readonly dispid 2000;
    property disabled: WordBool dispid -2147418036;
    property border: OleVariant dispid 1004;
    property vspace: Integer dispid 1005;
    property hspace: Integer dispid 1006;
    property alt: WideString dispid 1002;
    property src: WideString dispid 1003;
    property lowsrc: WideString dispid 1007;
    property vrml: WideString dispid 1008;
    property dynsrc: WideString dispid 1009;
    property readyState: WideString readonly dispid 1012;
    property complete: WordBool readonly dispid 1010;
    property loop: OleVariant dispid 1011;
    property align: WideString dispid -2147418039;
    property onload: OleVariant dispid -2147412080;
    property onerror: OleVariant dispid -2147412083;
    property onabort: OleVariant dispid -2147412084;
    property name: WideString dispid -2147418112;
    property width: Integer dispid -2147418107;
    property height: Integer dispid -2147418106;
    property Start: WideString dispid 1013;
  end;

  IHTMLImageElementFactory = interface(IDispatch)
    ['{3050F38E-98B5-11CF-BB82-00AA00BDCE0B}']
    function create(width, height: OleVariant): IHTMLImgElement; safecall;
  end;

{ DispInterface declaration for Dual Interface IHTMLImageElementFactory }

  IHTMLImageElementFactoryDisp = dispinterface
    ['{3050F38E-98B5-11CF-BB82-00AA00BDCE0B}']
    function create(width, height: OleVariant): IHTMLImgElement; dispid 0;
  end;

  DispIHTMLImgElement = dispinterface
    ['{3050F51C-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    property isMap: WordBool dispid 2002;
    property useMap: WideString dispid 2008;
    property mimeType: WideString readonly dispid 2010;
    property fileSize: WideString readonly dispid 2011;
    property fileCreatedDate: WideString readonly dispid 2012;
    property fileModifiedDate: WideString readonly dispid 2013;
    property fileUpdatedDate: WideString readonly dispid 2014;
    property protocol: WideString readonly dispid 2015;
    property href: WideString readonly dispid 2016;
    property nameProp: WideString readonly dispid 2017;
    property border: OleVariant dispid 1004;
    property vspace: Integer dispid 1005;
    property hspace: Integer dispid 1006;
    property alt: WideString dispid 1002;
    property src: WideString dispid 1003;
    property lowsrc: WideString dispid 1007;
    property vrml: WideString dispid 1008;
    property dynsrc: WideString dispid 1009;
    property readyState: WideString readonly dispid 1012;
    property complete: WordBool readonly dispid 1010;
    property loop: OleVariant dispid 1011;
    property align: WideString dispid -2147418039;
    property onload: OleVariant dispid -2147412080;
    property onerror: OleVariant dispid -2147412083;
    property onabort: OleVariant dispid -2147412084;
    property name: WideString dispid -2147418112;
    property width: Integer dispid -2147418107;
    property height: Integer dispid -2147418106;
    property Start: WideString dispid 1013;
    property dataFld: WideString dispid -2147417091;
    property dataSrc: WideString dispid -2147417090;
    property dataFormatAs: WideString dispid -2147417089;
  end;

  DispIHTMLInputImage = dispinterface
    ['{3050F51D-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    property type_: WideString readonly dispid 2000;
    property disabled: WordBool dispid -2147418036;
    property border: OleVariant dispid 1004;
    property vspace: Integer dispid 1005;
    property hspace: Integer dispid 1006;
    property alt: WideString dispid 1002;
    property src: WideString dispid 1003;
    property lowsrc: WideString dispid 1007;
    property vrml: WideString dispid 1008;
    property dynsrc: WideString dispid 1009;
    property readyState: WideString readonly dispid 1012;
    property complete: WordBool readonly dispid 1010;
    property loop: OleVariant dispid 1011;
    property align: WideString dispid -2147418039;
    property onload: OleVariant dispid -2147412080;
    property onerror: OleVariant dispid -2147412083;
    property onabort: OleVariant dispid -2147412084;
    property name: WideString dispid -2147418112;
    property width: Integer dispid -2147418107;
    property height: Integer dispid -2147418106;
    property Start: WideString dispid 1013;
  end;

  IHTMLBodyElement = interface(IDispatch)
    ['{3050F1D8-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_background(const Value: WideString); safecall;
    function Get_background: WideString; safecall;
    procedure Set_bgProperties(const Value: WideString); safecall;
    function Get_bgProperties: WideString; safecall;
    procedure Set_leftMargin(Value: OleVariant); safecall;
    function Get_leftMargin: OleVariant; safecall;
    procedure Set_topMargin(Value: OleVariant); safecall;
    function Get_topMargin: OleVariant; safecall;
    procedure Set_rightMargin(Value: OleVariant); safecall;
    function Get_rightMargin: OleVariant; safecall;
    procedure Set_bottomMargin(Value: OleVariant); safecall;
    function Get_bottomMargin: OleVariant; safecall;
    procedure Set_noWrap(Value: WordBool); safecall;
    function Get_noWrap: WordBool; safecall;
    procedure Set_bgColor(Value: OleVariant); safecall;
    function Get_bgColor: OleVariant; safecall;
    procedure Set_text(Value: OleVariant); safecall;
    function Get_text: OleVariant; safecall;
    procedure Set_link(Value: OleVariant); safecall;
    function Get_link: OleVariant; safecall;
    procedure Set_vLink(Value: OleVariant); safecall;
    function Get_vLink: OleVariant; safecall;
    procedure Set_aLink(Value: OleVariant); safecall;
    function Get_aLink: OleVariant; safecall;
    procedure Set_onload(Value: OleVariant); safecall;
    function Get_onload: OleVariant; safecall;
    procedure Set_onunload(Value: OleVariant); safecall;
    function Get_onunload: OleVariant; safecall;
    procedure Set_scroll(const Value: WideString); safecall;
    function Get_scroll: WideString; safecall;
    procedure Set_onselect(Value: OleVariant); safecall;
    function Get_onselect: OleVariant; safecall;
    procedure Set_onbeforeunload(Value: OleVariant); safecall;
    function Get_onbeforeunload: OleVariant; safecall;
    function createTextRange: IHTMLTxtRange; safecall;
    property background: WideString read Get_background write Set_background;
    property bgProperties: WideString read Get_bgProperties write Set_bgProperties;
    property leftMargin: OleVariant read Get_leftMargin write Set_leftMargin;
    property topMargin: OleVariant read Get_topMargin write Set_topMargin;
    property rightMargin: OleVariant read Get_rightMargin write Set_rightMargin;
    property bottomMargin: OleVariant read Get_bottomMargin write Set_bottomMargin;
    property noWrap: WordBool read Get_noWrap write Set_noWrap;
    property bgColor: OleVariant read Get_bgColor write Set_bgColor;
    property text: OleVariant read Get_text write Set_text;
    property link: OleVariant read Get_link write Set_link;
    property vLink: OleVariant read Get_vLink write Set_vLink;
    property aLink: OleVariant read Get_aLink write Set_aLink;
    property onload: OleVariant read Get_onload write Set_onload;
    property onunload: OleVariant read Get_onunload write Set_onunload;
    property scroll: WideString read Get_scroll write Set_scroll;
    property onselect: OleVariant read Get_onselect write Set_onselect;
    property onbeforeunload: OleVariant read Get_onbeforeunload write Set_onbeforeunload;
  end;

{ DispInterface declaration for Dual Interface IHTMLBodyElement }

  IHTMLBodyElementDisp = dispinterface
    ['{3050F1D8-98B5-11CF-BB82-00AA00BDCE0B}']
    property background: WideString dispid -2147413111;
    property bgProperties: WideString dispid -2147413067;
    property leftMargin: OleVariant dispid -2147413072;
    property topMargin: OleVariant dispid -2147413075;
    property rightMargin: OleVariant dispid -2147413074;
    property bottomMargin: OleVariant dispid -2147413073;
    property noWrap: WordBool dispid -2147413107;
    property bgColor: OleVariant dispid -501;
    property text: OleVariant dispid -2147413110;
    property link: OleVariant dispid 2010;
    property vLink: OleVariant dispid 2012;
    property aLink: OleVariant dispid 2011;
    property onload: OleVariant dispid -2147412080;
    property onunload: OleVariant dispid -2147412079;
    property scroll: WideString dispid -2147413033;
    property onselect: OleVariant dispid -2147412102;
    property onbeforeunload: OleVariant dispid -2147412073;
    function createTextRange: IHTMLTxtRange; dispid 2013;
  end;

  DispIHTMLBodyElement = dispinterface
    ['{3050F507-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    function createControlRange: IDispatch; dispid 1001;
    property scrollHeight: Integer readonly dispid 1002;
    property scrollWidth: Integer readonly dispid 1003;
    property scrollTop: Integer dispid 1004;
    property scrollLeft: Integer dispid 1005;
    property onscroll: OleVariant dispid -2147412081;
    property background: WideString dispid -2147413111;
    property bgProperties: WideString dispid -2147413067;
    property leftMargin: OleVariant dispid -2147413072;
    property topMargin: OleVariant dispid -2147413075;
    property rightMargin: OleVariant dispid -2147413074;
    property bottomMargin: OleVariant dispid -2147413073;
    property noWrap: WordBool dispid -2147413107;
    property bgColor: OleVariant dispid -501;
    property text: OleVariant dispid -2147413110;
    property link: OleVariant dispid 2010;
    property vLink: OleVariant dispid 2012;
    property aLink: OleVariant dispid 2011;
    property onload: OleVariant dispid -2147412080;
    property onunload: OleVariant dispid -2147412079;
    property scroll: WideString dispid -2147413033;
    property onselect: OleVariant dispid -2147412102;
    property onbeforeunload: OleVariant dispid -2147412073;
    function createTextRange: IHTMLTxtRange; dispid 2013;
  end;

  IHTMLFontElement = interface(IDispatch)
    ['{3050F1D9-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_color(Value: OleVariant); safecall;
    function Get_color: OleVariant; safecall;
    procedure Set_face(const Value: WideString); safecall;
    function Get_face: WideString; safecall;
    procedure Set_size(Value: OleVariant); safecall;
    function Get_size: OleVariant; safecall;
    property color: OleVariant read Get_color write Set_color;
    property face: WideString read Get_face write Set_face;
    property size: OleVariant read Get_size write Set_size;
  end;

{ DispInterface declaration for Dual Interface IHTMLFontElement }

  IHTMLFontElementDisp = dispinterface
    ['{3050F1D9-98B5-11CF-BB82-00AA00BDCE0B}']
    property color: OleVariant dispid -2147413110;
    property face: WideString dispid -2147413094;
    property size: OleVariant dispid -2147413093;
  end;

  DispIHTMLFontElement = dispinterface
    ['{3050F512-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property color: OleVariant dispid -2147413110;
    property face: WideString dispid -2147413094;
    property size: OleVariant dispid -2147413093;
  end;

  HTMLAnchorEvents = dispinterface
    ['{3050F29D-98B5-11CF-BB82-00AA00BDCE0B}']
    function onhelp: WordBool; dispid -2147418102;
    function onclick: WordBool; dispid -600;
    function ondblclick: WordBool; dispid -601;
    function onkeypress: WordBool; dispid -603;
    procedure onkeydown; dispid -602;
    procedure onkeyup; dispid -604;
    procedure onmouseout; dispid -2147418103;
    procedure onmouseover; dispid -2147418104;
    procedure onmousemove; dispid -606;
    procedure onmousedown; dispid -605;
    procedure onmouseup; dispid -607;
    function onselectstart: WordBool; dispid -2147418100;
    procedure onfilterchange; dispid -2147418095;
    function ondragstart: WordBool; dispid -2147418101;
    function onbeforeupdate: WordBool; dispid -2147418108;
    procedure onafterupdate; dispid -2147418107;
    function onerrorupdate: WordBool; dispid -2147418099;
    function onrowexit: WordBool; dispid -2147418106;
    procedure onrowenter; dispid -2147418105;
    procedure ondatasetchanged; dispid -2147418098;
    procedure ondataavailable; dispid -2147418097;
    procedure ondatasetcomplete; dispid -2147418096;
    procedure onfocus; dispid -2147418111;
    procedure onblur; dispid -2147418112;
  end;

  IHTMLAnchorElement = interface(IDispatch)
    ['{3050F1DA-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_href(const Value: WideString); safecall;
    function Get_href: WideString; safecall;
    procedure Set_target(const Value: WideString); safecall;
    function Get_target: WideString; safecall;
    procedure Set_rel(const Value: WideString); safecall;
    function Get_rel: WideString; safecall;
    procedure Set_rev(const Value: WideString); safecall;
    function Get_rev: WideString; safecall;
    procedure Set_urn(const Value: WideString); safecall;
    function Get_urn: WideString; safecall;
    procedure Set_Methods(const Value: WideString); safecall;
    function Get_Methods: WideString; safecall;
    procedure Set_name(const Value: WideString); safecall;
    function Get_name: WideString; safecall;
    procedure Set_host(const Value: WideString); safecall;
    function Get_host: WideString; safecall;
    procedure Set_hostname(const Value: WideString); safecall;
    function Get_hostname: WideString; safecall;
    procedure Set_pathname(const Value: WideString); safecall;
    function Get_pathname: WideString; safecall;
    procedure Set_port(const Value: WideString); safecall;
    function Get_port: WideString; safecall;
    procedure Set_protocol(const Value: WideString); safecall;
    function Get_protocol: WideString; safecall;
    procedure Set_search(const Value: WideString); safecall;
    function Get_search: WideString; safecall;
    procedure Set_hash(const Value: WideString); safecall;
    function Get_hash: WideString; safecall;
    procedure Set_onblur(Value: OleVariant); safecall;
    function Get_onblur: OleVariant; safecall;
    procedure Set_onfocus(Value: OleVariant); safecall;
    function Get_onfocus: OleVariant; safecall;
    procedure Set_accessKey(const Value: WideString); safecall;
    function Get_accessKey: WideString; safecall;
    function Get_protocolLong: WideString; safecall;
    function Get_mimeType: WideString; safecall;
    function Get_nameProp: WideString; safecall;
    procedure Set_tabIndex(Value: Smallint); safecall;
    function Get_tabIndex: Smallint; safecall;
    procedure focus; safecall;
    procedure blur; safecall;
    property href: WideString read Get_href write Set_href;
    property target: WideString read Get_target write Set_target;
    property rel: WideString read Get_rel write Set_rel;
    property rev: WideString read Get_rev write Set_rev;
    property urn: WideString read Get_urn write Set_urn;
    property Methods: WideString read Get_Methods write Set_Methods;
    property name: WideString read Get_name write Set_name;
    property host: WideString read Get_host write Set_host;
    property hostname: WideString read Get_hostname write Set_hostname;
    property pathname: WideString read Get_pathname write Set_pathname;
    property port: WideString read Get_port write Set_port;
    property protocol: WideString read Get_protocol write Set_protocol;
    property search: WideString read Get_search write Set_search;
    property hash: WideString read Get_hash write Set_hash;
    property onblur: OleVariant read Get_onblur write Set_onblur;
    property onfocus: OleVariant read Get_onfocus write Set_onfocus;
    property accessKey: WideString read Get_accessKey write Set_accessKey;
    property protocolLong: WideString read Get_protocolLong;
    property mimeType: WideString read Get_mimeType;
    property nameProp: WideString read Get_nameProp;
    property tabIndex: Smallint read Get_tabIndex write Set_tabIndex;
  end;

{ DispInterface declaration for Dual Interface IHTMLAnchorElement }

  IHTMLAnchorElementDisp = dispinterface
    ['{3050F1DA-98B5-11CF-BB82-00AA00BDCE0B}']
    property href: WideString dispid 0;
    property target: WideString dispid 1003;
    property rel: WideString dispid 1005;
    property rev: WideString dispid 1006;
    property urn: WideString dispid 1007;
    property Methods: WideString dispid 1008;
    property name: WideString dispid -2147418112;
    property host: WideString dispid 1012;
    property hostname: WideString dispid 1013;
    property pathname: WideString dispid 1014;
    property port: WideString dispid 1015;
    property protocol: WideString dispid 1016;
    property search: WideString dispid 1017;
    property hash: WideString dispid 1018;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property accessKey: WideString dispid 1022;
    property protocolLong: WideString readonly dispid 1031;
    property mimeType: WideString readonly dispid 1030;
    property nameProp: WideString readonly dispid 1032;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid 1033;
    procedure blur; dispid 1034;
  end;

  DispIHTMLAnchorElement = dispinterface
    ['{3050F502-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property href: WideString dispid 0;
    property target: WideString dispid 1003;
    property rel: WideString dispid 1005;
    property rev: WideString dispid 1006;
    property urn: WideString dispid 1007;
    property Methods: WideString dispid 1008;
    property name: WideString dispid -2147418112;
    property host: WideString dispid 1012;
    property hostname: WideString dispid 1013;
    property pathname: WideString dispid 1014;
    property port: WideString dispid 1015;
    property protocol: WideString dispid 1016;
    property search: WideString dispid 1017;
    property hash: WideString dispid 1018;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property accessKey: WideString dispid 1022;
    property protocolLong: WideString readonly dispid 1031;
    property mimeType: WideString readonly dispid 1030;
    property nameProp: WideString readonly dispid 1032;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid 1033;
    procedure blur; dispid 1034;
    property dataFld: WideString dispid -2147417091;
    property dataSrc: WideString dispid -2147417090;
    property dataFormatAs: WideString dispid -2147417089;
  end;

  HTMLLabelEvents = dispinterface
    ['{3050F329-98B5-11CF-BB82-00AA00BDCE0B}']
    function onhelp: WordBool; dispid -2147418102;
    function onclick: WordBool; dispid -600;
    function ondblclick: WordBool; dispid -601;
    function onkeypress: WordBool; dispid -603;
    procedure onkeydown; dispid -602;
    procedure onkeyup; dispid -604;
    procedure onmouseout; dispid -2147418103;
    procedure onmouseover; dispid -2147418104;
    procedure onmousemove; dispid -606;
    procedure onmousedown; dispid -605;
    procedure onmouseup; dispid -607;
    function onselectstart: WordBool; dispid -2147418100;
    procedure onfilterchange; dispid -2147418095;
    function ondragstart: WordBool; dispid -2147418101;
    function onbeforeupdate: WordBool; dispid -2147418108;
    procedure onafterupdate; dispid -2147418107;
    function onerrorupdate: WordBool; dispid -2147418099;
    function onrowexit: WordBool; dispid -2147418106;
    procedure onrowenter; dispid -2147418105;
    procedure ondatasetchanged; dispid -2147418098;
    procedure ondataavailable; dispid -2147418097;
    procedure ondatasetcomplete; dispid -2147418096;
  end;

  IHTMLLabelElement = interface(IDispatch)
    ['{3050F32A-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_htmlFor(const Value: WideString); safecall;
    function Get_htmlFor: WideString; safecall;
    procedure Set_accessKey(const Value: WideString); safecall;
    function Get_accessKey: WideString; safecall;
    property htmlFor: WideString read Get_htmlFor write Set_htmlFor;
    property accessKey: WideString read Get_accessKey write Set_accessKey;
  end;

{ DispInterface declaration for Dual Interface IHTMLLabelElement }

  IHTMLLabelElementDisp = dispinterface
    ['{3050F32A-98B5-11CF-BB82-00AA00BDCE0B}']
    property htmlFor: WideString dispid 1000;
    property accessKey: WideString dispid 1001;
  end;

  DispIHTMLLabelElement = dispinterface
    ['{3050F522-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property htmlFor: WideString dispid 1000;
    property accessKey: WideString dispid 1001;
    property dataFld: WideString dispid -2147417091;
    property dataSrc: WideString dispid -2147417090;
    property dataFormatAs: WideString dispid -2147417089;
  end;

  IHTMLListElement = interface(IDispatch)
    ['{3050F20E-98B5-11CF-BB82-00AA00BDCE0B}']
  end;

{ DispInterface declaration for Dual Interface IHTMLListElement }

  IHTMLListElementDisp = dispinterface
    ['{3050F20E-98B5-11CF-BB82-00AA00BDCE0B}']
  end;

  DispIHTMLListElement = dispinterface
    ['{3050F525-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
  end;

  IHTMLUListElement = interface(IDispatch)
    ['{3050F1DD-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_compact(Value: WordBool); safecall;
    function Get_compact: WordBool; safecall;
    procedure Set_type_(const Value: WideString); safecall;
    function Get_type_: WideString; safecall;
    property compact: WordBool read Get_compact write Set_compact;
    property type_: WideString read Get_type_ write Set_type_;
  end;

{ DispInterface declaration for Dual Interface IHTMLUListElement }

  IHTMLUListElementDisp = dispinterface
    ['{3050F1DD-98B5-11CF-BB82-00AA00BDCE0B}']
    property compact: WordBool dispid 1002;
    property type_: WideString dispid -2147413095;
  end;

  DispIHTMLUListElement = dispinterface
    ['{3050F538-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property compact: WordBool dispid 1002;
    property type_: WideString dispid -2147413095;
  end;

  IHTMLOListElement = interface(IDispatch)
    ['{3050F1DE-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_compact(Value: WordBool); safecall;
    function Get_compact: WordBool; safecall;
    procedure Set_Start(Value: Integer); safecall;
    function Get_Start: Integer; safecall;
    procedure Set_type_(const Value: WideString); safecall;
    function Get_type_: WideString; safecall;
    property compact: WordBool read Get_compact write Set_compact;
    property Start: Integer read Get_Start write Set_Start;
    property type_: WideString read Get_type_ write Set_type_;
  end;

{ DispInterface declaration for Dual Interface IHTMLOListElement }

  IHTMLOListElementDisp = dispinterface
    ['{3050F1DE-98B5-11CF-BB82-00AA00BDCE0B}']
    property compact: WordBool dispid 1002;
    property Start: Integer dispid 1003;
    property type_: WideString dispid -2147413095;
  end;

  DispIHTMLOListElement = dispinterface
    ['{3050F52A-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property compact: WordBool dispid 1002;
    property Start: Integer dispid 1003;
    property type_: WideString dispid -2147413095;
  end;

  IHTMLLIElement = interface(IDispatch)
    ['{3050F1E0-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_type_(const Value: WideString); safecall;
    function Get_type_: WideString; safecall;
    procedure Set_value(Value: Integer); safecall;
    function Get_value: Integer; safecall;
    property type_: WideString read Get_type_ write Set_type_;
    property value: Integer read Get_value write Set_value;
  end;

{ DispInterface declaration for Dual Interface IHTMLLIElement }

  IHTMLLIElementDisp = dispinterface
    ['{3050F1E0-98B5-11CF-BB82-00AA00BDCE0B}']
    property type_: WideString dispid -2147413095;
    property value: Integer dispid 1001;
  end;

  DispIHTMLLIElement = dispinterface
    ['{3050F523-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property type_: WideString dispid -2147413095;
    property value: Integer dispid 1001;
  end;

  IHTMLBlockElement = interface(IDispatch)
    ['{3050F208-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_clear(const Value: WideString); safecall;
    function Get_clear: WideString; safecall;
    property clear: WideString read Get_clear write Set_clear;
  end;

{ DispInterface declaration for Dual Interface IHTMLBlockElement }

  IHTMLBlockElementDisp = dispinterface
    ['{3050F208-98B5-11CF-BB82-00AA00BDCE0B}']
    property clear: WideString dispid -2147413096;
  end;

  DispIHTMLBlockElement = dispinterface
    ['{3050F506-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property clear: WideString dispid -2147413096;
  end;

  IHTMLDivElement = interface(IDispatch)
    ['{3050F200-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_align(const Value: WideString); safecall;
    function Get_align: WideString; safecall;
    procedure Set_noWrap(Value: WordBool); safecall;
    function Get_noWrap: WordBool; safecall;
    property align: WideString read Get_align write Set_align;
    property noWrap: WordBool read Get_noWrap write Set_noWrap;
  end;

{ DispInterface declaration for Dual Interface IHTMLDivElement }

  IHTMLDivElementDisp = dispinterface
    ['{3050F200-98B5-11CF-BB82-00AA00BDCE0B}']
    property align: WideString dispid -2147418040;
    property noWrap: WordBool dispid -2147413107;
  end;

  DispIHTMLDivElement = dispinterface
    ['{3050F50C-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property align: WideString dispid -2147418040;
    property noWrap: WordBool dispid -2147413107;
    property dataFld: WideString dispid -2147417091;
    property dataSrc: WideString dispid -2147417090;
    property dataFormatAs: WideString dispid -2147417089;
  end;

  IHTMLDDElement = interface(IDispatch)
    ['{3050F1F2-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_noWrap(Value: WordBool); safecall;
    function Get_noWrap: WordBool; safecall;
    property noWrap: WordBool read Get_noWrap write Set_noWrap;
  end;

{ DispInterface declaration for Dual Interface IHTMLDDElement }

  IHTMLDDElementDisp = dispinterface
    ['{3050F1F2-98B5-11CF-BB82-00AA00BDCE0B}']
    property noWrap: WordBool dispid -2147413107;
  end;

  DispIHTMLDDElement = dispinterface
    ['{3050F50B-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property noWrap: WordBool dispid -2147413107;
  end;

  IHTMLDTElement = interface(IDispatch)
    ['{3050F1F3-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_noWrap(Value: WordBool); safecall;
    function Get_noWrap: WordBool; safecall;
    property noWrap: WordBool read Get_noWrap write Set_noWrap;
  end;

{ DispInterface declaration for Dual Interface IHTMLDTElement }

  IHTMLDTElementDisp = dispinterface
    ['{3050F1F3-98B5-11CF-BB82-00AA00BDCE0B}']
    property noWrap: WordBool dispid -2147413107;
  end;

  DispIHTMLDTElement = dispinterface
    ['{3050F50D-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property noWrap: WordBool dispid -2147413107;
  end;

  IHTMLBRElement = interface(IDispatch)
    ['{3050F1F0-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_clear(const Value: WideString); safecall;
    function Get_clear: WideString; safecall;
    property clear: WideString read Get_clear write Set_clear;
  end;

{ DispInterface declaration for Dual Interface IHTMLBRElement }

  IHTMLBRElementDisp = dispinterface
    ['{3050F1F0-98B5-11CF-BB82-00AA00BDCE0B}']
    property clear: WideString dispid -2147413096;
  end;

  DispIHTMLBRElement = dispinterface
    ['{3050F53A-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property clear: WideString dispid -2147413096;
  end;

  IHTMLDListElement = interface(IDispatch)
    ['{3050F1F1-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_compact(Value: WordBool); safecall;
    function Get_compact: WordBool; safecall;
    property compact: WordBool read Get_compact write Set_compact;
  end;

{ DispInterface declaration for Dual Interface IHTMLDListElement }

  IHTMLDListElementDisp = dispinterface
    ['{3050F1F1-98B5-11CF-BB82-00AA00BDCE0B}']
    property compact: WordBool dispid 1001;
  end;

  DispIHTMLDListElement = dispinterface
    ['{3050F53B-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property compact: WordBool dispid 1001;
  end;

  IHTMLHRElement = interface(IDispatch)
    ['{3050F1F4-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_align(const Value: WideString); safecall;
    function Get_align: WideString; safecall;
    procedure Set_color(Value: OleVariant); safecall;
    function Get_color: OleVariant; safecall;
    procedure Set_noShade(Value: WordBool); safecall;
    function Get_noShade: WordBool; safecall;
    procedure Set_width(Value: OleVariant); safecall;
    function Get_width: OleVariant; safecall;
    procedure Set_size(Value: OleVariant); safecall;
    function Get_size: OleVariant; safecall;
    property align: WideString read Get_align write Set_align;
    property color: OleVariant read Get_color write Set_color;
    property noShade: WordBool read Get_noShade write Set_noShade;
    property width: OleVariant read Get_width write Set_width;
    property size: OleVariant read Get_size write Set_size;
  end;

{ DispInterface declaration for Dual Interface IHTMLHRElement }

  IHTMLHRElementDisp = dispinterface
    ['{3050F1F4-98B5-11CF-BB82-00AA00BDCE0B}']
    property align: WideString dispid -2147418040;
    property color: OleVariant dispid -2147413110;
    property noShade: WordBool dispid 1001;
    property width: OleVariant dispid -2147418107;
    property size: OleVariant dispid -2147418106;
  end;

  DispIHTMLHRElement = dispinterface
    ['{3050F53D-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property align: WideString dispid -2147418040;
    property color: OleVariant dispid -2147413110;
    property noShade: WordBool dispid 1001;
    property width: OleVariant dispid -2147418107;
    property size: OleVariant dispid -2147418106;
  end;

  IHTMLParaElement = interface(IDispatch)
    ['{3050F1F5-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_align(const Value: WideString); safecall;
    function Get_align: WideString; safecall;
    property align: WideString read Get_align write Set_align;
  end;

{ DispInterface declaration for Dual Interface IHTMLParaElement }

  IHTMLParaElementDisp = dispinterface
    ['{3050F1F5-98B5-11CF-BB82-00AA00BDCE0B}']
    property align: WideString dispid -2147418040;
  end;

  DispIHTMLParaElement = dispinterface
    ['{3050F52C-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property clear: WideString dispid -2147413096;
    property align: WideString dispid -2147418040;
  end;

  IHTMLElementCollection = interface(IDispatch)
    ['{3050F21F-98B5-11CF-BB82-00AA00BDCE0B}']
    function toString: WideString; safecall;
    procedure Set_length(Value: Integer); safecall;
    function Get_length: Integer; safecall;
    function Get__newEnum: IUnknown; safecall;
    function item(name, index: OleVariant): IDispatch; safecall;
    function tags(tagName: OleVariant): IDispatch; safecall;
    property length: Integer read Get_length write Set_length;
    property _newEnum: IUnknown read Get__newEnum;
  end;

{ DispInterface declaration for Dual Interface IHTMLElementCollection }

  IHTMLElementCollectionDisp = dispinterface
    ['{3050F21F-98B5-11CF-BB82-00AA00BDCE0B}']
    function toString: WideString; dispid 1501;
    property length: Integer dispid 1500;
    function item(name, index: OleVariant): IDispatch; dispid 0;
    function tags(tagName: OleVariant): IDispatch; dispid 1502;
  end;

  IHTMLHeaderElement = interface(IDispatch)
    ['{3050F1F6-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_align(const Value: WideString); safecall;
    function Get_align: WideString; safecall;
    property align: WideString read Get_align write Set_align;
  end;

{ DispInterface declaration for Dual Interface IHTMLHeaderElement }

  IHTMLHeaderElementDisp = dispinterface
    ['{3050F1F6-98B5-11CF-BB82-00AA00BDCE0B}']
    property align: WideString dispid -2147418040;
  end;

  DispIHTMLHeaderElement = dispinterface
    ['{3050F515-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property clear: WideString dispid -2147413096;
    property align: WideString dispid -2147418040;
  end;

  HTMLSelectElementEvents = dispinterface
    ['{3050F302-98B5-11CF-BB82-00AA00BDCE0B}']
    function onhelp: WordBool; dispid -2147418102;
    function onclick: WordBool; dispid -600;
    function ondblclick: WordBool; dispid -601;
    function onkeypress: WordBool; dispid -603;
    procedure onkeydown; dispid -602;
    procedure onkeyup; dispid -604;
    procedure onmouseout; dispid -2147418103;
    procedure onmouseover; dispid -2147418104;
    procedure onmousemove; dispid -606;
    procedure onmousedown; dispid -605;
    procedure onmouseup; dispid -607;
    function onselectstart: WordBool; dispid -2147418100;
    procedure onfilterchange; dispid -2147418095;
    function ondragstart: WordBool; dispid -2147418101;
    function onbeforeupdate: WordBool; dispid -2147418108;
    procedure onafterupdate; dispid -2147418107;
    function onerrorupdate: WordBool; dispid -2147418099;
    function onrowexit: WordBool; dispid -2147418106;
    procedure onrowenter; dispid -2147418105;
    procedure ondatasetchanged; dispid -2147418098;
    procedure ondataavailable; dispid -2147418097;
    procedure ondatasetcomplete; dispid -2147418096;
    procedure onfocus; dispid -2147418111;
    procedure onblur; dispid -2147418112;
    procedure onresize; dispid 1016;
    procedure onchange; dispid 1001;
  end;

  IHTMLSelectElement = interface(IDispatch)
    ['{3050F244-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_size(Value: Integer); safecall;
    function Get_size: Integer; safecall;
    procedure Set_multiple(Value: WordBool); safecall;
    function Get_multiple: WordBool; safecall;
    procedure Set_name(const Value: WideString); safecall;
    function Get_name: WideString; safecall;
    function Get_options: IDispatch; safecall;
    procedure Set_onchange(Value: OleVariant); safecall;
    function Get_onchange: OleVariant; safecall;
    procedure Set_selectedIndex(Value: Integer); safecall;
    function Get_selectedIndex: Integer; safecall;
    function Get_type_: WideString; safecall;
    procedure Set_value(const Value: WideString); safecall;
    function Get_value: WideString; safecall;
    procedure Set_disabled(Value: WordBool); safecall;
    function Get_disabled: WordBool; safecall;
    function Get_form: IHTMLFormElement; safecall;
    procedure add(const element: IHTMLElement; before: OleVariant); safecall;
    procedure remove(index: Integer); safecall;
    procedure Set_length(Value: Integer); safecall;
    function Get_length: Integer; safecall;
    function Get__newEnum: IUnknown; safecall;
    function item(name, index: OleVariant): IDispatch; safecall;
    function tags(tagName: OleVariant): IDispatch; safecall;
    property size: Integer read Get_size write Set_size;
    property multiple: WordBool read Get_multiple write Set_multiple;
    property name: WideString read Get_name write Set_name;
    property options: IDispatch read Get_options;
    property onchange: OleVariant read Get_onchange write Set_onchange;
    property selectedIndex: Integer read Get_selectedIndex write Set_selectedIndex;
    property type_: WideString read Get_type_;
    property value: WideString read Get_value write Set_value;
    property disabled: WordBool read Get_disabled write Set_disabled;
    property form: IHTMLFormElement read Get_form;
    property length: Integer read Get_length write Set_length;
    property _newEnum: IUnknown read Get__newEnum;
  end;

{ DispInterface declaration for Dual Interface IHTMLSelectElement }

  IHTMLSelectElementDisp = dispinterface
    ['{3050F244-98B5-11CF-BB82-00AA00BDCE0B}']
    property size: Integer dispid 1002;
    property multiple: WordBool dispid 1003;
    property name: WideString dispid -2147418112;
    property options: IDispatch readonly dispid 1005;
    property onchange: OleVariant dispid -2147412082;
    property selectedIndex: Integer dispid 1010;
    property type_: WideString readonly dispid 1012;
    property value: WideString dispid 1011;
    property disabled: WordBool dispid -2147418036;
    property form: IHTMLFormElement readonly dispid -2147416108;
    procedure add(const element: IHTMLElement; before: OleVariant); dispid 1503;
    procedure remove(index: Integer); dispid 1504;
    property length: Integer dispid 1500;
    function item(name, index: OleVariant): IDispatch; dispid 0;
    function tags(tagName: OleVariant): IDispatch; dispid 1502;
  end;

  DispIHTMLSelectElement = dispinterface
    ['{3050F531-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    property size: Integer dispid 1002;
    property multiple: WordBool dispid 1003;
    property name: WideString dispid -2147418112;
    property options: IDispatch readonly dispid 1005;
    property onchange: OleVariant dispid -2147412082;
    property selectedIndex: Integer dispid 1010;
    property type_: WideString readonly dispid 1012;
    property value: WideString dispid 1011;
    property disabled: WordBool dispid -2147418036;
    property form: IHTMLFormElement readonly dispid -2147416108;
    procedure add(const element: IHTMLElement; before: OleVariant); dispid 1503;
    procedure remove(index: Integer); dispid 1504;
    property length: Integer dispid 1500;
    function item(name, index: OleVariant): IDispatch; dispid 0;
    function tags(tagName: OleVariant): IDispatch; dispid 1502;
    property dataFld: WideString dispid -2147417091;
    property dataSrc: WideString dispid -2147417090;
    property dataFormatAs: WideString dispid -2147417089;
  end;

  IHTMLSelectionObject = interface(IDispatch)
    ['{3050F25A-98B5-11CF-BB82-00AA00BDCE0B}']
    function createRange: IDispatch; safecall;
    procedure empty; safecall;
    procedure clear; safecall;
    function Get_type_: WideString; safecall;
    property type_: WideString read Get_type_;
  end;

{ DispInterface declaration for Dual Interface IHTMLSelectionObject }

  IHTMLSelectionObjectDisp = dispinterface
    ['{3050F25A-98B5-11CF-BB82-00AA00BDCE0B}']
    function createRange: IDispatch; dispid 1001;
    procedure empty; dispid 1002;
    procedure clear; dispid 1003;
    property type_: WideString readonly dispid 1004;
  end;

  IHTMLOptionElement = interface(IDispatch)
    ['{3050F211-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_selected(Value: WordBool); safecall;
    function Get_selected: WordBool; safecall;
    procedure Set_value(const Value: WideString); safecall;
    function Get_value: WideString; safecall;
    procedure Set_defaultSelected(Value: WordBool); safecall;
    function Get_defaultSelected: WordBool; safecall;
    procedure Set_index(Value: Integer); safecall;
    function Get_index: Integer; safecall;
    procedure Set_text(const Value: WideString); safecall;
    function Get_text: WideString; safecall;
    function Get_form: IHTMLFormElement; safecall;
    property selected: WordBool read Get_selected write Set_selected;
    property value: WideString read Get_value write Set_value;
    property defaultSelected: WordBool read Get_defaultSelected write Set_defaultSelected;
    property index: Integer read Get_index write Set_index;
    property text: WideString read Get_text write Set_text;
    property form: IHTMLFormElement read Get_form;
  end;

{ DispInterface declaration for Dual Interface IHTMLOptionElement }

  IHTMLOptionElementDisp = dispinterface
    ['{3050F211-98B5-11CF-BB82-00AA00BDCE0B}']
    property selected: WordBool dispid 1001;
    property value: WideString dispid 1002;
    property defaultSelected: WordBool dispid 1003;
    property index: Integer dispid 1005;
    property text: WideString dispid 1004;
    property form: IHTMLFormElement readonly dispid 1006;
  end;

  IHTMLOptionElementFactory = interface(IDispatch)
    ['{3050F38C-98B5-11CF-BB82-00AA00BDCE0B}']
    function create(text, value, defaultSelected, selected: OleVariant): IHTMLOptionElement; safecall;
  end;

{ DispInterface declaration for Dual Interface IHTMLOptionElementFactory }

  IHTMLOptionElementFactoryDisp = dispinterface
    ['{3050F38C-98B5-11CF-BB82-00AA00BDCE0B}']
    function create(text, value, defaultSelected, selected: OleVariant): IHTMLOptionElement; dispid 0;
  end;

  DispIHTMLOptionElement = dispinterface
    ['{3050F52B-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property selected: WordBool dispid 1001;
    property value: WideString dispid 1002;
    property defaultSelected: WordBool dispid 1003;
    property index: Integer dispid 1005;
    property text: WideString dispid 1004;
    property form: IHTMLFormElement readonly dispid 1006;
    property dataFld: WideString dispid -2147417091;
    property dataSrc: WideString dispid -2147417090;
    property dataFormatAs: WideString dispid -2147417089;
  end;

  HTMLInputTextElementEvents = dispinterface
    ['{3050F2A7-98B5-11CF-BB82-00AA00BDCE0B}']
    function onhelp: WordBool; dispid -2147418102;
    function onclick: WordBool; dispid -600;
    function ondblclick: WordBool; dispid -601;
    function onkeypress: WordBool; dispid -603;
    procedure onkeydown; dispid -602;
    procedure onkeyup; dispid -604;
    procedure onmouseout; dispid -2147418103;
    procedure onmouseover; dispid -2147418104;
    procedure onmousemove; dispid -606;
    procedure onmousedown; dispid -605;
    procedure onmouseup; dispid -607;
    function onselectstart: WordBool; dispid -2147418100;
    procedure onfilterchange; dispid -2147418095;
    function ondragstart: WordBool; dispid -2147418101;
    function onbeforeupdate: WordBool; dispid -2147418108;
    procedure onafterupdate; dispid -2147418107;
    function onerrorupdate: WordBool; dispid -2147418099;
    function onrowexit: WordBool; dispid -2147418106;
    procedure onrowenter; dispid -2147418105;
    procedure ondatasetchanged; dispid -2147418098;
    procedure ondataavailable; dispid -2147418097;
    procedure ondatasetcomplete; dispid -2147418096;
    procedure onfocus; dispid -2147418111;
    procedure onblur; dispid -2147418112;
    procedure onresize; dispid 1016;
    function onchange: WordBool; dispid 1001;
    procedure onselect; dispid 1006;
  end;

  IHTMLInputHiddenElement = interface(IDispatch)
    ['{3050F2A4-98B5-11CF-BB82-00AA00BDCE0B}']
    function Get_type_: WideString; safecall;
    procedure Set_value(const Value: WideString); safecall;
    function Get_value: WideString; safecall;
    procedure Set_name(const Value: WideString); safecall;
    function Get_name: WideString; safecall;
    procedure Set_status(Value: OleVariant); safecall;
    function Get_status: OleVariant; safecall;
    procedure Set_disabled(Value: WordBool); safecall;
    function Get_disabled: WordBool; safecall;
    function Get_form: IHTMLFormElement; safecall;
    function createTextRange: IHTMLTxtRange; safecall;
    property type_: WideString read Get_type_;
    property value: WideString read Get_value write Set_value;
    property name: WideString read Get_name write Set_name;
    property status: OleVariant read Get_status write Set_status;
    property disabled: WordBool read Get_disabled write Set_disabled;
    property form: IHTMLFormElement read Get_form;
  end;

{ DispInterface declaration for Dual Interface IHTMLInputHiddenElement }

  IHTMLInputHiddenElementDisp = dispinterface
    ['{3050F2A4-98B5-11CF-BB82-00AA00BDCE0B}']
    property type_: WideString readonly dispid 2000;
    property value: WideString dispid -2147413011;
    property name: WideString dispid -2147418112;
    property status: OleVariant dispid 2001;
    property disabled: WordBool dispid -2147418036;
    property form: IHTMLFormElement readonly dispid -2147416108;
    function createTextRange: IHTMLTxtRange; dispid 3005;
  end;

  IHTMLInputTextElement = interface(IDispatch)
    ['{3050F2A6-98B5-11CF-BB82-00AA00BDCE0B}']
    function Get_type_: WideString; safecall;
    procedure Set_value(const Value: WideString); safecall;
    function Get_value: WideString; safecall;
    procedure Set_name(const Value: WideString); safecall;
    function Get_name: WideString; safecall;
    procedure Set_status(Value: OleVariant); safecall;
    function Get_status: OleVariant; safecall;
    procedure Set_disabled(Value: WordBool); safecall;
    function Get_disabled: WordBool; safecall;
    function Get_form: IHTMLFormElement; safecall;
    procedure Set_defaultValue(const Value: WideString); safecall;
    function Get_defaultValue: WideString; safecall;
    procedure Set_size(Value: Integer); safecall;
    function Get_size: Integer; safecall;
    procedure Set_maxLength(Value: Integer); safecall;
    function Get_maxLength: Integer; safecall;
    procedure select; safecall;
    procedure Set_onchange(Value: OleVariant); safecall;
    function Get_onchange: OleVariant; safecall;
    procedure Set_onselect(Value: OleVariant); safecall;
    function Get_onselect: OleVariant; safecall;
    procedure Set_readOnly(Value: WordBool); safecall;
    function Get_readOnly: WordBool; safecall;
    function createTextRange: IHTMLTxtRange; safecall;
    property type_: WideString read Get_type_;
    property value: WideString read Get_value write Set_value;
    property name: WideString read Get_name write Set_name;
    property status: OleVariant read Get_status write Set_status;
    property disabled: WordBool read Get_disabled write Set_disabled;
    property form: IHTMLFormElement read Get_form;
    property defaultValue: WideString read Get_defaultValue write Set_defaultValue;
    property size: Integer read Get_size write Set_size;
    property maxLength: Integer read Get_maxLength write Set_maxLength;
    property onchange: OleVariant read Get_onchange write Set_onchange;
    property onselect: OleVariant read Get_onselect write Set_onselect;
    property readOnly: WordBool read Get_readOnly write Set_readOnly;
  end;

{ DispInterface declaration for Dual Interface IHTMLInputTextElement }

  IHTMLInputTextElementDisp = dispinterface
    ['{3050F2A6-98B5-11CF-BB82-00AA00BDCE0B}']
    property type_: WideString readonly dispid 2000;
    property value: WideString dispid -2147413011;
    property name: WideString dispid -2147418112;
    property status: OleVariant dispid 2001;
    property disabled: WordBool dispid -2147418036;
    property form: IHTMLFormElement readonly dispid -2147416108;
    property defaultValue: WideString dispid -2147413029;
    property size: Integer dispid 4001;
    property maxLength: Integer dispid 4002;
    procedure select; dispid 3003;
    property onchange: OleVariant dispid -2147412082;
    property onselect: OleVariant dispid -2147412102;
    property readOnly: WordBool dispid 3001;
    function createTextRange: IHTMLTxtRange; dispid 3005;
  end;

  IHTMLTextAreaElement = interface(IDispatch)
    ['{3050F2AA-98B5-11CF-BB82-00AA00BDCE0B}']
    function Get_type_: WideString; safecall;
    procedure Set_value(const Value: WideString); safecall;
    function Get_value: WideString; safecall;
    procedure Set_name(const Value: WideString); safecall;
    function Get_name: WideString; safecall;
    procedure Set_status(Value: OleVariant); safecall;
    function Get_status: OleVariant; safecall;
    procedure Set_disabled(Value: WordBool); safecall;
    function Get_disabled: WordBool; safecall;
    function Get_form: IHTMLFormElement; safecall;
    procedure Set_defaultValue(const Value: WideString); safecall;
    function Get_defaultValue: WideString; safecall;
    procedure select; safecall;
    procedure Set_onchange(Value: OleVariant); safecall;
    function Get_onchange: OleVariant; safecall;
    procedure Set_onselect(Value: OleVariant); safecall;
    function Get_onselect: OleVariant; safecall;
    procedure Set_readOnly(Value: WordBool); safecall;
    function Get_readOnly: WordBool; safecall;
    procedure Set_rows(Value: Integer); safecall;
    function Get_rows: Integer; safecall;
    procedure Set_cols(Value: Integer); safecall;
    function Get_cols: Integer; safecall;
    procedure Set_wrap(const Value: WideString); safecall;
    function Get_wrap: WideString; safecall;
    function createTextRange: IHTMLTxtRange; safecall;
    property type_: WideString read Get_type_;
    property value: WideString read Get_value write Set_value;
    property name: WideString read Get_name write Set_name;
    property status: OleVariant read Get_status write Set_status;
    property disabled: WordBool read Get_disabled write Set_disabled;
    property form: IHTMLFormElement read Get_form;
    property defaultValue: WideString read Get_defaultValue write Set_defaultValue;
    property onchange: OleVariant read Get_onchange write Set_onchange;
    property onselect: OleVariant read Get_onselect write Set_onselect;
    property readOnly: WordBool read Get_readOnly write Set_readOnly;
    property rows: Integer read Get_rows write Set_rows;
    property cols: Integer read Get_cols write Set_cols;
    property wrap: WideString read Get_wrap write Set_wrap;
  end;

{ DispInterface declaration for Dual Interface IHTMLTextAreaElement }

  IHTMLTextAreaElementDisp = dispinterface
    ['{3050F2AA-98B5-11CF-BB82-00AA00BDCE0B}']
    property type_: WideString readonly dispid 2000;
    property value: WideString dispid -2147413011;
    property name: WideString dispid -2147418112;
    property status: OleVariant dispid 2001;
    property disabled: WordBool dispid -2147418036;
    property form: IHTMLFormElement readonly dispid -2147416108;
    property defaultValue: WideString dispid -2147413029;
    procedure select; dispid 3003;
    property onchange: OleVariant dispid -2147412082;
    property onselect: OleVariant dispid -2147412102;
    property readOnly: WordBool dispid 3001;
    property rows: Integer dispid 5001;
    property cols: Integer dispid 5002;
    property wrap: WideString dispid 5003;
    function createTextRange: IHTMLTxtRange; dispid 3005;
  end;

  DispIHTMLInputTextElement = dispinterface
    ['{3050F520-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    property type_: WideString readonly dispid 2000;
    property value: WideString dispid -2147413011;
    property name: WideString dispid -2147418112;
    property status: OleVariant dispid 2001;
    property disabled: WordBool dispid -2147418036;
    property form: IHTMLFormElement readonly dispid -2147416108;
    property defaultValue: WideString dispid -2147413029;
    property size: Integer dispid 4001;
    property maxLength: Integer dispid 4002;
    procedure select; dispid 3003;
    property onchange: OleVariant dispid -2147412082;
    property onselect: OleVariant dispid -2147412102;
    property readOnly: WordBool dispid 3001;
    function createTextRange: IHTMLTxtRange; dispid 3005;
    property dataFld: WideString dispid -2147417091;
    property dataSrc: WideString dispid -2147417090;
    property dataFormatAs: WideString dispid -2147417089;
  end;

  DispIHTMLTextAreaElement = dispinterface
    ['{3050F521-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    function createControlRange: IDispatch; dispid 1001;
    property scrollHeight: Integer readonly dispid 1002;
    property scrollWidth: Integer readonly dispid 1003;
    property scrollTop: Integer dispid 1004;
    property scrollLeft: Integer dispid 1005;
    property onscroll: OleVariant dispid -2147412081;
    property type_: WideString readonly dispid 2000;
    property value: WideString dispid -2147413011;
    property name: WideString dispid -2147418112;
    property status: OleVariant dispid 2001;
    property disabled: WordBool dispid -2147418036;
    property form: IHTMLFormElement readonly dispid -2147416108;
    property defaultValue: WideString dispid -2147413029;
    procedure select; dispid 3003;
    property onchange: OleVariant dispid -2147412082;
    property onselect: OleVariant dispid -2147412102;
    property readOnly: WordBool dispid 3001;
    property rows: Integer dispid 5001;
    property cols: Integer dispid 5002;
    property wrap: WideString dispid 5003;
    function createTextRange: IHTMLTxtRange; dispid 3005;
    property dataFld: WideString dispid -2147417091;
    property dataSrc: WideString dispid -2147417090;
    property dataFormatAs: WideString dispid -2147417089;
  end;

  HTMLButtonElementEvents = dispinterface
    ['{3050F2B3-98B5-11CF-BB82-00AA00BDCE0B}']
    function onhelp: WordBool; dispid -2147418102;
    function onclick: WordBool; dispid -600;
    function ondblclick: WordBool; dispid -601;
    function onkeypress: WordBool; dispid -603;
    procedure onkeydown; dispid -602;
    procedure onkeyup; dispid -604;
    procedure onmouseout; dispid -2147418103;
    procedure onmouseover; dispid -2147418104;
    procedure onmousemove; dispid -606;
    procedure onmousedown; dispid -605;
    procedure onmouseup; dispid -607;
    function onselectstart: WordBool; dispid -2147418100;
    procedure onfilterchange; dispid -2147418095;
    function ondragstart: WordBool; dispid -2147418101;
    function onbeforeupdate: WordBool; dispid -2147418108;
    procedure onafterupdate; dispid -2147418107;
    function onerrorupdate: WordBool; dispid -2147418099;
    function onrowexit: WordBool; dispid -2147418106;
    procedure onrowenter; dispid -2147418105;
    procedure ondatasetchanged; dispid -2147418098;
    procedure ondataavailable; dispid -2147418097;
    procedure ondatasetcomplete; dispid -2147418096;
    procedure onfocus; dispid -2147418111;
    procedure onblur; dispid -2147418112;
    procedure onresize; dispid 1016;
  end;

  IHTMLInputButtonElement = interface(IDispatch)
    ['{3050F2B2-98B5-11CF-BB82-00AA00BDCE0B}']
    function Get_type_: WideString; safecall;
    procedure Set_value(const Value: WideString); safecall;
    function Get_value: WideString; safecall;
    procedure Set_name(const Value: WideString); safecall;
    function Get_name: WideString; safecall;
    procedure Set_status(Value: OleVariant); safecall;
    function Get_status: OleVariant; safecall;
    procedure Set_disabled(Value: WordBool); safecall;
    function Get_disabled: WordBool; safecall;
    function Get_form: IHTMLFormElement; safecall;
    function createTextRange: IHTMLTxtRange; safecall;
    property type_: WideString read Get_type_;
    property value: WideString read Get_value write Set_value;
    property name: WideString read Get_name write Set_name;
    property status: OleVariant read Get_status write Set_status;
    property disabled: WordBool read Get_disabled write Set_disabled;
    property form: IHTMLFormElement read Get_form;
  end;

{ DispInterface declaration for Dual Interface IHTMLInputButtonElement }

  IHTMLInputButtonElementDisp = dispinterface
    ['{3050F2B2-98B5-11CF-BB82-00AA00BDCE0B}']
    property type_: WideString readonly dispid 2000;
    property value: WideString dispid -2147413011;
    property name: WideString dispid -2147418112;
    property status: OleVariant dispid 2001;
    property disabled: WordBool dispid -2147418036;
    property form: IHTMLFormElement readonly dispid -2147416108;
    function createTextRange: IHTMLTxtRange; dispid 2004;
  end;

  IHTMLButtonElement = interface(IDispatch)
    ['{3050F2BB-98B5-11CF-BB82-00AA00BDCE0B}']
    function Get_type_: WideString; safecall;
    procedure Set_value(const Value: WideString); safecall;
    function Get_value: WideString; safecall;
    procedure Set_name(const Value: WideString); safecall;
    function Get_name: WideString; safecall;
    procedure Set_status(Value: OleVariant); safecall;
    function Get_status: OleVariant; safecall;
    procedure Set_disabled(Value: WordBool); safecall;
    function Get_disabled: WordBool; safecall;
    function Get_form: IHTMLFormElement; safecall;
    function createTextRange: IHTMLTxtRange; safecall;
    property type_: WideString read Get_type_;
    property value: WideString read Get_value write Set_value;
    property name: WideString read Get_name write Set_name;
    property status: OleVariant read Get_status write Set_status;
    property disabled: WordBool read Get_disabled write Set_disabled;
    property form: IHTMLFormElement read Get_form;
  end;

{ DispInterface declaration for Dual Interface IHTMLButtonElement }

  IHTMLButtonElementDisp = dispinterface
    ['{3050F2BB-98B5-11CF-BB82-00AA00BDCE0B}']
    property type_: WideString readonly dispid 2000;
    property value: WideString dispid -2147413011;
    property name: WideString dispid -2147418112;
    property status: OleVariant dispid 2001;
    property disabled: WordBool dispid -2147418036;
    property form: IHTMLFormElement readonly dispid -2147416108;
    function createTextRange: IHTMLTxtRange; dispid 2004;
  end;

  DispIHTMLInputButtonElement = dispinterface
    ['{3050F51E-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    property type_: WideString readonly dispid 2000;
    property value: WideString dispid -2147413011;
    property name: WideString dispid -2147418112;
    property status: OleVariant dispid 2001;
    property disabled: WordBool dispid -2147418036;
    property form: IHTMLFormElement readonly dispid -2147416108;
    function createTextRange: IHTMLTxtRange; dispid 2004;
  end;

  DispIHTMLButtonElement = dispinterface
    ['{3050F51F-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    function createControlRange: IDispatch; dispid 1001;
    property scrollHeight: Integer readonly dispid 1002;
    property scrollWidth: Integer readonly dispid 1003;
    property scrollTop: Integer dispid 1004;
    property scrollLeft: Integer dispid 1005;
    property onscroll: OleVariant dispid -2147412081;
    property type_: WideString readonly dispid 2000;
    property value: WideString dispid -2147413011;
    property name: WideString dispid -2147418112;
    property status: OleVariant dispid 2001;
    property disabled: WordBool dispid -2147418036;
    property form: IHTMLFormElement readonly dispid -2147416108;
    function createTextRange: IHTMLTxtRange; dispid 2004;
    property dataFld: WideString dispid -2147417091;
    property dataSrc: WideString dispid -2147417090;
    property dataFormatAs: WideString dispid -2147417089;
  end;

  HTMLInputFileElementEvents = dispinterface
    ['{3050F2AF-98B5-11CF-BB82-00AA00BDCE0B}']
    function onhelp: WordBool; dispid -2147418102;
    function onclick: WordBool; dispid -600;
    function ondblclick: WordBool; dispid -601;
    function onkeypress: WordBool; dispid -603;
    procedure onkeydown; dispid -602;
    procedure onkeyup; dispid -604;
    procedure onmouseout; dispid -2147418103;
    procedure onmouseover; dispid -2147418104;
    procedure onmousemove; dispid -606;
    procedure onmousedown; dispid -605;
    procedure onmouseup; dispid -607;
    function onselectstart: WordBool; dispid -2147418100;
    procedure onfilterchange; dispid -2147418095;
    function ondragstart: WordBool; dispid -2147418101;
    function onbeforeupdate: WordBool; dispid -2147418108;
    procedure onafterupdate; dispid -2147418107;
    function onerrorupdate: WordBool; dispid -2147418099;
    function onrowexit: WordBool; dispid -2147418106;
    procedure onrowenter; dispid -2147418105;
    procedure ondatasetchanged; dispid -2147418098;
    procedure ondataavailable; dispid -2147418097;
    procedure ondatasetcomplete; dispid -2147418096;
    procedure onfocus; dispid -2147418111;
    procedure onblur; dispid -2147418112;
    procedure onresize; dispid 1016;
    function onchange: WordBool; dispid 1001;
    procedure onselect; dispid 1006;
  end;

  IHTMLInputFileElement = interface(IDispatch)
    ['{3050F2AD-98B5-11CF-BB82-00AA00BDCE0B}']
    function Get_type_: WideString; safecall;
    procedure Set_name(const Value: WideString); safecall;
    function Get_name: WideString; safecall;
    procedure Set_status(Value: OleVariant); safecall;
    function Get_status: OleVariant; safecall;
    procedure Set_disabled(Value: WordBool); safecall;
    function Get_disabled: WordBool; safecall;
    function Get_form: IHTMLFormElement; safecall;
    procedure Set_size(Value: Integer); safecall;
    function Get_size: Integer; safecall;
    procedure Set_maxLength(Value: Integer); safecall;
    function Get_maxLength: Integer; safecall;
    procedure select; safecall;
    procedure Set_onchange(Value: OleVariant); safecall;
    function Get_onchange: OleVariant; safecall;
    procedure Set_onselect(Value: OleVariant); safecall;
    function Get_onselect: OleVariant; safecall;
    procedure Set_value(const Value: WideString); safecall;
    function Get_value: WideString; safecall;
    property type_: WideString read Get_type_;
    property name: WideString read Get_name write Set_name;
    property status: OleVariant read Get_status write Set_status;
    property disabled: WordBool read Get_disabled write Set_disabled;
    property form: IHTMLFormElement read Get_form;
    property size: Integer read Get_size write Set_size;
    property maxLength: Integer read Get_maxLength write Set_maxLength;
    property onchange: OleVariant read Get_onchange write Set_onchange;
    property onselect: OleVariant read Get_onselect write Set_onselect;
    property value: WideString read Get_value write Set_value;
  end;

{ DispInterface declaration for Dual Interface IHTMLInputFileElement }

  IHTMLInputFileElementDisp = dispinterface
    ['{3050F2AD-98B5-11CF-BB82-00AA00BDCE0B}']
    property type_: WideString readonly dispid 2000;
    property name: WideString dispid -2147418112;
    property status: OleVariant dispid 2001;
    property disabled: WordBool dispid -2147418036;
    property form: IHTMLFormElement readonly dispid -2147416108;
    property size: Integer dispid 4001;
    property maxLength: Integer dispid 4002;
    procedure select; dispid 3003;
    property onchange: OleVariant dispid -2147412082;
    property onselect: OleVariant dispid -2147412102;
    property value: WideString dispid -2147413011;
  end;

  DispIHTMLInputFileElement = dispinterface
    ['{3050F542-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    property type_: WideString readonly dispid 2000;
    property name: WideString dispid -2147418112;
    property status: OleVariant dispid 2001;
    property disabled: WordBool dispid -2147418036;
    property form: IHTMLFormElement readonly dispid -2147416108;
    property size: Integer dispid 4001;
    property maxLength: Integer dispid 4002;
    procedure select; dispid 3003;
    property onchange: OleVariant dispid -2147412082;
    property onselect: OleVariant dispid -2147412102;
    property value: WideString dispid -2147413011;
  end;

  HTMLMarqueeElementEvents = dispinterface
    ['{3050F2B8-98B5-11CF-BB82-00AA00BDCE0B}']
    function onhelp: WordBool; dispid -2147418102;
    function onclick: WordBool; dispid -600;
    function ondblclick: WordBool; dispid -601;
    function onkeypress: WordBool; dispid -603;
    procedure onkeydown; dispid -602;
    procedure onkeyup; dispid -604;
    procedure onmouseout; dispid -2147418103;
    procedure onmouseover; dispid -2147418104;
    procedure onmousemove; dispid -606;
    procedure onmousedown; dispid -605;
    procedure onmouseup; dispid -607;
    function onselectstart: WordBool; dispid -2147418100;
    procedure onfilterchange; dispid -2147418095;
    function ondragstart: WordBool; dispid -2147418101;
    function onbeforeupdate: WordBool; dispid -2147418108;
    procedure onafterupdate; dispid -2147418107;
    function onerrorupdate: WordBool; dispid -2147418099;
    function onrowexit: WordBool; dispid -2147418106;
    procedure onrowenter; dispid -2147418105;
    procedure ondatasetchanged; dispid -2147418098;
    procedure ondataavailable; dispid -2147418097;
    procedure ondatasetcomplete; dispid -2147418096;
    procedure onfocus; dispid -2147418111;
    procedure onblur; dispid -2147418112;
    procedure onresize; dispid 1016;
    procedure onchange; dispid 1001;
    procedure onscroll; dispid 1014;
    procedure onselect; dispid 1006;
    procedure onbounce; dispid 1009;
    procedure onfinish; dispid 1010;
    procedure onstart; dispid 1011;
  end;

  IHTMLMarqueeElement = interface(IDispatch)
    ['{3050F2B5-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_bgColor(Value: OleVariant); safecall;
    function Get_bgColor: OleVariant; safecall;
    procedure Set_scrollDelay(Value: Integer); safecall;
    function Get_scrollDelay: Integer; safecall;
    procedure Set_direction(const Value: WideString); safecall;
    function Get_direction: WideString; safecall;
    procedure Set_behavior(const Value: WideString); safecall;
    function Get_behavior: WideString; safecall;
    procedure Set_scrollAmount(Value: Integer); safecall;
    function Get_scrollAmount: Integer; safecall;
    procedure Set_loop(Value: Integer); safecall;
    function Get_loop: Integer; safecall;
    procedure Set_vspace(Value: Integer); safecall;
    function Get_vspace: Integer; safecall;
    procedure Set_hspace(Value: Integer); safecall;
    function Get_hspace: Integer; safecall;
    procedure Set_onfinish(Value: OleVariant); safecall;
    function Get_onfinish: OleVariant; safecall;
    procedure Set_onstart(Value: OleVariant); safecall;
    function Get_onstart: OleVariant; safecall;
    procedure Set_onbounce(Value: OleVariant); safecall;
    function Get_onbounce: OleVariant; safecall;
    procedure Set_width(Value: OleVariant); safecall;
    function Get_width: OleVariant; safecall;
    procedure Set_height(Value: OleVariant); safecall;
    function Get_height: OleVariant; safecall;
    procedure Set_trueSpeed(Value: WordBool); safecall;
    function Get_trueSpeed: WordBool; safecall;
    procedure Start; safecall;
    procedure stop; safecall;
    property bgColor: OleVariant read Get_bgColor write Set_bgColor;
    property scrollDelay: Integer read Get_scrollDelay write Set_scrollDelay;
    property direction: WideString read Get_direction write Set_direction;
    property behavior: WideString read Get_behavior write Set_behavior;
    property scrollAmount: Integer read Get_scrollAmount write Set_scrollAmount;
    property loop: Integer read Get_loop write Set_loop;
    property vspace: Integer read Get_vspace write Set_vspace;
    property hspace: Integer read Get_hspace write Set_hspace;
    property onfinish: OleVariant read Get_onfinish write Set_onfinish;
    property onstart: OleVariant read Get_onstart write Set_onstart;
    property onbounce: OleVariant read Get_onbounce write Set_onbounce;
    property width: OleVariant read Get_width write Set_width;
    property height: OleVariant read Get_height write Set_height;
    property trueSpeed: WordBool read Get_trueSpeed write Set_trueSpeed;
  end;

{ DispInterface declaration for Dual Interface IHTMLMarqueeElement }

  IHTMLMarqueeElementDisp = dispinterface
    ['{3050F2B5-98B5-11CF-BB82-00AA00BDCE0B}']
    property bgColor: OleVariant dispid -501;
    property scrollDelay: Integer dispid 6000;
    property direction: WideString dispid 6001;
    property behavior: WideString dispid 6002;
    property scrollAmount: Integer dispid 6003;
    property loop: Integer dispid 6004;
    property vspace: Integer dispid 6005;
    property hspace: Integer dispid 6006;
    property onfinish: OleVariant dispid -2147412086;
    property onstart: OleVariant dispid -2147412085;
    property onbounce: OleVariant dispid -2147412092;
    property width: OleVariant dispid -2147418107;
    property height: OleVariant dispid -2147418106;
    property trueSpeed: WordBool dispid 6007;
    procedure Start; dispid 6010;
    procedure stop; dispid 6011;
  end;

  DispIHTMLMarqueeElement = dispinterface
    ['{3050F527-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    function createControlRange: IDispatch; dispid 1001;
    property scrollHeight: Integer readonly dispid 1002;
    property scrollWidth: Integer readonly dispid 1003;
    property scrollTop: Integer dispid 1004;
    property scrollLeft: Integer dispid 1005;
    property onscroll: OleVariant dispid -2147412081;
    property bgColor: OleVariant dispid -501;
    property scrollDelay: Integer dispid 6000;
    property direction: WideString dispid 6001;
    property behavior: WideString dispid 6002;
    property scrollAmount: Integer dispid 6003;
    property loop: Integer dispid 6004;
    property vspace: Integer dispid 6005;
    property hspace: Integer dispid 6006;
    property onfinish: OleVariant dispid -2147412086;
    property onstart: OleVariant dispid -2147412085;
    property onbounce: OleVariant dispid -2147412092;
    property width: OleVariant dispid -2147418107;
    property height: OleVariant dispid -2147418106;
    property trueSpeed: WordBool dispid 6007;
    procedure Start; dispid 6010;
    procedure stop; dispid 6011;
    property dataFld: WideString dispid -2147417091;
    property dataSrc: WideString dispid -2147417090;
    property dataFormatAs: WideString dispid -2147417089;
  end;

  HTMLOptionButtonElementEvents = dispinterface
    ['{3050F2BD-98B5-11CF-BB82-00AA00BDCE0B}']
    function onhelp: WordBool; dispid -2147418102;
    function onclick: WordBool; dispid -600;
    function ondblclick: WordBool; dispid -601;
    function onkeypress: WordBool; dispid -603;
    procedure onkeydown; dispid -602;
    procedure onkeyup; dispid -604;
    procedure onmouseout; dispid -2147418103;
    procedure onmouseover; dispid -2147418104;
    procedure onmousemove; dispid -606;
    procedure onmousedown; dispid -605;
    procedure onmouseup; dispid -607;
    function onselectstart: WordBool; dispid -2147418100;
    procedure onfilterchange; dispid -2147418095;
    function ondragstart: WordBool; dispid -2147418101;
    function onbeforeupdate: WordBool; dispid -2147418108;
    procedure onafterupdate; dispid -2147418107;
    function onerrorupdate: WordBool; dispid -2147418099;
    function onrowexit: WordBool; dispid -2147418106;
    procedure onrowenter; dispid -2147418105;
    procedure ondatasetchanged; dispid -2147418098;
    procedure ondataavailable; dispid -2147418097;
    procedure ondatasetcomplete; dispid -2147418096;
    procedure onfocus; dispid -2147418111;
    procedure onblur; dispid -2147418112;
    procedure onresize; dispid 1016;
    function onchange: WordBool; dispid 1001;
  end;

  IHTMLOptionButtonElement = interface(IDispatch)
    ['{3050F2BC-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_value(const Value: WideString); safecall;
    function Get_value: WideString; safecall;
    function Get_type_: WideString; safecall;
    procedure Set_name(const Value: WideString); safecall;
    function Get_name: WideString; safecall;
    procedure Set_checked(Value: WordBool); safecall;
    function Get_checked: WordBool; safecall;
    procedure Set_defaultChecked(Value: WordBool); safecall;
    function Get_defaultChecked: WordBool; safecall;
    procedure Set_onchange(Value: OleVariant); safecall;
    function Get_onchange: OleVariant; safecall;
    procedure Set_disabled(Value: WordBool); safecall;
    function Get_disabled: WordBool; safecall;
    procedure Set_status(Value: WordBool); safecall;
    function Get_status: WordBool; safecall;
    procedure Set_indeterminate(Value: WordBool); safecall;
    function Get_indeterminate: WordBool; safecall;
    function Get_form: IHTMLFormElement; safecall;
    property value: WideString read Get_value write Set_value;
    property type_: WideString read Get_type_;
    property name: WideString read Get_name write Set_name;
    property checked: WordBool read Get_checked write Set_checked;
    property defaultChecked: WordBool read Get_defaultChecked write Set_defaultChecked;
    property onchange: OleVariant read Get_onchange write Set_onchange;
    property disabled: WordBool read Get_disabled write Set_disabled;
    property status: WordBool read Get_status write Set_status;
    property indeterminate: WordBool read Get_indeterminate write Set_indeterminate;
    property form: IHTMLFormElement read Get_form;
  end;

{ DispInterface declaration for Dual Interface IHTMLOptionButtonElement }

  IHTMLOptionButtonElementDisp = dispinterface
    ['{3050F2BC-98B5-11CF-BB82-00AA00BDCE0B}']
    property value: WideString dispid -2147413011;
    property type_: WideString readonly dispid 1000;
    property name: WideString dispid -2147418112;
    property checked: WordBool dispid 1001;
    property defaultChecked: WordBool dispid 1002;
    property onchange: OleVariant dispid -2147412082;
    property disabled: WordBool dispid -2147418036;
    property status: WordBool dispid 1003;
    property indeterminate: WordBool dispid 1004;
    property form: IHTMLFormElement readonly dispid -2147416108;
  end;

  DispIHTMLOptionButtonElement = dispinterface
    ['{3050F509-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    property value: WideString dispid -2147413011;
    property type_: WideString readonly dispid 1000;
    property name: WideString dispid -2147418112;
    property checked: WordBool dispid 1001;
    property defaultChecked: WordBool dispid 1002;
    property onchange: OleVariant dispid -2147412082;
    property disabled: WordBool dispid -2147418036;
    property status: WordBool dispid 1003;
    property indeterminate: WordBool dispid 1004;
    property form: IHTMLFormElement readonly dispid -2147416108;
    property dataFld: WideString dispid -2147417091;
    property dataSrc: WideString dispid -2147417090;
    property dataFormatAs: WideString dispid -2147417089;
  end;

  IHTMLTitleElement = interface(IDispatch)
    ['{3050F322-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_text(const Value: WideString); safecall;
    function Get_text: WideString; safecall;
    property text: WideString read Get_text write Set_text;
  end;

{ DispInterface declaration for Dual Interface IHTMLTitleElement }

  IHTMLTitleElementDisp = dispinterface
    ['{3050F322-98B5-11CF-BB82-00AA00BDCE0B}']
    property text: WideString dispid -2147413011;
  end;

  IHTMLMetaElement = interface(IDispatch)
    ['{3050F203-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_httpEquiv(const Value: WideString); safecall;
    function Get_httpEquiv: WideString; safecall;
    procedure Set_content(const Value: WideString); safecall;
    function Get_content: WideString; safecall;
    procedure Set_name(const Value: WideString); safecall;
    function Get_name: WideString; safecall;
    procedure Set_url(const Value: WideString); safecall;
    function Get_url: WideString; safecall;
    procedure Set_charset(const Value: WideString); safecall;
    function Get_charset: WideString; safecall;
    property httpEquiv: WideString read Get_httpEquiv write Set_httpEquiv;
    property content: WideString read Get_content write Set_content;
    property name: WideString read Get_name write Set_name;
    property url: WideString read Get_url write Set_url;
    property charset: WideString read Get_charset write Set_charset;
  end;

{ DispInterface declaration for Dual Interface IHTMLMetaElement }

  IHTMLMetaElementDisp = dispinterface
    ['{3050F203-98B5-11CF-BB82-00AA00BDCE0B}']
    property httpEquiv: WideString dispid 1001;
    property content: WideString dispid 1002;
    property name: WideString dispid -2147418112;
    property url: WideString dispid 1003;
    property charset: WideString dispid 1013;
  end;

  IHTMLBaseElement = interface(IDispatch)
    ['{3050F204-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_href(const Value: WideString); safecall;
    function Get_href: WideString; safecall;
    procedure Set_target(const Value: WideString); safecall;
    function Get_target: WideString; safecall;
    property href: WideString read Get_href write Set_href;
    property target: WideString read Get_target write Set_target;
  end;

{ DispInterface declaration for Dual Interface IHTMLBaseElement }

  IHTMLBaseElementDisp = dispinterface
    ['{3050F204-98B5-11CF-BB82-00AA00BDCE0B}']
    property href: WideString dispid 1003;
    property target: WideString dispid 1004;
  end;

  IHTMLIsIndexElement = interface(IDispatch)
    ['{3050F206-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_prompt(const Value: WideString); safecall;
    function Get_prompt: WideString; safecall;
    procedure Set_action(const Value: WideString); safecall;
    function Get_action: WideString; safecall;
    property prompt: WideString read Get_prompt write Set_prompt;
    property action: WideString read Get_action write Set_action;
  end;

{ DispInterface declaration for Dual Interface IHTMLIsIndexElement }

  IHTMLIsIndexElementDisp = dispinterface
    ['{3050F206-98B5-11CF-BB82-00AA00BDCE0B}']
    property prompt: WideString dispid 1010;
    property action: WideString dispid 1011;
  end;

  IHTMLNextIdElement = interface(IDispatch)
    ['{3050F207-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_n(const Value: WideString); safecall;
    function Get_n: WideString; safecall;
    property n: WideString read Get_n write Set_n;
  end;

{ DispInterface declaration for Dual Interface IHTMLNextIdElement }

  IHTMLNextIdElementDisp = dispinterface
    ['{3050F207-98B5-11CF-BB82-00AA00BDCE0B}']
    property n: WideString dispid 1012;
  end;

  DispIHTMLTitleElement = dispinterface
    ['{3050F516-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property text: WideString dispid -2147413011;
  end;

  DispIHTMLMetaElement = dispinterface
    ['{3050F517-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property httpEquiv: WideString dispid 1001;
    property content: WideString dispid 1002;
    property name: WideString dispid -2147418112;
    property url: WideString dispid 1003;
    property charset: WideString dispid 1013;
  end;

  DispIHTMLBaseElement = dispinterface
    ['{3050F518-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property href: WideString dispid 1003;
    property target: WideString dispid 1004;
  end;

  DispIHTMLIsIndexElement = dispinterface
    ['{3050F519-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property prompt: WideString dispid 1010;
    property action: WideString dispid 1011;
  end;

  DispIHTMLNextIdElement = dispinterface
    ['{3050F51A-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property n: WideString dispid 1012;
  end;

  IHTMLBaseFontElement = interface(IDispatch)
    ['{3050F202-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_color(Value: OleVariant); safecall;
    function Get_color: OleVariant; safecall;
    procedure Set_face(const Value: WideString); safecall;
    function Get_face: WideString; safecall;
    procedure Set_size(Value: Integer); safecall;
    function Get_size: Integer; safecall;
    property color: OleVariant read Get_color write Set_color;
    property face: WideString read Get_face write Set_face;
    property size: Integer read Get_size write Set_size;
  end;

{ DispInterface declaration for Dual Interface IHTMLBaseFontElement }

  IHTMLBaseFontElementDisp = dispinterface
    ['{3050F202-98B5-11CF-BB82-00AA00BDCE0B}']
    property color: OleVariant dispid -2147413110;
    property face: WideString dispid -2147413094;
    property size: Integer dispid -2147413086;
  end;

  DispIHTMLBaseFontElement = dispinterface
    ['{3050F504-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property color: OleVariant dispid -2147413110;
    property face: WideString dispid -2147413094;
    property size: Integer dispid -2147413086;
  end;

  IHTMLUnknownElement = interface(IDispatch)
    ['{3050F209-98B5-11CF-BB82-00AA00BDCE0B}']
  end;

{ DispInterface declaration for Dual Interface IHTMLUnknownElement }

  IHTMLUnknownElementDisp = dispinterface
    ['{3050F209-98B5-11CF-BB82-00AA00BDCE0B}']
  end;

  DispIHTMLUnknownElement = dispinterface
    ['{3050F539-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
  end;

  IOmHistory = interface(IDispatch)
    ['{FECEAAA2-8405-11CF-8BA1-00AA00476DA6}']
    function Get_length: Smallint; safecall;
    procedure back(var pvargdistance: OleVariant); safecall;
    procedure forward(var pvargdistance: OleVariant); safecall;
    procedure go(var pvargdistance: OleVariant); safecall;
    property length: Smallint read Get_length;
  end;

{ DispInterface declaration for Dual Interface IOmHistory }

  IOmHistoryDisp = dispinterface
    ['{FECEAAA2-8405-11CF-8BA1-00AA00476DA6}']
    property length: Smallint readonly dispid 1;
    procedure back(var pvargdistance: OleVariant); dispid 2;
    procedure forward(var pvargdistance: OleVariant); dispid 3;
    procedure go(var pvargdistance: OleVariant); dispid 4;
  end;

  IHTMLMimeTypesCollection = interface(IDispatch)
    ['{3050F3FC-98B5-11CF-BB82-00AA00BDCE0B}']
    function Get_length: Integer; safecall;
    property length: Integer read Get_length;
  end;

{ DispInterface declaration for Dual Interface IHTMLMimeTypesCollection }

  IHTMLMimeTypesCollectionDisp = dispinterface
    ['{3050F3FC-98B5-11CF-BB82-00AA00BDCE0B}']
    property length: Integer readonly dispid 1;
  end;

  IHTMLPluginsCollection = interface(IDispatch)
    ['{3050F3FD-98B5-11CF-BB82-00AA00BDCE0B}']
    function Get_length: Integer; safecall;
    procedure refresh(reload: WordBool); safecall;
    property length: Integer read Get_length;
  end;

{ DispInterface declaration for Dual Interface IHTMLPluginsCollection }

  IHTMLPluginsCollectionDisp = dispinterface
    ['{3050F3FD-98B5-11CF-BB82-00AA00BDCE0B}']
    property length: Integer readonly dispid 1;
    procedure refresh(reload: WordBool); dispid 2;
  end;

  IHTMLOpsProfile = interface(IDispatch)
    ['{3050F401-98B5-11CF-BB82-00AA00BDCE0B}']
    function addRequest(const name: WideString; reserved: OleVariant): WordBool; safecall;
    procedure clearRequest; safecall;
    procedure doRequest(usage, fname, domain, path, expire, reserved: OleVariant); safecall;
    function getAttribute(const name: WideString): WideString; safecall;
    function setAttribute(const name, value: WideString; prefs: OleVariant): WordBool; safecall;
    function commitChanges: WordBool; safecall;
    function addReadRequest(const name: WideString; reserved: OleVariant): WordBool; safecall;
    procedure doReadRequest(usage, fname, domain, path, expire, reserved: OleVariant); safecall;
    function doWriteRequest: WordBool; safecall;
  end;

{ DispInterface declaration for Dual Interface IHTMLOpsProfile }

  IHTMLOpsProfileDisp = dispinterface
    ['{3050F401-98B5-11CF-BB82-00AA00BDCE0B}']
    function addRequest(const name: WideString; reserved: OleVariant): WordBool; dispid 1;
    procedure clearRequest; dispid 2;
    procedure doRequest(usage, fname, domain, path, expire, reserved: OleVariant); dispid 3;
    function getAttribute(const name: WideString): WideString; dispid 4;
    function setAttribute(const name, value: WideString; prefs: OleVariant): WordBool; dispid 5;
    function commitChanges: WordBool; dispid 6;
    function addReadRequest(const name: WideString; reserved: OleVariant): WordBool; dispid 7;
    procedure doReadRequest(usage, fname, domain, path, expire, reserved: OleVariant); dispid 8;
    function doWriteRequest: WordBool; dispid 9;
  end;

  IOmNavigator = interface(IDispatch)
    ['{FECEAAA5-8405-11CF-8BA1-00AA00476DA6}']
    function Get_appCodeName: WideString; safecall;
    function Get_appName: WideString; safecall;
    function Get_appVersion: WideString; safecall;
    function Get_userAgent: WideString; safecall;
    function javaEnabled: WordBool; safecall;
    function taintEnabled: WordBool; safecall;
    function Get_mimeTypes: IHTMLMimeTypesCollection; safecall;
    function Get_plugins: IHTMLPluginsCollection; safecall;
    function Get_cookieEnabled: WordBool; safecall;
    function Get_opsProfile: IHTMLOpsProfile; safecall;
    function toString: WideString; safecall;
    function Get_cpuClass: WideString; safecall;
    function Get_systemLanguage: WideString; safecall;
    function Get_browserLanguage: WideString; safecall;
    function Get_userLanguage: WideString; safecall;
    function Get_platform: WideString; safecall;
    function Get_appMinorVersion: WideString; safecall;
    function Get_connectionSpeed: Integer; safecall;
    function Get_onLine: WordBool; safecall;
    function Get_userProfile: IHTMLOpsProfile; safecall;
    property appCodeName: WideString read Get_appCodeName;
    property appName: WideString read Get_appName;
    property appVersion: WideString read Get_appVersion;
    property userAgent: WideString read Get_userAgent;
    property mimeTypes: IHTMLMimeTypesCollection read Get_mimeTypes;
    property plugins: IHTMLPluginsCollection read Get_plugins;
    property cookieEnabled: WordBool read Get_cookieEnabled;
    property opsProfile: IHTMLOpsProfile read Get_opsProfile;
    property cpuClass: WideString read Get_cpuClass;
    property systemLanguage: WideString read Get_systemLanguage;
    property browserLanguage: WideString read Get_browserLanguage;
    property userLanguage: WideString read Get_userLanguage;
    property platform: WideString read Get_platform;
    property appMinorVersion: WideString read Get_appMinorVersion;
    property connectionSpeed: Integer read Get_connectionSpeed;
    property onLine: WordBool read Get_onLine;
    property userProfile: IHTMLOpsProfile read Get_userProfile;
  end;

{ DispInterface declaration for Dual Interface IOmNavigator }

  IOmNavigatorDisp = dispinterface
    ['{FECEAAA5-8405-11CF-8BA1-00AA00476DA6}']
    property appCodeName: WideString readonly dispid 1;
    property appName: WideString readonly dispid 2;
    property appVersion: WideString readonly dispid 3;
    property userAgent: WideString readonly dispid 4;
    function javaEnabled: WordBool; dispid 5;
    function taintEnabled: WordBool; dispid 6;
    property mimeTypes: IHTMLMimeTypesCollection readonly dispid 7;
    property plugins: IHTMLPluginsCollection readonly dispid 8;
    property cookieEnabled: WordBool readonly dispid 9;
    property opsProfile: IHTMLOpsProfile readonly dispid 10;
    function toString: WideString; dispid 11;
    property cpuClass: WideString readonly dispid 12;
    property systemLanguage: WideString readonly dispid 13;
    property browserLanguage: WideString readonly dispid 14;
    property userLanguage: WideString readonly dispid 15;
    property platform: WideString readonly dispid 16;
    property appMinorVersion: WideString readonly dispid 17;
    property connectionSpeed: Integer readonly dispid 18;
    property onLine: WordBool readonly dispid 19;
    property userProfile: IHTMLOpsProfile readonly dispid 20;
  end;

  IHTMLLocation = interface(IDispatch)
    ['{163BB1E0-6E00-11CF-837A-48DC04C10000}']
    procedure Set_href(const Value: WideString); safecall;
    function Get_href: WideString; safecall;
    procedure Set_protocol(const Value: WideString); safecall;
    function Get_protocol: WideString; safecall;
    procedure Set_host(const Value: WideString); safecall;
    function Get_host: WideString; safecall;
    procedure Set_hostname(const Value: WideString); safecall;
    function Get_hostname: WideString; safecall;
    procedure Set_port(const Value: WideString); safecall;
    function Get_port: WideString; safecall;
    procedure Set_pathname(const Value: WideString); safecall;
    function Get_pathname: WideString; safecall;
    procedure Set_search(const Value: WideString); safecall;
    function Get_search: WideString; safecall;
    procedure Set_hash(const Value: WideString); safecall;
    function Get_hash: WideString; safecall;
    procedure reload(flag: WordBool); safecall;
    procedure replace(const bstr: WideString); safecall;
    procedure assign(const bstr: WideString); safecall;
    function toString: WideString; safecall;
    property href: WideString read Get_href write Set_href;
    property protocol: WideString read Get_protocol write Set_protocol;
    property host: WideString read Get_host write Set_host;
    property hostname: WideString read Get_hostname write Set_hostname;
    property port: WideString read Get_port write Set_port;
    property pathname: WideString read Get_pathname write Set_pathname;
    property search: WideString read Get_search write Set_search;
    property hash: WideString read Get_hash write Set_hash;
  end;

{ DispInterface declaration for Dual Interface IHTMLLocation }

  IHTMLLocationDisp = dispinterface
    ['{163BB1E0-6E00-11CF-837A-48DC04C10000}']
    property href: WideString dispid 0;
    property protocol: WideString dispid 1;
    property host: WideString dispid 2;
    property hostname: WideString dispid 3;
    property port: WideString dispid 4;
    property pathname: WideString dispid 5;
    property search: WideString dispid 6;
    property hash: WideString dispid 7;
    procedure reload(flag: WordBool); dispid 8;
    procedure replace(const bstr: WideString); dispid 9;
    procedure assign(const bstr: WideString); dispid 10;
    function toString: WideString; dispid 11;
  end;

  HTMLWindowEvents = dispinterface
    ['{96A0A4E0-D062-11CF-94B6-00AA0060275C}']
    procedure onload; dispid 1003;
    procedure onunload; dispid 1008;
    function onhelp: WordBool; dispid -2147418102;
    procedure onfocus; dispid -2147418111;
    procedure onblur; dispid -2147418112;
    procedure onerror; dispid 1002;
    procedure onresize; dispid 1016;
    procedure onscroll; dispid 1014;
    procedure onbeforeunload; dispid 1017;
  end;

  IHTMLDocument = interface(IDispatch)
    ['{626FC520-A41E-11CF-A731-00A0C9082637}']
    function Get_Script: IDispatch; safecall;
    property Script: IDispatch read Get_Script;
  end;

{ DispInterface declaration for Dual Interface IHTMLDocument }

  IHTMLDocumentDisp = dispinterface
    ['{626FC520-A41E-11CF-A731-00A0C9082637}']
    property Script: IDispatch readonly dispid 1001;
  end;

  IHTMLDocument2 = interface(IHTMLDocument)
    ['{332C4425-26CB-11D0-B483-00C04FD90119}']
    function Get_all: IHTMLElementCollection; safecall;
    function Get_body: IHTMLElement; safecall;
    function Get_activeElement: IHTMLElement; safecall;
    function Get_images: IHTMLElementCollection; safecall;
    function Get_applets: IHTMLElementCollection; safecall;
    function Get_links: IHTMLElementCollection; safecall;
    function Get_forms: IHTMLElementCollection; safecall;
    function Get_anchors: IHTMLElementCollection; safecall;
    procedure Set_title(const Value: WideString); safecall;
    function Get_title: WideString; safecall;
    function Get_scripts: IHTMLElementCollection; safecall;
    procedure Set_designMode(const Value: WideString); safecall;
    function Get_designMode: WideString; safecall;
    function Get_selection: IHTMLSelectionObject; safecall;
    function Get_readyState: WideString; safecall;
    function Get_frames: IHTMLFramesCollection2; safecall;
    function Get_embeds: IHTMLElementCollection; safecall;
    function Get_plugins: IHTMLElementCollection; safecall;
    procedure Set_alinkColor(Value: OleVariant); safecall;
    function Get_alinkColor: OleVariant; safecall;
    procedure Set_bgColor(Value: OleVariant); safecall;
    function Get_bgColor: OleVariant; safecall;
    procedure Set_fgColor(Value: OleVariant); safecall;
    function Get_fgColor: OleVariant; safecall;
    procedure Set_linkColor(Value: OleVariant); safecall;
    function Get_linkColor: OleVariant; safecall;
    procedure Set_vlinkColor(Value: OleVariant); safecall;
    function Get_vlinkColor: OleVariant; safecall;
    function Get_referrer: WideString; safecall;
    function Get_location: IHTMLLocation; safecall;
    function Get_lastModified: WideString; safecall;
    procedure Set_url(const Value: WideString); safecall;
    function Get_url: WideString; safecall;
    procedure Set_domain(const Value: WideString); safecall;
    function Get_domain: WideString; safecall;
    procedure Set_cookie(const Value: WideString); safecall;
    function Get_cookie: WideString; safecall;
    procedure Set_expando(Value: WordBool); safecall;
    function Get_expando: WordBool; safecall;
    procedure Set_charset(const Value: WideString); safecall;
    function Get_charset: WideString; safecall;
    procedure Set_defaultCharset(const Value: WideString); safecall;
    function Get_defaultCharset: WideString; safecall;
    function Get_mimeType: WideString; safecall;
    function Get_fileSize: WideString; safecall;
    function Get_fileCreatedDate: WideString; safecall;
    function Get_fileModifiedDate: WideString; safecall;
    function Get_fileUpdatedDate: WideString; safecall;
    function Get_security: WideString; safecall;
    function Get_protocol: WideString; safecall;
    function Get_nameProp: WideString; safecall;
    procedure write(psarray: PSafeArray); safecall;
    procedure writeln(psarray: PSafeArray); safecall;
    function open(const url: WideString; name, features, replace: OleVariant): IDispatch; safecall;
    procedure close; safecall;
    procedure clear; safecall;
    function queryCommandSupported(const cmdID: WideString): WordBool; safecall;
    function queryCommandEnabled(const cmdID: WideString): WordBool; safecall;
    function queryCommandState(const cmdID: WideString): WordBool; safecall;
    function queryCommandIndeterm(const cmdID: WideString): WordBool; safecall;
    function queryCommandText(const cmdID: WideString): WideString; safecall;
    function queryCommandValue(const cmdID: WideString): OleVariant; safecall;
    function execCommand(const cmdID: WideString; showUI: WordBool; value: OleVariant): WordBool; safecall;
    function execCommandShowHelp(const cmdID: WideString): WordBool; safecall;
    function createElement(const eTag: WideString): IHTMLElement; safecall;
    procedure Set_onhelp(Value: OleVariant); safecall;
    function Get_onhelp: OleVariant; safecall;
    procedure Set_onclick(Value: OleVariant); safecall;
    function Get_onclick: OleVariant; safecall;
    procedure Set_ondblclick(Value: OleVariant); safecall;
    function Get_ondblclick: OleVariant; safecall;
    procedure Set_onkeyup(Value: OleVariant); safecall;
    function Get_onkeyup: OleVariant; safecall;
    procedure Set_onkeydown(Value: OleVariant); safecall;
    function Get_onkeydown: OleVariant; safecall;
    procedure Set_onkeypress(Value: OleVariant); safecall;
    function Get_onkeypress: OleVariant; safecall;
    procedure Set_onmouseup(Value: OleVariant); safecall;
    function Get_onmouseup: OleVariant; safecall;
    procedure Set_onmousedown(Value: OleVariant); safecall;
    function Get_onmousedown: OleVariant; safecall;
    procedure Set_onmousemove(Value: OleVariant); safecall;
    function Get_onmousemove: OleVariant; safecall;
    procedure Set_onmouseout(Value: OleVariant); safecall;
    function Get_onmouseout: OleVariant; safecall;
    procedure Set_onmouseover(Value: OleVariant); safecall;
    function Get_onmouseover: OleVariant; safecall;
    procedure Set_onreadystatechange(Value: OleVariant); safecall;
    function Get_onreadystatechange: OleVariant; safecall;
    procedure Set_onafterupdate(Value: OleVariant); safecall;
    function Get_onafterupdate: OleVariant; safecall;
    procedure Set_onrowexit(Value: OleVariant); safecall;
    function Get_onrowexit: OleVariant; safecall;
    procedure Set_onrowenter(Value: OleVariant); safecall;
    function Get_onrowenter: OleVariant; safecall;
    procedure Set_ondragstart(Value: OleVariant); safecall;
    function Get_ondragstart: OleVariant; safecall;
    procedure Set_onselectstart(Value: OleVariant); safecall;
    function Get_onselectstart: OleVariant; safecall;
    function elementFromPoint(x, y: Integer): IHTMLElement; safecall;
    function Get_parentWindow: IHTMLWindow2; safecall;
    function Get_styleSheets: IHTMLStyleSheetsCollection; safecall;
    procedure Set_onbeforeupdate(Value: OleVariant); safecall;
    function Get_onbeforeupdate: OleVariant; safecall;
    procedure Set_onerrorupdate(Value: OleVariant); safecall;
    function Get_onerrorupdate: OleVariant; safecall;
    function toString: WideString; safecall;
    function createStyleSheet(const bstrHref: WideString; lIndex: Integer): IHTMLStyleSheet; safecall;
    property all: IHTMLElementCollection read Get_all;
    property body: IHTMLElement read Get_body;
    property activeElement: IHTMLElement read Get_activeElement;
    property images: IHTMLElementCollection read Get_images;
    property applets: IHTMLElementCollection read Get_applets;
    property links: IHTMLElementCollection read Get_links;
    property forms: IHTMLElementCollection read Get_forms;
    property anchors: IHTMLElementCollection read Get_anchors;
    property title: WideString read Get_title write Set_title;
    property scripts: IHTMLElementCollection read Get_scripts;
    property designMode: WideString read Get_designMode write Set_designMode;
    property selection: IHTMLSelectionObject read Get_selection;
    property readyState: WideString read Get_readyState;
    property frames: IHTMLFramesCollection2 read Get_frames;
    property embeds: IHTMLElementCollection read Get_embeds;
    property plugins: IHTMLElementCollection read Get_plugins;
    property alinkColor: OleVariant read Get_alinkColor write Set_alinkColor;
    property bgColor: OleVariant read Get_bgColor write Set_bgColor;
    property fgColor: OleVariant read Get_fgColor write Set_fgColor;
    property linkColor: OleVariant read Get_linkColor write Set_linkColor;
    property vlinkColor: OleVariant read Get_vlinkColor write Set_vlinkColor;
    property referrer: WideString read Get_referrer;
    property location: IHTMLLocation read Get_location;
    property lastModified: WideString read Get_lastModified;
    property url: WideString read Get_url write Set_url;
    property domain: WideString read Get_domain write Set_domain;
    property cookie: WideString read Get_cookie write Set_cookie;
    property expando: WordBool read Get_expando write Set_expando;
    property charset: WideString read Get_charset write Set_charset;
    property defaultCharset: WideString read Get_defaultCharset write Set_defaultCharset;
    property mimeType: WideString read Get_mimeType;
    property fileSize: WideString read Get_fileSize;
    property fileCreatedDate: WideString read Get_fileCreatedDate;
    property fileModifiedDate: WideString read Get_fileModifiedDate;
    property fileUpdatedDate: WideString read Get_fileUpdatedDate;
    property security: WideString read Get_security;
    property protocol: WideString read Get_protocol;
    property nameProp: WideString read Get_nameProp;
    property onhelp: OleVariant read Get_onhelp write Set_onhelp;
    property onclick: OleVariant read Get_onclick write Set_onclick;
    property ondblclick: OleVariant read Get_ondblclick write Set_ondblclick;
    property onkeyup: OleVariant read Get_onkeyup write Set_onkeyup;
    property onkeydown: OleVariant read Get_onkeydown write Set_onkeydown;
    property onkeypress: OleVariant read Get_onkeypress write Set_onkeypress;
    property onmouseup: OleVariant read Get_onmouseup write Set_onmouseup;
    property onmousedown: OleVariant read Get_onmousedown write Set_onmousedown;
    property onmousemove: OleVariant read Get_onmousemove write Set_onmousemove;
    property onmouseout: OleVariant read Get_onmouseout write Set_onmouseout;
    property onmouseover: OleVariant read Get_onmouseover write Set_onmouseover;
    property onreadystatechange: OleVariant read Get_onreadystatechange write Set_onreadystatechange;
    property onafterupdate: OleVariant read Get_onafterupdate write Set_onafterupdate;
    property onrowexit: OleVariant read Get_onrowexit write Set_onrowexit;
    property onrowenter: OleVariant read Get_onrowenter write Set_onrowenter;
    property ondragstart: OleVariant read Get_ondragstart write Set_ondragstart;
    property onselectstart: OleVariant read Get_onselectstart write Set_onselectstart;
    property parentWindow: IHTMLWindow2 read Get_parentWindow;
    property styleSheets: IHTMLStyleSheetsCollection read Get_styleSheets;
    property onbeforeupdate: OleVariant read Get_onbeforeupdate write Set_onbeforeupdate;
    property onerrorupdate: OleVariant read Get_onerrorupdate write Set_onerrorupdate;
  end;

{ DispInterface declaration for Dual Interface IHTMLDocument2 }

  IHTMLDocument2Disp = dispinterface
    ['{332C4425-26CB-11D0-B483-00C04FD90119}']
    property Script: IDispatch readonly dispid 1001;
    property all: IHTMLElementCollection readonly dispid 1003;
    property body: IHTMLElement readonly dispid 1004;
    property activeElement: IHTMLElement readonly dispid 1005;
    property images: IHTMLElementCollection readonly dispid 1011;
    property applets: IHTMLElementCollection readonly dispid 1008;
    property links: IHTMLElementCollection readonly dispid 1009;
    property forms: IHTMLElementCollection readonly dispid 1010;
    property anchors: IHTMLElementCollection readonly dispid 1007;
    property title: WideString dispid 1012;
    property scripts: IHTMLElementCollection readonly dispid 1013;
    property designMode: WideString dispid 1014;
    property selection: IHTMLSelectionObject readonly dispid 1017;
    property readyState: WideString readonly dispid 1018;
    property frames: IHTMLFramesCollection2 readonly dispid 1019;
    property embeds: IHTMLElementCollection readonly dispid 1015;
    property plugins: IHTMLElementCollection readonly dispid 1021;
    property alinkColor: OleVariant dispid 1022;
    property bgColor: OleVariant dispid -501;
    property fgColor: OleVariant dispid -2147413110;
    property linkColor: OleVariant dispid 1024;
    property vlinkColor: OleVariant dispid 1023;
    property referrer: WideString readonly dispid 1027;
    property location: IHTMLLocation readonly dispid 1026;
    property lastModified: WideString readonly dispid 1028;
    property url: WideString dispid 1025;
    property domain: WideString dispid 1029;
    property cookie: WideString dispid 1030;
    property expando: WordBool dispid 1031;
    property charset: WideString dispid 1032;
    property defaultCharset: WideString dispid 1033;
    property mimeType: WideString readonly dispid 1041;
    property fileSize: WideString readonly dispid 1042;
    property fileCreatedDate: WideString readonly dispid 1043;
    property fileModifiedDate: WideString readonly dispid 1044;
    property fileUpdatedDate: WideString readonly dispid 1045;
    property security: WideString readonly dispid 1046;
    property protocol: WideString readonly dispid 1047;
    property nameProp: WideString readonly dispid 1048;
    procedure write(psarray: OleVariant); dispid 1054;
    procedure writeln(psarray: OleVariant); dispid 1055;
    function open(const url: WideString; name, features, replace: OleVariant): IDispatch; dispid 1056;
    procedure close; dispid 1057;
    procedure clear; dispid 1058;
    function queryCommandSupported(const cmdID: WideString): WordBool; dispid 1059;
    function queryCommandEnabled(const cmdID: WideString): WordBool; dispid 1060;
    function queryCommandState(const cmdID: WideString): WordBool; dispid 1061;
    function queryCommandIndeterm(const cmdID: WideString): WordBool; dispid 1062;
    function queryCommandText(const cmdID: WideString): WideString; dispid 1063;
    function queryCommandValue(const cmdID: WideString): OleVariant; dispid 1064;
    function execCommand(const cmdID: WideString; showUI: WordBool; value: OleVariant): WordBool; dispid 1065;
    function execCommandShowHelp(const cmdID: WideString): WordBool; dispid 1066;
    function createElement(const eTag: WideString): IHTMLElement; dispid 1067;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseup: OleVariant dispid -2147412109;
    property onmousedown: OleVariant dispid -2147412110;
    property onmousemove: OleVariant dispid -2147412108;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onreadystatechange: OleVariant dispid -2147412087;
    property onafterupdate: OleVariant dispid -2147412090;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondragstart: OleVariant dispid -2147412077;
    property onselectstart: OleVariant dispid -2147412075;
    function elementFromPoint(x, y: Integer): IHTMLElement; dispid 1068;
    property parentWindow: IHTMLWindow2 readonly dispid 1034;
    property styleSheets: IHTMLStyleSheetsCollection readonly dispid 1069;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onerrorupdate: OleVariant dispid -2147412074;
    function toString: WideString; dispid 1070;
    function createStyleSheet(const bstrHref: WideString; lIndex: Integer): IHTMLStyleSheet; dispid 1071;
  end;

  IHTMLFramesCollection2 = interface(IDispatch)
    ['{332C4426-26CB-11D0-B483-00C04FD90119}']
    function item(var pvarIndex: OleVariant): OleVariant; safecall;
    function Get_length: Integer; safecall;
    property length: Integer read Get_length;
  end;

{ DispInterface declaration for Dual Interface IHTMLFramesCollection2 }

  IHTMLFramesCollection2Disp = dispinterface
    ['{332C4426-26CB-11D0-B483-00C04FD90119}']
    function item(var pvarIndex: OleVariant): OleVariant; dispid 0;
    property length: Integer readonly dispid 1001;
  end;

  IHTMLWindow2 = interface(IHTMLFramesCollection2)
    ['{332C4427-26CB-11D0-B483-00C04FD90119}']
    function Get_frames: IHTMLFramesCollection2; safecall;
    procedure Set_defaultStatus(const Value: WideString); safecall;
    function Get_defaultStatus: WideString; safecall;
    procedure Set_status(const Value: WideString); safecall;
    function Get_status: WideString; safecall;
    function setTimeout(const expression: WideString; msec: Integer; var language: OleVariant): Integer; safecall;
    procedure clearTimeout(timerID: Integer); safecall;
    procedure alert(const message: WideString); safecall;
    function confirm(const message: WideString): WordBool; safecall;
    function prompt(const message, defstr: WideString): OleVariant; safecall;
    function Get_Image: IHTMLImageElementFactory; safecall;
    function Get_location: IHTMLLocation; safecall;
    function Get_history: IOmHistory; safecall;
    procedure close; safecall;
    procedure Set_opener(Value: OleVariant); safecall;
    function Get_opener: OleVariant; safecall;
    function Get_navigator: IOmNavigator; safecall;
    procedure Set_name(const Value: WideString); safecall;
    function Get_name: WideString; safecall;
    function Get_Parent: IHTMLWindow2; safecall;
    function open(const url, name, features: WideString; replace: WordBool): IHTMLWindow2; safecall;
    function Get_self: IHTMLWindow2; safecall;
    function Get_top: IHTMLWindow2; safecall;
    function Get_window: IHTMLWindow2; safecall;
    procedure navigate(const url: WideString); safecall;
    procedure Set_onfocus(Value: OleVariant); safecall;
    function Get_onfocus: OleVariant; safecall;
    procedure Set_onblur(Value: OleVariant); safecall;
    function Get_onblur: OleVariant; safecall;
    procedure Set_onload(Value: OleVariant); safecall;
    function Get_onload: OleVariant; safecall;
    procedure Set_onbeforeunload(Value: OleVariant); safecall;
    function Get_onbeforeunload: OleVariant; safecall;
    procedure Set_onunload(Value: OleVariant); safecall;
    function Get_onunload: OleVariant; safecall;
    procedure Set_onhelp(Value: OleVariant); safecall;
    function Get_onhelp: OleVariant; safecall;
    procedure Set_onerror(Value: OleVariant); safecall;
    function Get_onerror: OleVariant; safecall;
    procedure Set_onresize(Value: OleVariant); safecall;
    function Get_onresize: OleVariant; safecall;
    procedure Set_onscroll(Value: OleVariant); safecall;
    function Get_onscroll: OleVariant; safecall;
    function Get_document: IHTMLDocument2; safecall;
    function Get_event: IHTMLEventObj; safecall;
    function Get__newEnum: IUnknown; safecall;
    function showModalDialog(const dialog: WideString; var varArgIn, varOptions: OleVariant): OleVariant; safecall;
    procedure showHelp(const helpURL: WideString; helpArg: OleVariant; const features: WideString); safecall;
    function Get_screen: IHTMLScreen; safecall;
    function Get_Option: IHTMLOptionElementFactory; safecall;
    procedure focus; safecall;
    function Get_closed: WordBool; safecall;
    procedure blur; safecall;
    procedure scroll(x, y: Integer); safecall;
    function Get_clientInformation: IOmNavigator; safecall;
    function setInterval(const expression: WideString; msec: Integer; var language: OleVariant): Integer; safecall;
    procedure clearInterval(timerID: Integer); safecall;
    procedure Set_offscreenBuffering(Value: OleVariant); safecall;
    function Get_offscreenBuffering: OleVariant; safecall;
    function execScript(const code, language: WideString): OleVariant; safecall;
    function toString: WideString; safecall;
    procedure scrollBy(x, y: Integer); safecall;
    procedure scrollTo(x, y: Integer); safecall;
    procedure moveTo(x, y: Integer); safecall;
    procedure moveBy(x, y: Integer); safecall;
    procedure resizeTo(x, y: Integer); safecall;
    procedure resizeBy(x, y: Integer); safecall;
    function Get_external: IDispatch; safecall;
    property frames: IHTMLFramesCollection2 read Get_frames;
    property defaultStatus: WideString read Get_defaultStatus write Set_defaultStatus;
    property status: WideString read Get_status write Set_status;
    property Image: IHTMLImageElementFactory read Get_Image;
    property location: IHTMLLocation read Get_location;
    property history: IOmHistory read Get_history;
    property opener: OleVariant read Get_opener write Set_opener;
    property navigator: IOmNavigator read Get_navigator;
    property name: WideString read Get_name write Set_name;
    property Parent: IHTMLWindow2 read Get_Parent;
    property self: IHTMLWindow2 read Get_self;
    property top: IHTMLWindow2 read Get_top;
    property window: IHTMLWindow2 read Get_window;
    property onfocus: OleVariant read Get_onfocus write Set_onfocus;
    property onblur: OleVariant read Get_onblur write Set_onblur;
    property onload: OleVariant read Get_onload write Set_onload;
    property onbeforeunload: OleVariant read Get_onbeforeunload write Set_onbeforeunload;
    property onunload: OleVariant read Get_onunload write Set_onunload;
    property onhelp: OleVariant read Get_onhelp write Set_onhelp;
    property onerror: OleVariant read Get_onerror write Set_onerror;
    property onresize: OleVariant read Get_onresize write Set_onresize;
    property onscroll: OleVariant read Get_onscroll write Set_onscroll;
    property document: IHTMLDocument2 read Get_document;
    property event: IHTMLEventObj read Get_event;
    property _newEnum: IUnknown read Get__newEnum;
    property screen: IHTMLScreen read Get_screen;
    property Option: IHTMLOptionElementFactory read Get_Option;
    property closed: WordBool read Get_closed;
    property clientInformation: IOmNavigator read Get_clientInformation;
    property offscreenBuffering: OleVariant read Get_offscreenBuffering write Set_offscreenBuffering;
    property external: IDispatch read Get_external;
  end;

{ DispInterface declaration for Dual Interface IHTMLWindow2 }

  IHTMLWindow2Disp = dispinterface
    ['{332C4427-26CB-11D0-B483-00C04FD90119}']
    function item(var pvarIndex: OleVariant): OleVariant; dispid 0;
    property length: Integer readonly dispid 1001;
    property frames: IHTMLFramesCollection2 readonly dispid 1100;
    property defaultStatus: WideString dispid 1101;
    property status: WideString dispid 1102;
    function setTimeout(const expression: WideString; msec: Integer; var language: OleVariant): Integer; dispid 1103;
    procedure clearTimeout(timerID: Integer); dispid 1104;
    procedure alert(const message: WideString); dispid 1105;
    function confirm(const message: WideString): WordBool; dispid 1110;
    function prompt(const message, defstr: WideString): OleVariant; dispid 1111;
    property Image: IHTMLImageElementFactory readonly dispid 1125;
    property location: IHTMLLocation readonly dispid 14;
    property history: IOmHistory readonly dispid 2;
    procedure close; dispid 3;
    property opener: OleVariant dispid 4;
    property navigator: IOmNavigator readonly dispid 5;
    property name: WideString dispid 11;
    property Parent: IHTMLWindow2 readonly dispid 12;
    function open(const url, name, features: WideString; replace: WordBool): IHTMLWindow2; dispid 13;
    property self: IHTMLWindow2 readonly dispid 20;
    property top: IHTMLWindow2 readonly dispid 21;
    property window: IHTMLWindow2 readonly dispid 22;
    procedure navigate(const url: WideString); dispid 25;
    property onfocus: OleVariant dispid -2147412098;
    property onblur: OleVariant dispid -2147412097;
    property onload: OleVariant dispid -2147412080;
    property onbeforeunload: OleVariant dispid -2147412073;
    property onunload: OleVariant dispid -2147412079;
    property onhelp: OleVariant dispid -2147412099;
    property onerror: OleVariant dispid -2147412083;
    property onresize: OleVariant dispid -2147412076;
    property onscroll: OleVariant dispid -2147412081;
    property document: IHTMLDocument2 readonly dispid 1151;
    property event: IHTMLEventObj readonly dispid 1152;
    function showModalDialog(const dialog: WideString; var varArgIn, varOptions: OleVariant): OleVariant; dispid 1154;
    procedure showHelp(const helpURL: WideString; helpArg: OleVariant; const features: WideString); dispid 1155;
    property screen: IHTMLScreen readonly dispid 1156;
    property Option: IHTMLOptionElementFactory readonly dispid 1157;
    procedure focus; dispid 1158;
    property closed: WordBool readonly dispid 23;
    procedure blur; dispid 1159;
    procedure scroll(x, y: Integer); dispid 1160;
    property clientInformation: IOmNavigator readonly dispid 1161;
    function setInterval(const expression: WideString; msec: Integer; var language: OleVariant): Integer; dispid 1162;
    procedure clearInterval(timerID: Integer); dispid 1163;
    property offscreenBuffering: OleVariant dispid 1164;
    function execScript(const code, language: WideString): OleVariant; dispid 1165;
    function toString: WideString; dispid 1166;
    procedure scrollBy(x, y: Integer); dispid 1167;
    procedure scrollTo(x, y: Integer); dispid 1168;
    procedure moveTo(x, y: Integer); dispid 6;
    procedure moveBy(x, y: Integer); dispid 7;
    procedure resizeTo(x, y: Integer); dispid 9;
    procedure resizeBy(x, y: Integer); dispid 8;
    property external: IDispatch readonly dispid 1169;
  end;

  IHTMLEventObj = interface(IDispatch)
    ['{3050F32D-98B5-11CF-BB82-00AA00BDCE0B}']
    function Get_srcElement: IHTMLElement; safecall;
    function Get_altKey: WordBool; safecall;
    function Get_ctrlKey: WordBool; safecall;
    function Get_shiftKey: WordBool; safecall;
    procedure Set_returnValue(Value: OleVariant); safecall;
    function Get_returnValue: OleVariant; safecall;
    procedure Set_cancelBubble(Value: WordBool); safecall;
    function Get_cancelBubble: WordBool; safecall;
    function Get_fromElement: IHTMLElement; safecall;
    function Get_toElement: IHTMLElement; safecall;
    procedure Set_keyCode(Value: Integer); safecall;
    function Get_keyCode: Integer; safecall;
    function Get_button: Integer; safecall;
    function Get_type_: WideString; safecall;
    function Get_qualifier: WideString; safecall;
    function Get_reason: Integer; safecall;
    function Get_x: Integer; safecall;
    function Get_y: Integer; safecall;
    function Get_clientX: Integer; safecall;
    function Get_clientY: Integer; safecall;
    function Get_offsetX: Integer; safecall;
    function Get_offsetY: Integer; safecall;
    function Get_screenX: Integer; safecall;
    function Get_screenY: Integer; safecall;
    function Get_srcFilter: IDispatch; safecall;
    property srcElement: IHTMLElement read Get_srcElement;
    property altKey: WordBool read Get_altKey;
    property ctrlKey: WordBool read Get_ctrlKey;
    property shiftKey: WordBool read Get_shiftKey;
    property returnValue: OleVariant read Get_returnValue write Set_returnValue;
    property cancelBubble: WordBool read Get_cancelBubble write Set_cancelBubble;
    property fromElement: IHTMLElement read Get_fromElement;
    property toElement: IHTMLElement read Get_toElement;
    property keyCode: Integer read Get_keyCode write Set_keyCode;
    property button: Integer read Get_button;
    property type_: WideString read Get_type_;
    property qualifier: WideString read Get_qualifier;
    property reason: Integer read Get_reason;
    property x: Integer read Get_x;
    property y: Integer read Get_y;
    property clientX: Integer read Get_clientX;
    property clientY: Integer read Get_clientY;
    property offsetX: Integer read Get_offsetX;
    property offsetY: Integer read Get_offsetY;
    property screenX: Integer read Get_screenX;
    property screenY: Integer read Get_screenY;
    property srcFilter: IDispatch read Get_srcFilter;
  end;

{ DispInterface declaration for Dual Interface IHTMLEventObj }

  IHTMLEventObjDisp = dispinterface
    ['{3050F32D-98B5-11CF-BB82-00AA00BDCE0B}']
    property srcElement: IHTMLElement readonly dispid 1001;
    property altKey: WordBool readonly dispid 1002;
    property ctrlKey: WordBool readonly dispid 1003;
    property shiftKey: WordBool readonly dispid 1004;
    property returnValue: OleVariant dispid 1007;
    property cancelBubble: WordBool dispid 1008;
    property fromElement: IHTMLElement readonly dispid 1009;
    property toElement: IHTMLElement readonly dispid 1010;
    property keyCode: Integer dispid 1011;
    property button: Integer readonly dispid 1012;
    property type_: WideString readonly dispid 1013;
    property qualifier: WideString readonly dispid 1014;
    property reason: Integer readonly dispid 1015;
    property x: Integer readonly dispid 1005;
    property y: Integer readonly dispid 1006;
    property clientX: Integer readonly dispid 1020;
    property clientY: Integer readonly dispid 1021;
    property offsetX: Integer readonly dispid 1022;
    property offsetY: Integer readonly dispid 1023;
    property screenX: Integer readonly dispid 1024;
    property screenY: Integer readonly dispid 1025;
    property srcFilter: IDispatch readonly dispid 1026;
  end;

  IHTMLScreen = interface(IDispatch)
    ['{3050F35C-98B5-11CF-BB82-00AA00BDCE0B}']
    function Get_colorDepth: Integer; safecall;
    procedure Set_bufferDepth(Value: Integer); safecall;
    function Get_bufferDepth: Integer; safecall;
    function Get_width: Integer; safecall;
    function Get_height: Integer; safecall;
    procedure Set_updateInterval(Value: Integer); safecall;
    function Get_updateInterval: Integer; safecall;
    function Get_availHeight: Integer; safecall;
    function Get_availWidth: Integer; safecall;
    function Get_fontSmoothingEnabled: WordBool; safecall;
    property colorDepth: Integer read Get_colorDepth;
    property bufferDepth: Integer read Get_bufferDepth write Set_bufferDepth;
    property width: Integer read Get_width;
    property height: Integer read Get_height;
    property updateInterval: Integer read Get_updateInterval write Set_updateInterval;
    property availHeight: Integer read Get_availHeight;
    property availWidth: Integer read Get_availWidth;
    property fontSmoothingEnabled: WordBool read Get_fontSmoothingEnabled;
  end;

{ DispInterface declaration for Dual Interface IHTMLScreen }

  IHTMLScreenDisp = dispinterface
    ['{3050F35C-98B5-11CF-BB82-00AA00BDCE0B}']
    property colorDepth: Integer readonly dispid 1001;
    property bufferDepth: Integer dispid 1002;
    property width: Integer readonly dispid 1003;
    property height: Integer readonly dispid 1004;
    property updateInterval: Integer dispid 1005;
    property availHeight: Integer readonly dispid 1006;
    property availWidth: Integer readonly dispid 1007;
    property fontSmoothingEnabled: WordBool readonly dispid 1008;
  end;

  HTMLDocumentEvents = dispinterface
    ['{3050F260-98B5-11CF-BB82-00AA00BDCE0B}']
    function onhelp: WordBool; dispid -2147418102;
    function onclick: WordBool; dispid -600;
    function ondblclick: WordBool; dispid -601;
    procedure onkeydown; dispid -602;
    procedure onkeyup; dispid -604;
    function onkeypress: WordBool; dispid -603;
    procedure onmousedown; dispid -605;
    procedure onmousemove; dispid -606;
    procedure onmouseup; dispid -607;
    procedure onmouseout; dispid -2147418103;
    procedure onmouseover; dispid -2147418104;
    procedure onreadystatechange; dispid -609;
    function onbeforeupdate: WordBool; dispid -2147418108;
    procedure onafterupdate; dispid -2147418107;
    function onrowexit: WordBool; dispid -2147418106;
    procedure onrowenter; dispid -2147418105;
    function ondragstart: WordBool; dispid -2147418101;
    function onselectstart: WordBool; dispid -2147418100;
    function onerrorupdate: WordBool; dispid -2147418099;
  end;

  IHTMLEmbedElement = interface(IDispatch)
    ['{3050F25F-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_hidden(const Value: WideString); safecall;
    function Get_hidden: WideString; safecall;
    function Get_palette: WideString; safecall;
    function Get_pluginspage: WideString; safecall;
    procedure Set_src(const Value: WideString); safecall;
    function Get_src: WideString; safecall;
    procedure Set_units(const Value: WideString); safecall;
    function Get_units: WideString; safecall;
    procedure Set_name(const Value: WideString); safecall;
    function Get_name: WideString; safecall;
    procedure Set_width(Value: OleVariant); safecall;
    function Get_width: OleVariant; safecall;
    procedure Set_height(Value: OleVariant); safecall;
    function Get_height: OleVariant; safecall;
    property hidden: WideString read Get_hidden write Set_hidden;
    property palette: WideString read Get_palette;
    property pluginspage: WideString read Get_pluginspage;
    property src: WideString read Get_src write Set_src;
    property units: WideString read Get_units write Set_units;
    property name: WideString read Get_name write Set_name;
    property width: OleVariant read Get_width write Set_width;
    property height: OleVariant read Get_height write Set_height;
  end;

{ DispInterface declaration for Dual Interface IHTMLEmbedElement }

  IHTMLEmbedElementDisp = dispinterface
    ['{3050F25F-98B5-11CF-BB82-00AA00BDCE0B}']
    property hidden: WideString dispid -2147413031;
    property palette: WideString readonly dispid -2147415108;
    property pluginspage: WideString readonly dispid -2147415107;
    property src: WideString dispid -2147415106;
    property units: WideString dispid -2147415104;
    property name: WideString dispid -2147418112;
    property width: OleVariant dispid -2147418107;
    property height: OleVariant dispid -2147418106;
  end;

  DispIHTMLEmbedElement = dispinterface
    ['{3050F52E-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    property hidden: WideString dispid -2147413031;
    property palette: WideString readonly dispid -2147415108;
    property pluginspage: WideString readonly dispid -2147415107;
    property src: WideString dispid -2147415106;
    property units: WideString dispid -2147415104;
    property name: WideString dispid -2147418112;
    property width: OleVariant dispid -2147418107;
    property height: OleVariant dispid -2147418106;
  end;

  HTMLMapEvents = dispinterface
    ['{3050F3BA-98B5-11CF-BB82-00AA00BDCE0B}']
    function onhelp: WordBool; dispid -2147418102;
    function onclick: WordBool; dispid -600;
    function ondblclick: WordBool; dispid -601;
    function onkeypress: WordBool; dispid -603;
    procedure onkeydown; dispid -602;
    procedure onkeyup; dispid -604;
    procedure onmouseout; dispid -2147418103;
    procedure onmouseover; dispid -2147418104;
    procedure onmousemove; dispid -606;
    procedure onmousedown; dispid -605;
    procedure onmouseup; dispid -607;
    function onselectstart: WordBool; dispid -2147418100;
    procedure onfilterchange; dispid -2147418095;
    function ondragstart: WordBool; dispid -2147418101;
    function onbeforeupdate: WordBool; dispid -2147418108;
    procedure onafterupdate; dispid -2147418107;
    function onerrorupdate: WordBool; dispid -2147418099;
    function onrowexit: WordBool; dispid -2147418106;
    procedure onrowenter; dispid -2147418105;
    procedure ondatasetchanged; dispid -2147418098;
    procedure ondataavailable; dispid -2147418097;
    procedure ondatasetcomplete; dispid -2147418096;
  end;

  IHTMLAreasCollection = interface(IDispatch)
    ['{3050F383-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_length(Value: Integer); safecall;
    function Get_length: Integer; safecall;
    function Get__newEnum: IUnknown; safecall;
    function item(name, index: OleVariant): IDispatch; safecall;
    function tags(tagName: OleVariant): IDispatch; safecall;
    procedure add(const element: IHTMLElement; before: OleVariant); safecall;
    procedure remove(index: Integer); safecall;
    property length: Integer read Get_length write Set_length;
    property _newEnum: IUnknown read Get__newEnum;
  end;

{ DispInterface declaration for Dual Interface IHTMLAreasCollection }

  IHTMLAreasCollectionDisp = dispinterface
    ['{3050F383-98B5-11CF-BB82-00AA00BDCE0B}']
    property length: Integer dispid 1500;
    function item(name, index: OleVariant): IDispatch; dispid 0;
    function tags(tagName: OleVariant): IDispatch; dispid 1502;
    procedure add(const element: IHTMLElement; before: OleVariant); dispid 1503;
    procedure remove(index: Integer); dispid 1504;
  end;

  IHTMLMapElement = interface(IDispatch)
    ['{3050F266-98B5-11CF-BB82-00AA00BDCE0B}']
    function Get_areas: IHTMLAreasCollection; safecall;
    procedure Set_name(const Value: WideString); safecall;
    function Get_name: WideString; safecall;
    property areas: IHTMLAreasCollection read Get_areas;
    property name: WideString read Get_name write Set_name;
  end;

{ DispInterface declaration for Dual Interface IHTMLMapElement }

  IHTMLMapElementDisp = dispinterface
    ['{3050F266-98B5-11CF-BB82-00AA00BDCE0B}']
    property areas: IHTMLAreasCollection readonly dispid 1002;
    property name: WideString dispid -2147418112;
  end;

  DispIHTMLMapElement = dispinterface
    ['{3050F526-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property areas: IHTMLAreasCollection readonly dispid 1002;
    property name: WideString dispid -2147418112;
  end;

  HTMLAreaEvents = dispinterface
    ['{3050F366-98B5-11CF-BB82-00AA00BDCE0B}']
    function onhelp: WordBool; dispid -2147418102;
    function onclick: WordBool; dispid -600;
    function ondblclick: WordBool; dispid -601;
    function onkeypress: WordBool; dispid -603;
    procedure onkeydown; dispid -602;
    procedure onkeyup; dispid -604;
    procedure onmouseout; dispid -2147418103;
    procedure onmouseover; dispid -2147418104;
    procedure onmousemove; dispid -606;
    procedure onmousedown; dispid -605;
    procedure onmouseup; dispid -607;
    function onselectstart: WordBool; dispid -2147418100;
    procedure onfilterchange; dispid -2147418095;
    function ondragstart: WordBool; dispid -2147418101;
    function onbeforeupdate: WordBool; dispid -2147418108;
    procedure onafterupdate; dispid -2147418107;
    function onerrorupdate: WordBool; dispid -2147418099;
    function onrowexit: WordBool; dispid -2147418106;
    procedure onrowenter; dispid -2147418105;
    procedure ondatasetchanged; dispid -2147418098;
    procedure ondataavailable; dispid -2147418097;
    procedure ondatasetcomplete; dispid -2147418096;
    procedure onfocus; dispid -2147418111;
    procedure onblur; dispid -2147418112;
  end;

  IHTMLAreaElement = interface(IDispatch)
    ['{3050F265-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_shape(const Value: WideString); safecall;
    function Get_shape: WideString; safecall;
    procedure Set_coords(const Value: WideString); safecall;
    function Get_coords: WideString; safecall;
    procedure Set_href(const Value: WideString); safecall;
    function Get_href: WideString; safecall;
    procedure Set_target(const Value: WideString); safecall;
    function Get_target: WideString; safecall;
    procedure Set_alt(const Value: WideString); safecall;
    function Get_alt: WideString; safecall;
    procedure Set_noHref(Value: WordBool); safecall;
    function Get_noHref: WordBool; safecall;
    procedure Set_host(const Value: WideString); safecall;
    function Get_host: WideString; safecall;
    procedure Set_hostname(const Value: WideString); safecall;
    function Get_hostname: WideString; safecall;
    procedure Set_pathname(const Value: WideString); safecall;
    function Get_pathname: WideString; safecall;
    procedure Set_port(const Value: WideString); safecall;
    function Get_port: WideString; safecall;
    procedure Set_protocol(const Value: WideString); safecall;
    function Get_protocol: WideString; safecall;
    procedure Set_search(const Value: WideString); safecall;
    function Get_search: WideString; safecall;
    procedure Set_hash(const Value: WideString); safecall;
    function Get_hash: WideString; safecall;
    procedure Set_onblur(Value: OleVariant); safecall;
    function Get_onblur: OleVariant; safecall;
    procedure Set_onfocus(Value: OleVariant); safecall;
    function Get_onfocus: OleVariant; safecall;
    procedure Set_tabIndex(Value: Smallint); safecall;
    function Get_tabIndex: Smallint; safecall;
    procedure focus; safecall;
    procedure blur; safecall;
    property shape: WideString read Get_shape write Set_shape;
    property coords: WideString read Get_coords write Set_coords;
    property href: WideString read Get_href write Set_href;
    property target: WideString read Get_target write Set_target;
    property alt: WideString read Get_alt write Set_alt;
    property noHref: WordBool read Get_noHref write Set_noHref;
    property host: WideString read Get_host write Set_host;
    property hostname: WideString read Get_hostname write Set_hostname;
    property pathname: WideString read Get_pathname write Set_pathname;
    property port: WideString read Get_port write Set_port;
    property protocol: WideString read Get_protocol write Set_protocol;
    property search: WideString read Get_search write Set_search;
    property hash: WideString read Get_hash write Set_hash;
    property onblur: OleVariant read Get_onblur write Set_onblur;
    property onfocus: OleVariant read Get_onfocus write Set_onfocus;
    property tabIndex: Smallint read Get_tabIndex write Set_tabIndex;
  end;

{ DispInterface declaration for Dual Interface IHTMLAreaElement }

  IHTMLAreaElementDisp = dispinterface
    ['{3050F265-98B5-11CF-BB82-00AA00BDCE0B}']
    property shape: WideString dispid 1001;
    property coords: WideString dispid 1002;
    property href: WideString dispid 0;
    property target: WideString dispid 1004;
    property alt: WideString dispid 1005;
    property noHref: WordBool dispid 1006;
    property host: WideString dispid 1007;
    property hostname: WideString dispid 1008;
    property pathname: WideString dispid 1009;
    property port: WideString dispid 1010;
    property protocol: WideString dispid 1011;
    property search: WideString dispid 1012;
    property hash: WideString dispid 1013;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid 1014;
    procedure blur; dispid 1015;
  end;

  DispIHTMLAreaElement = dispinterface
    ['{3050F503-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property shape: WideString dispid 1001;
    property coords: WideString dispid 1002;
    property href: WideString dispid 0;
    property target: WideString dispid 1004;
    property alt: WideString dispid 1005;
    property noHref: WordBool dispid 1006;
    property host: WideString dispid 1007;
    property hostname: WideString dispid 1008;
    property pathname: WideString dispid 1009;
    property port: WideString dispid 1010;
    property protocol: WideString dispid 1011;
    property search: WideString dispid 1012;
    property hash: WideString dispid 1013;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid 1014;
    procedure blur; dispid 1015;
  end;

  IHTMLTableCaption = interface(IDispatch)
    ['{3050F2EB-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_align(const Value: WideString); safecall;
    function Get_align: WideString; safecall;
    procedure Set_vAlign(const Value: WideString); safecall;
    function Get_vAlign: WideString; safecall;
    property align: WideString read Get_align write Set_align;
    property vAlign: WideString read Get_vAlign write Set_vAlign;
  end;

{ DispInterface declaration for Dual Interface IHTMLTableCaption }

  IHTMLTableCaptionDisp = dispinterface
    ['{3050F2EB-98B5-11CF-BB82-00AA00BDCE0B}']
    property align: WideString dispid -2147418040;
    property vAlign: WideString dispid -2147413081;
  end;

  DispIHTMLTableCaption = dispinterface
    ['{3050F508-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    function createControlRange: IDispatch; dispid 1001;
    property scrollHeight: Integer readonly dispid 1002;
    property scrollWidth: Integer readonly dispid 1003;
    property scrollTop: Integer dispid 1004;
    property scrollLeft: Integer dispid 1005;
    property onscroll: OleVariant dispid -2147412081;
    property align: WideString dispid -2147418040;
    property vAlign: WideString dispid -2147413081;
  end;

  IHTMLCommentElement = interface(IDispatch)
    ['{3050F20C-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_text(const Value: WideString); safecall;
    function Get_text: WideString; safecall;
    procedure Set_atomic(Value: Integer); safecall;
    function Get_atomic: Integer; safecall;
    property text: WideString read Get_text write Set_text;
    property atomic: Integer read Get_atomic write Set_atomic;
  end;

{ DispInterface declaration for Dual Interface IHTMLCommentElement }

  IHTMLCommentElementDisp = dispinterface
    ['{3050F20C-98B5-11CF-BB82-00AA00BDCE0B}']
    property text: WideString dispid 1001;
    property atomic: Integer dispid 1002;
  end;

  DispIHTMLCommentElement = dispinterface
    ['{3050F50A-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property text: WideString dispid 1001;
    property atomic: Integer dispid 1002;
  end;

  IHTMLPhraseElement = interface(IDispatch)
    ['{3050F20A-98B5-11CF-BB82-00AA00BDCE0B}']
  end;

{ DispInterface declaration for Dual Interface IHTMLPhraseElement }

  IHTMLPhraseElementDisp = dispinterface
    ['{3050F20A-98B5-11CF-BB82-00AA00BDCE0B}']
  end;

  IHTMLSpanElement = interface(IDispatch)
    ['{3050F3F3-98B5-11CF-BB82-00AA00BDCE0B}']
  end;

{ DispInterface declaration for Dual Interface IHTMLSpanElement }

  IHTMLSpanElementDisp = dispinterface
    ['{3050F3F3-98B5-11CF-BB82-00AA00BDCE0B}']
  end;

  DispIHTMLPhraseElement = dispinterface
    ['{3050F52D-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
  end;

  DispIHTMLSpanElement = dispinterface
    ['{3050F548-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property dataFld: WideString dispid -2147417091;
    property dataSrc: WideString dispid -2147417090;
    property dataFormatAs: WideString dispid -2147417089;
  end;

  HTMLTableEvents = dispinterface
    ['{3050F407-98B5-11CF-BB82-00AA00BDCE0B}']
    function onhelp: WordBool; dispid -2147418102;
    function onclick: WordBool; dispid -600;
    function ondblclick: WordBool; dispid -601;
    function onkeypress: WordBool; dispid -603;
    procedure onkeydown; dispid -602;
    procedure onkeyup; dispid -604;
    procedure onmouseout; dispid -2147418103;
    procedure onmouseover; dispid -2147418104;
    procedure onmousemove; dispid -606;
    procedure onmousedown; dispid -605;
    procedure onmouseup; dispid -607;
    function onselectstart: WordBool; dispid -2147418100;
    procedure onfilterchange; dispid -2147418095;
    function ondragstart: WordBool; dispid -2147418101;
    function onbeforeupdate: WordBool; dispid -2147418108;
    procedure onafterupdate; dispid -2147418107;
    function onerrorupdate: WordBool; dispid -2147418099;
    function onrowexit: WordBool; dispid -2147418106;
    procedure onrowenter; dispid -2147418105;
    procedure ondatasetchanged; dispid -2147418098;
    procedure ondataavailable; dispid -2147418097;
    procedure ondatasetcomplete; dispid -2147418096;
    procedure onreadystatechange; dispid -609;
  end;

  IHTMLTableSection = interface(IDispatch)
    ['{3050F23B-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_align(const Value: WideString); safecall;
    function Get_align: WideString; safecall;
    procedure Set_vAlign(const Value: WideString); safecall;
    function Get_vAlign: WideString; safecall;
    procedure Set_bgColor(Value: OleVariant); safecall;
    function Get_bgColor: OleVariant; safecall;
    function Get_rows: IHTMLElementCollection; safecall;
    function insertRow(index: Integer): IDispatch; safecall;
    procedure deleteRow(index: Integer); safecall;
    property align: WideString read Get_align write Set_align;
    property vAlign: WideString read Get_vAlign write Set_vAlign;
    property bgColor: OleVariant read Get_bgColor write Set_bgColor;
    property rows: IHTMLElementCollection read Get_rows;
  end;

{ DispInterface declaration for Dual Interface IHTMLTableSection }

  IHTMLTableSectionDisp = dispinterface
    ['{3050F23B-98B5-11CF-BB82-00AA00BDCE0B}']
    property align: WideString dispid -2147418040;
    property vAlign: WideString dispid -2147413081;
    property bgColor: OleVariant dispid -501;
    property rows: IHTMLElementCollection readonly dispid 1000;
    function insertRow(index: Integer): IDispatch; dispid 1001;
    procedure deleteRow(index: Integer); dispid 1002;
  end;

  IHTMLTable = interface(IDispatch)
    ['{3050F21E-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_cols(Value: Integer); safecall;
    function Get_cols: Integer; safecall;
    procedure Set_border(Value: OleVariant); safecall;
    function Get_border: OleVariant; safecall;
    procedure Set_frame(const Value: WideString); safecall;
    function Get_frame: WideString; safecall;
    procedure Set_rules(const Value: WideString); safecall;
    function Get_rules: WideString; safecall;
    procedure Set_cellSpacing(Value: OleVariant); safecall;
    function Get_cellSpacing: OleVariant; safecall;
    procedure Set_cellPadding(Value: OleVariant); safecall;
    function Get_cellPadding: OleVariant; safecall;
    procedure Set_background(const Value: WideString); safecall;
    function Get_background: WideString; safecall;
    procedure Set_bgColor(Value: OleVariant); safecall;
    function Get_bgColor: OleVariant; safecall;
    procedure Set_borderColor(Value: OleVariant); safecall;
    function Get_borderColor: OleVariant; safecall;
    procedure Set_borderColorLight(Value: OleVariant); safecall;
    function Get_borderColorLight: OleVariant; safecall;
    procedure Set_borderColorDark(Value: OleVariant); safecall;
    function Get_borderColorDark: OleVariant; safecall;
    procedure Set_align(const Value: WideString); safecall;
    function Get_align: WideString; safecall;
    procedure refresh; safecall;
    function Get_rows: IHTMLElementCollection; safecall;
    procedure Set_width(Value: OleVariant); safecall;
    function Get_width: OleVariant; safecall;
    procedure Set_height(Value: OleVariant); safecall;
    function Get_height: OleVariant; safecall;
    procedure Set_dataPageSize(Value: Integer); safecall;
    function Get_dataPageSize: Integer; safecall;
    procedure nextPage; safecall;
    procedure previousPage; safecall;
    function Get_tHead: IHTMLTableSection; safecall;
    function Get_tFoot: IHTMLTableSection; safecall;
    function Get_tBodies: IHTMLElementCollection; safecall;
    function Get_caption: IHTMLTableCaption; safecall;
    function createTHead: IDispatch; safecall;
    procedure deleteTHead; safecall;
    function createTFoot: IDispatch; safecall;
    procedure deleteTFoot; safecall;
    function createCaption: IHTMLTableCaption; safecall;
    procedure deleteCaption; safecall;
    function insertRow(index: Integer): IDispatch; safecall;
    procedure deleteRow(index: Integer); safecall;
    function Get_readyState: WideString; safecall;
    procedure Set_onreadystatechange(Value: OleVariant); safecall;
    function Get_onreadystatechange: OleVariant; safecall;
    property cols: Integer read Get_cols write Set_cols;
    property border: OleVariant read Get_border write Set_border;
    property frame: WideString read Get_frame write Set_frame;
    property rules: WideString read Get_rules write Set_rules;
    property cellSpacing: OleVariant read Get_cellSpacing write Set_cellSpacing;
    property cellPadding: OleVariant read Get_cellPadding write Set_cellPadding;
    property background: WideString read Get_background write Set_background;
    property bgColor: OleVariant read Get_bgColor write Set_bgColor;
    property borderColor: OleVariant read Get_borderColor write Set_borderColor;
    property borderColorLight: OleVariant read Get_borderColorLight write Set_borderColorLight;
    property borderColorDark: OleVariant read Get_borderColorDark write Set_borderColorDark;
    property align: WideString read Get_align write Set_align;
    property rows: IHTMLElementCollection read Get_rows;
    property width: OleVariant read Get_width write Set_width;
    property height: OleVariant read Get_height write Set_height;
    property dataPageSize: Integer read Get_dataPageSize write Set_dataPageSize;
    property tHead: IHTMLTableSection read Get_tHead;
    property tFoot: IHTMLTableSection read Get_tFoot;
    property tBodies: IHTMLElementCollection read Get_tBodies;
    property caption: IHTMLTableCaption read Get_caption;
    property readyState: WideString read Get_readyState;
    property onreadystatechange: OleVariant read Get_onreadystatechange write Set_onreadystatechange;
  end;

{ DispInterface declaration for Dual Interface IHTMLTable }

  IHTMLTableDisp = dispinterface
    ['{3050F21E-98B5-11CF-BB82-00AA00BDCE0B}']
    property cols: Integer dispid 1001;
    property border: OleVariant dispid 1002;
    property frame: WideString dispid 1004;
    property rules: WideString dispid 1003;
    property cellSpacing: OleVariant dispid 1005;
    property cellPadding: OleVariant dispid 1006;
    property background: WideString dispid -2147413111;
    property bgColor: OleVariant dispid -501;
    property borderColor: OleVariant dispid -2147413084;
    property borderColorLight: OleVariant dispid -2147413083;
    property borderColorDark: OleVariant dispid -2147413082;
    property align: WideString dispid -2147418039;
    procedure refresh; dispid 1015;
    property rows: IHTMLElementCollection readonly dispid 1016;
    property width: OleVariant dispid -2147418107;
    property height: OleVariant dispid -2147418106;
    property dataPageSize: Integer dispid 1017;
    procedure nextPage; dispid 1018;
    procedure previousPage; dispid 1019;
    property tHead: IHTMLTableSection readonly dispid 1020;
    property tFoot: IHTMLTableSection readonly dispid 1021;
    property tBodies: IHTMLElementCollection readonly dispid 1024;
    property caption: IHTMLTableCaption readonly dispid 1025;
    function createTHead: IDispatch; dispid 1026;
    procedure deleteTHead; dispid 1027;
    function createTFoot: IDispatch; dispid 1028;
    procedure deleteTFoot; dispid 1029;
    function createCaption: IHTMLTableCaption; dispid 1030;
    procedure deleteCaption; dispid 1031;
    function insertRow(index: Integer): IDispatch; dispid 1032;
    procedure deleteRow(index: Integer); dispid 1033;
    property readyState: WideString readonly dispid 1034;
    property onreadystatechange: OleVariant dispid -2147412087;
  end;

  IHTMLTableCol = interface(IDispatch)
    ['{3050F23A-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_span(Value: Integer); safecall;
    function Get_span: Integer; safecall;
    procedure Set_width(Value: OleVariant); safecall;
    function Get_width: OleVariant; safecall;
    procedure Set_align(const Value: WideString); safecall;
    function Get_align: WideString; safecall;
    procedure Set_vAlign(const Value: WideString); safecall;
    function Get_vAlign: WideString; safecall;
    property span: Integer read Get_span write Set_span;
    property width: OleVariant read Get_width write Set_width;
    property align: WideString read Get_align write Set_align;
    property vAlign: WideString read Get_vAlign write Set_vAlign;
  end;

{ DispInterface declaration for Dual Interface IHTMLTableCol }

  IHTMLTableColDisp = dispinterface
    ['{3050F23A-98B5-11CF-BB82-00AA00BDCE0B}']
    property span: Integer dispid 1001;
    property width: OleVariant dispid -2147418107;
    property align: WideString dispid -2147418040;
    property vAlign: WideString dispid -2147413081;
  end;

  IHTMLTableRow = interface(IDispatch)
    ['{3050F23C-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_align(const Value: WideString); safecall;
    function Get_align: WideString; safecall;
    procedure Set_vAlign(const Value: WideString); safecall;
    function Get_vAlign: WideString; safecall;
    procedure Set_bgColor(Value: OleVariant); safecall;
    function Get_bgColor: OleVariant; safecall;
    procedure Set_borderColor(Value: OleVariant); safecall;
    function Get_borderColor: OleVariant; safecall;
    procedure Set_borderColorLight(Value: OleVariant); safecall;
    function Get_borderColorLight: OleVariant; safecall;
    procedure Set_borderColorDark(Value: OleVariant); safecall;
    function Get_borderColorDark: OleVariant; safecall;
    function Get_rowIndex: Integer; safecall;
    function Get_sectionRowIndex: Integer; safecall;
    function Get_cells: IHTMLElementCollection; safecall;
    function insertCell(index: Integer): IDispatch; safecall;
    procedure deleteCell(index: Integer); safecall;
    property align: WideString read Get_align write Set_align;
    property vAlign: WideString read Get_vAlign write Set_vAlign;
    property bgColor: OleVariant read Get_bgColor write Set_bgColor;
    property borderColor: OleVariant read Get_borderColor write Set_borderColor;
    property borderColorLight: OleVariant read Get_borderColorLight write Set_borderColorLight;
    property borderColorDark: OleVariant read Get_borderColorDark write Set_borderColorDark;
    property rowIndex: Integer read Get_rowIndex;
    property sectionRowIndex: Integer read Get_sectionRowIndex;
    property cells: IHTMLElementCollection read Get_cells;
  end;

{ DispInterface declaration for Dual Interface IHTMLTableRow }

  IHTMLTableRowDisp = dispinterface
    ['{3050F23C-98B5-11CF-BB82-00AA00BDCE0B}']
    property align: WideString dispid -2147418040;
    property vAlign: WideString dispid -2147413081;
    property bgColor: OleVariant dispid -501;
    property borderColor: OleVariant dispid -2147413084;
    property borderColorLight: OleVariant dispid -2147413083;
    property borderColorDark: OleVariant dispid -2147413082;
    property rowIndex: Integer readonly dispid 1000;
    property sectionRowIndex: Integer readonly dispid 1001;
    property cells: IHTMLElementCollection readonly dispid 1002;
    function insertCell(index: Integer): IDispatch; dispid 1003;
    procedure deleteCell(index: Integer); dispid 1004;
  end;

  IHTMLTableCell = interface(IDispatch)
    ['{3050F23D-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_rowSpan(Value: Integer); safecall;
    function Get_rowSpan: Integer; safecall;
    procedure Set_colSpan(Value: Integer); safecall;
    function Get_colSpan: Integer; safecall;
    procedure Set_align(const Value: WideString); safecall;
    function Get_align: WideString; safecall;
    procedure Set_vAlign(const Value: WideString); safecall;
    function Get_vAlign: WideString; safecall;
    procedure Set_bgColor(Value: OleVariant); safecall;
    function Get_bgColor: OleVariant; safecall;
    procedure Set_noWrap(Value: WordBool); safecall;
    function Get_noWrap: WordBool; safecall;
    procedure Set_background(const Value: WideString); safecall;
    function Get_background: WideString; safecall;
    procedure Set_borderColor(Value: OleVariant); safecall;
    function Get_borderColor: OleVariant; safecall;
    procedure Set_borderColorLight(Value: OleVariant); safecall;
    function Get_borderColorLight: OleVariant; safecall;
    procedure Set_borderColorDark(Value: OleVariant); safecall;
    function Get_borderColorDark: OleVariant; safecall;
    procedure Set_width(Value: OleVariant); safecall;
    function Get_width: OleVariant; safecall;
    procedure Set_height(Value: OleVariant); safecall;
    function Get_height: OleVariant; safecall;
    function Get_cellIndex: Integer; safecall;
    property rowSpan: Integer read Get_rowSpan write Set_rowSpan;
    property colSpan: Integer read Get_colSpan write Set_colSpan;
    property align: WideString read Get_align write Set_align;
    property vAlign: WideString read Get_vAlign write Set_vAlign;
    property bgColor: OleVariant read Get_bgColor write Set_bgColor;
    property noWrap: WordBool read Get_noWrap write Set_noWrap;
    property background: WideString read Get_background write Set_background;
    property borderColor: OleVariant read Get_borderColor write Set_borderColor;
    property borderColorLight: OleVariant read Get_borderColorLight write Set_borderColorLight;
    property borderColorDark: OleVariant read Get_borderColorDark write Set_borderColorDark;
    property width: OleVariant read Get_width write Set_width;
    property height: OleVariant read Get_height write Set_height;
    property cellIndex: Integer read Get_cellIndex;
  end;

{ DispInterface declaration for Dual Interface IHTMLTableCell }

  IHTMLTableCellDisp = dispinterface
    ['{3050F23D-98B5-11CF-BB82-00AA00BDCE0B}']
    property rowSpan: Integer dispid 2001;
    property colSpan: Integer dispid 2002;
    property align: WideString dispid -2147418040;
    property vAlign: WideString dispid -2147413081;
    property bgColor: OleVariant dispid -501;
    property noWrap: WordBool dispid -2147413107;
    property background: WideString dispid -2147413111;
    property borderColor: OleVariant dispid -2147413084;
    property borderColorLight: OleVariant dispid -2147413083;
    property borderColorDark: OleVariant dispid -2147413082;
    property width: OleVariant dispid -2147418107;
    property height: OleVariant dispid -2147418106;
    property cellIndex: Integer readonly dispid 2003;
  end;

  DispIHTMLTable = dispinterface
    ['{3050F532-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    property cols: Integer dispid 1001;
    property border: OleVariant dispid 1002;
    property frame: WideString dispid 1004;
    property rules: WideString dispid 1003;
    property cellSpacing: OleVariant dispid 1005;
    property cellPadding: OleVariant dispid 1006;
    property background: WideString dispid -2147413111;
    property bgColor: OleVariant dispid -501;
    property borderColor: OleVariant dispid -2147413084;
    property borderColorLight: OleVariant dispid -2147413083;
    property borderColorDark: OleVariant dispid -2147413082;
    property align: WideString dispid -2147418039;
    procedure refresh; dispid 1015;
    property rows: IHTMLElementCollection readonly dispid 1016;
    property width: OleVariant dispid -2147418107;
    property height: OleVariant dispid -2147418106;
    property dataPageSize: Integer dispid 1017;
    procedure nextPage; dispid 1018;
    procedure previousPage; dispid 1019;
    property tHead: IHTMLTableSection readonly dispid 1020;
    property tFoot: IHTMLTableSection readonly dispid 1021;
    property tBodies: IHTMLElementCollection readonly dispid 1024;
    property caption: IHTMLTableCaption readonly dispid 1025;
    function createTHead: IDispatch; dispid 1026;
    procedure deleteTHead; dispid 1027;
    function createTFoot: IDispatch; dispid 1028;
    procedure deleteTFoot; dispid 1029;
    function createCaption: IHTMLTableCaption; dispid 1030;
    procedure deleteCaption; dispid 1031;
    function insertRow(index: Integer): IDispatch; dispid 1032;
    procedure deleteRow(index: Integer); dispid 1033;
    property readyState: WideString readonly dispid 1034;
    property onreadystatechange: OleVariant dispid -2147412087;
    property dataFld: WideString dispid -2147417091;
    property dataSrc: WideString dispid -2147417090;
    property dataFormatAs: WideString dispid -2147417089;
  end;

  DispIHTMLTableCol = dispinterface
    ['{3050F533-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property span: Integer dispid 1001;
    property width: OleVariant dispid -2147418107;
    property align: WideString dispid -2147418040;
    property vAlign: WideString dispid -2147413081;
  end;

  DispIHTMLTableSection = dispinterface
    ['{3050F534-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property align: WideString dispid -2147418040;
    property vAlign: WideString dispid -2147413081;
    property bgColor: OleVariant dispid -501;
    property rows: IHTMLElementCollection readonly dispid 1000;
    function insertRow(index: Integer): IDispatch; dispid 1001;
    procedure deleteRow(index: Integer); dispid 1002;
  end;

  DispIHTMLTableRow = dispinterface
    ['{3050F535-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property align: WideString dispid -2147418040;
    property vAlign: WideString dispid -2147413081;
    property bgColor: OleVariant dispid -501;
    property borderColor: OleVariant dispid -2147413084;
    property borderColorLight: OleVariant dispid -2147413083;
    property borderColorDark: OleVariant dispid -2147413082;
    property rowIndex: Integer readonly dispid 1000;
    property sectionRowIndex: Integer readonly dispid 1001;
    property cells: IHTMLElementCollection readonly dispid 1002;
    function insertCell(index: Integer): IDispatch; dispid 1003;
    procedure deleteCell(index: Integer); dispid 1004;
  end;

  DispIHTMLTableCell = dispinterface
    ['{3050F536-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    function createControlRange: IDispatch; dispid 1001;
    property scrollHeight: Integer readonly dispid 1002;
    property scrollWidth: Integer readonly dispid 1003;
    property scrollTop: Integer dispid 1004;
    property scrollLeft: Integer dispid 1005;
    property onscroll: OleVariant dispid -2147412081;
    property rowSpan: Integer dispid 2001;
    property colSpan: Integer dispid 2002;
    property align: WideString dispid -2147418040;
    property vAlign: WideString dispid -2147413081;
    property bgColor: OleVariant dispid -501;
    property noWrap: WordBool dispid -2147413107;
    property background: WideString dispid -2147413111;
    property borderColor: OleVariant dispid -2147413084;
    property borderColorLight: OleVariant dispid -2147413083;
    property borderColorDark: OleVariant dispid -2147413082;
    property width: OleVariant dispid -2147418107;
    property height: OleVariant dispid -2147418106;
    property cellIndex: Integer readonly dispid 2003;
  end;

  HTMLScriptEvents = dispinterface
    ['{3050F3E2-98B5-11CF-BB82-00AA00BDCE0B}']
    function onhelp: WordBool; dispid -2147418102;
    function onclick: WordBool; dispid -600;
    function ondblclick: WordBool; dispid -601;
    function onkeypress: WordBool; dispid -603;
    procedure onkeydown; dispid -602;
    procedure onkeyup; dispid -604;
    procedure onmouseout; dispid -2147418103;
    procedure onmouseover; dispid -2147418104;
    procedure onmousemove; dispid -606;
    procedure onmousedown; dispid -605;
    procedure onmouseup; dispid -607;
    function onselectstart: WordBool; dispid -2147418100;
    procedure onfilterchange; dispid -2147418095;
    function ondragstart: WordBool; dispid -2147418101;
    function onbeforeupdate: WordBool; dispid -2147418108;
    procedure onafterupdate; dispid -2147418107;
    function onerrorupdate: WordBool; dispid -2147418099;
    function onrowexit: WordBool; dispid -2147418106;
    procedure onrowenter; dispid -2147418105;
    procedure ondatasetchanged; dispid -2147418098;
    procedure ondataavailable; dispid -2147418097;
    procedure ondatasetcomplete; dispid -2147418096;
    procedure onreadystatechange(lReadyState: Integer); dispid -609;
    procedure onerror; dispid 1002;
  end;

  IHTMLScriptElement = interface(IDispatch)
    ['{3050F28B-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_src(const Value: WideString); safecall;
    function Get_src: WideString; safecall;
    procedure Set_htmlFor(const Value: WideString); safecall;
    function Get_htmlFor: WideString; safecall;
    procedure Set_event(const Value: WideString); safecall;
    function Get_event: WideString; safecall;
    procedure Set_text(const Value: WideString); safecall;
    function Get_text: WideString; safecall;
    procedure Set_defer(Value: WordBool); safecall;
    function Get_defer: WordBool; safecall;
    function Get_readyState: WideString; safecall;
    procedure Set_onerror(Value: OleVariant); safecall;
    function Get_onerror: OleVariant; safecall;
    procedure Set_type_(const Value: WideString); safecall;
    function Get_type_: WideString; safecall;
    property src: WideString read Get_src write Set_src;
    property htmlFor: WideString read Get_htmlFor write Set_htmlFor;
    property event: WideString read Get_event write Set_event;
    property text: WideString read Get_text write Set_text;
    property defer: WordBool read Get_defer write Set_defer;
    property readyState: WideString read Get_readyState;
    property onerror: OleVariant read Get_onerror write Set_onerror;
    property type_: WideString read Get_type_ write Set_type_;
  end;

{ DispInterface declaration for Dual Interface IHTMLScriptElement }

  IHTMLScriptElementDisp = dispinterface
    ['{3050F28B-98B5-11CF-BB82-00AA00BDCE0B}']
    property src: WideString dispid 1001;
    property htmlFor: WideString dispid 1004;
    property event: WideString dispid 1005;
    property text: WideString dispid 1006;
    property defer: WordBool dispid 1007;
    property readyState: WideString readonly dispid 1008;
    property onerror: OleVariant dispid -2147412083;
    property type_: WideString dispid 1009;
  end;

  DispIHTMLScriptElement = dispinterface
    ['{3050F530-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property src: WideString dispid 1001;
    property htmlFor: WideString dispid 1004;
    property event: WideString dispid 1005;
    property text: WideString dispid 1006;
    property defer: WordBool dispid 1007;
    property readyState: WideString readonly dispid 1008;
    property onerror: OleVariant dispid -2147412083;
    property type_: WideString dispid 1009;
  end;

  IHTMLNoShowElement = interface(IDispatch)
    ['{3050F38A-98B5-11CF-BB82-00AA00BDCE0B}']
  end;

{ DispInterface declaration for Dual Interface IHTMLNoShowElement }

  IHTMLNoShowElementDisp = dispinterface
    ['{3050F38A-98B5-11CF-BB82-00AA00BDCE0B}']
  end;

  DispIHTMLNoShowElement = dispinterface
    ['{3050F528-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
  end;

  HTMLObjectElementEvents = dispinterface
    ['{3050F3C4-98B5-11CF-BB82-00AA00BDCE0B}']
    function onbeforeupdate: WordBool; dispid -2147418108;
    procedure onafterupdate; dispid -2147418107;
    function onerrorupdate: WordBool; dispid -2147418099;
    function onrowexit: WordBool; dispid -2147418106;
    procedure onrowenter; dispid -2147418105;
    procedure ondatasetchanged; dispid -2147418098;
    procedure ondataavailable; dispid -2147418097;
    procedure ondatasetcomplete; dispid -2147418096;
    procedure onreadystatechange; dispid -2147418094;
    function onerror: WordBool; dispid -2147418093;
  end;

  IHTMLObjectElement = interface(IDispatch)
    ['{3050F24F-98B5-11CF-BB82-00AA00BDCE0B}']
    function Get_object_: IDispatch; safecall;
    function Get_classid: WideString; safecall;
    function Get_data: WideString; safecall;
    procedure Set_recordset(var Value: IDispatch); safecall;
    function Get_recordset: IDispatch; safecall;
    procedure Set_align(const Value: WideString); safecall;
    function Get_align: WideString; safecall;
    procedure Set_name(const Value: WideString); safecall;
    function Get_name: WideString; safecall;
    procedure Set_codeBase(const Value: WideString); safecall;
    function Get_codeBase: WideString; safecall;
    procedure Set_codeType(const Value: WideString); safecall;
    function Get_codeType: WideString; safecall;
    procedure Set_code(const Value: WideString); safecall;
    function Get_code: WideString; safecall;
    function Get_BaseHref: WideString; safecall;
    procedure Set_type_(const Value: WideString); safecall;
    function Get_type_: WideString; safecall;
    function Get_form: IHTMLFormElement; safecall;
    procedure Set_width(Value: OleVariant); safecall;
    function Get_width: OleVariant; safecall;
    procedure Set_height(Value: OleVariant); safecall;
    function Get_height: OleVariant; safecall;
    function Get_readyState: Integer; safecall;
    procedure Set_onreadystatechange(Value: OleVariant); safecall;
    function Get_onreadystatechange: OleVariant; safecall;
    procedure Set_onerror(Value: OleVariant); safecall;
    function Get_onerror: OleVariant; safecall;
    procedure Set_altHtml(const Value: WideString); safecall;
    function Get_altHtml: WideString; safecall;
    procedure Set_vspace(Value: Integer); safecall;
    function Get_vspace: Integer; safecall;
    procedure Set_hspace(Value: Integer); safecall;
    function Get_hspace: Integer; safecall;
    property object_: IDispatch read Get_object_;
    property classid: WideString read Get_classid;
    property data: WideString read Get_data;
    property recordset: IDispatch read Get_recordset write Set_recordset;
    property align: WideString read Get_align write Set_align;
    property name: WideString read Get_name write Set_name;
    property codeBase: WideString read Get_codeBase write Set_codeBase;
    property codeType: WideString read Get_codeType write Set_codeType;
    property code: WideString read Get_code write Set_code;
    property BaseHref: WideString read Get_BaseHref;
    property type_: WideString read Get_type_ write Set_type_;
    property form: IHTMLFormElement read Get_form;
    property width: OleVariant read Get_width write Set_width;
    property height: OleVariant read Get_height write Set_height;
    property readyState: Integer read Get_readyState;
    property onreadystatechange: OleVariant read Get_onreadystatechange write Set_onreadystatechange;
    property onerror: OleVariant read Get_onerror write Set_onerror;
    property altHtml: WideString read Get_altHtml write Set_altHtml;
    property vspace: Integer read Get_vspace write Set_vspace;
    property hspace: Integer read Get_hspace write Set_hspace;
  end;

{ DispInterface declaration for Dual Interface IHTMLObjectElement }

  IHTMLObjectElementDisp = dispinterface
    ['{3050F24F-98B5-11CF-BB82-00AA00BDCE0B}']
    property object_: IDispatch readonly dispid -2147415111;
    property classid: WideString readonly dispid -2147415110;
    property data: WideString readonly dispid -2147415109;
    property recordset: IDispatch dispid -2147415107;
    property align: WideString dispid -2147418039;
    property name: WideString dispid -2147418112;
    property codeBase: WideString dispid -2147415106;
    property codeType: WideString dispid -2147415105;
    property code: WideString dispid -2147415104;
    property BaseHref: WideString readonly dispid -2147418110;
    property type_: WideString dispid -2147415103;
    property form: IHTMLFormElement readonly dispid -2147416108;
    property width: OleVariant dispid -2147418107;
    property height: OleVariant dispid -2147418106;
    property readyState: Integer readonly dispid -2147415102;
    property onreadystatechange: OleVariant dispid -2147412087;
    property onerror: OleVariant dispid -2147412083;
    property altHtml: WideString dispid -2147415101;
    property vspace: Integer dispid -2147415100;
    property hspace: Integer dispid -2147415099;
  end;

  DispIHTMLObjectElement = dispinterface
    ['{3050F529-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    property object_: IDispatch readonly dispid -2147415111;
    property classid: WideString readonly dispid -2147415110;
    property data: WideString readonly dispid -2147415109;
    property recordset: IDispatch dispid -2147415107;
    property align: WideString dispid -2147418039;
    property name: WideString dispid -2147418112;
    property codeBase: WideString dispid -2147415106;
    property codeType: WideString dispid -2147415105;
    property code: WideString dispid -2147415104;
    property BaseHref: WideString readonly dispid -2147418110;
    property type_: WideString dispid -2147415103;
    property form: IHTMLFormElement readonly dispid -2147416108;
    property width: OleVariant dispid -2147418107;
    property height: OleVariant dispid -2147418106;
    property readyState: Integer readonly dispid -2147415102;
    property onreadystatechange: OleVariant dispid -2147412087;
    property onerror: OleVariant dispid -2147412083;
    property altHtml: WideString dispid -2147415101;
    property vspace: Integer dispid -2147415100;
    property hspace: Integer dispid -2147415099;
    property dataFld: WideString dispid -2147417091;
    property dataSrc: WideString dispid -2147417090;
    property dataFormatAs: WideString dispid -2147417089;
  end;

  IHTMLFrameBase = interface(IDispatch)
    ['{3050F311-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_src(const Value: WideString); safecall;
    function Get_src: WideString; safecall;
    procedure Set_name(const Value: WideString); safecall;
    function Get_name: WideString; safecall;
    procedure Set_border(Value: OleVariant); safecall;
    function Get_border: OleVariant; safecall;
    procedure Set_frameBorder(const Value: WideString); safecall;
    function Get_frameBorder: WideString; safecall;
    procedure Set_frameSpacing(Value: OleVariant); safecall;
    function Get_frameSpacing: OleVariant; safecall;
    procedure Set_marginWidth(Value: OleVariant); safecall;
    function Get_marginWidth: OleVariant; safecall;
    procedure Set_marginHeight(Value: OleVariant); safecall;
    function Get_marginHeight: OleVariant; safecall;
    procedure Set_noResize(Value: WordBool); safecall;
    function Get_noResize: WordBool; safecall;
    procedure Set_scrolling(const Value: WideString); safecall;
    function Get_scrolling: WideString; safecall;
    property src: WideString read Get_src write Set_src;
    property name: WideString read Get_name write Set_name;
    property border: OleVariant read Get_border write Set_border;
    property frameBorder: WideString read Get_frameBorder write Set_frameBorder;
    property frameSpacing: OleVariant read Get_frameSpacing write Set_frameSpacing;
    property marginWidth: OleVariant read Get_marginWidth write Set_marginWidth;
    property marginHeight: OleVariant read Get_marginHeight write Set_marginHeight;
    property noResize: WordBool read Get_noResize write Set_noResize;
    property scrolling: WideString read Get_scrolling write Set_scrolling;
  end;

{ DispInterface declaration for Dual Interface IHTMLFrameBase }

  IHTMLFrameBaseDisp = dispinterface
    ['{3050F311-98B5-11CF-BB82-00AA00BDCE0B}']
    property src: WideString dispid -2147415112;
    property name: WideString dispid -2147418112;
    property border: OleVariant dispid -2147415110;
    property frameBorder: WideString dispid -2147415109;
    property frameSpacing: OleVariant dispid -2147415108;
    property marginWidth: OleVariant dispid -2147415107;
    property marginHeight: OleVariant dispid -2147415106;
    property noResize: WordBool dispid -2147415105;
    property scrolling: WideString dispid -2147415104;
  end;

  DispIHTMLFrameBase = dispinterface
    ['{3050F541-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    property src: WideString dispid -2147415112;
    property name: WideString dispid -2147418112;
    property border: OleVariant dispid -2147415110;
    property frameBorder: WideString dispid -2147415109;
    property frameSpacing: OleVariant dispid -2147415108;
    property marginWidth: OleVariant dispid -2147415107;
    property marginHeight: OleVariant dispid -2147415106;
    property noResize: WordBool dispid -2147415105;
    property scrolling: WideString dispid -2147415104;
  end;

  IHTMLFrameElement = interface(IDispatch)
    ['{3050F313-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_borderColor(Value: OleVariant); safecall;
    function Get_borderColor: OleVariant; safecall;
    property borderColor: OleVariant read Get_borderColor write Set_borderColor;
  end;

{ DispInterface declaration for Dual Interface IHTMLFrameElement }

  IHTMLFrameElementDisp = dispinterface
    ['{3050F313-98B5-11CF-BB82-00AA00BDCE0B}']
    property borderColor: OleVariant dispid -2147414111;
  end;

  DispIHTMLFrameElement = dispinterface
    ['{3050F513-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    property src: WideString dispid -2147415112;
    property name: WideString dispid -2147418112;
    property border: OleVariant dispid -2147415110;
    property frameBorder: WideString dispid -2147415109;
    property frameSpacing: OleVariant dispid -2147415108;
    property marginWidth: OleVariant dispid -2147415107;
    property marginHeight: OleVariant dispid -2147415106;
    property noResize: WordBool dispid -2147415105;
    property scrolling: WideString dispid -2147415104;
    property borderColor: OleVariant dispid -2147414111;
    property dataFld: WideString dispid -2147417091;
    property dataSrc: WideString dispid -2147417090;
    property dataFormatAs: WideString dispid -2147417089;
  end;

  IHTMLIFrameElement = interface(IDispatch)
    ['{3050F315-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_vspace(Value: Integer); safecall;
    function Get_vspace: Integer; safecall;
    procedure Set_hspace(Value: Integer); safecall;
    function Get_hspace: Integer; safecall;
    procedure Set_align(const Value: WideString); safecall;
    function Get_align: WideString; safecall;
    property vspace: Integer read Get_vspace write Set_vspace;
    property hspace: Integer read Get_hspace write Set_hspace;
    property align: WideString read Get_align write Set_align;
  end;

{ DispInterface declaration for Dual Interface IHTMLIFrameElement }

  IHTMLIFrameElementDisp = dispinterface
    ['{3050F315-98B5-11CF-BB82-00AA00BDCE0B}']
    property vspace: Integer dispid -2147414111;
    property hspace: Integer dispid -2147414110;
    property align: WideString dispid -2147418039;
  end;

  DispIHTMLIFrameElement = dispinterface
    ['{3050F51B-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    property src: WideString dispid -2147415112;
    property name: WideString dispid -2147418112;
    property border: OleVariant dispid -2147415110;
    property frameBorder: WideString dispid -2147415109;
    property frameSpacing: OleVariant dispid -2147415108;
    property marginWidth: OleVariant dispid -2147415107;
    property marginHeight: OleVariant dispid -2147415106;
    property noResize: WordBool dispid -2147415105;
    property scrolling: WideString dispid -2147415104;
    property vspace: Integer dispid -2147414111;
    property hspace: Integer dispid -2147414110;
    property align: WideString dispid -2147418039;
    property dataFld: WideString dispid -2147417091;
    property dataSrc: WideString dispid -2147417090;
    property dataFormatAs: WideString dispid -2147417089;
  end;

  IHTMLDivPosition = interface(IDispatch)
    ['{3050F212-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_align(const Value: WideString); safecall;
    function Get_align: WideString; safecall;
    property align: WideString read Get_align write Set_align;
  end;

{ DispInterface declaration for Dual Interface IHTMLDivPosition }

  IHTMLDivPositionDisp = dispinterface
    ['{3050F212-98B5-11CF-BB82-00AA00BDCE0B}']
    property align: WideString dispid -2147418039;
  end;

  IHTMLFieldSetElement = interface(IDispatch)
    ['{3050F3E7-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_align(const Value: WideString); safecall;
    function Get_align: WideString; safecall;
    property align: WideString read Get_align write Set_align;
  end;

{ DispInterface declaration for Dual Interface IHTMLFieldSetElement }

  IHTMLFieldSetElementDisp = dispinterface
    ['{3050F3E7-98B5-11CF-BB82-00AA00BDCE0B}']
    property align: WideString dispid -2147418039;
  end;

  IHTMLLegendElement = interface(IDispatch)
    ['{3050F3EA-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_align(const Value: WideString); safecall;
    function Get_align: WideString; safecall;
    property align: WideString read Get_align write Set_align;
  end;

{ DispInterface declaration for Dual Interface IHTMLLegendElement }

  IHTMLLegendElementDisp = dispinterface
    ['{3050F3EA-98B5-11CF-BB82-00AA00BDCE0B}']
    property align: WideString dispid -2147418039;
  end;

  DispIHTMLDivPosition = dispinterface
    ['{3050F50F-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    function createControlRange: IDispatch; dispid 1001;
    property scrollHeight: Integer readonly dispid 1002;
    property scrollWidth: Integer readonly dispid 1003;
    property scrollTop: Integer dispid 1004;
    property scrollLeft: Integer dispid 1005;
    property onscroll: OleVariant dispid -2147412081;
    property align: WideString dispid -2147418039;
    property dataFld: WideString dispid -2147417091;
    property dataSrc: WideString dispid -2147417090;
    property dataFormatAs: WideString dispid -2147417089;
  end;

  DispIHTMLFieldSetElement = dispinterface
    ['{3050F545-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    function createControlRange: IDispatch; dispid 1001;
    property scrollHeight: Integer readonly dispid 1002;
    property scrollWidth: Integer readonly dispid 1003;
    property scrollTop: Integer dispid 1004;
    property scrollLeft: Integer dispid 1005;
    property onscroll: OleVariant dispid -2147412081;
    property align: WideString dispid -2147418039;
  end;

  DispIHTMLLegendElement = dispinterface
    ['{3050F546-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    function createControlRange: IDispatch; dispid 1001;
    property scrollHeight: Integer readonly dispid 1002;
    property scrollWidth: Integer readonly dispid 1003;
    property scrollTop: Integer dispid 1004;
    property scrollLeft: Integer dispid 1005;
    property onscroll: OleVariant dispid -2147412081;
    property align: WideString dispid -2147418039;
  end;

  IHTMLSpanFlow = interface(IDispatch)
    ['{3050F3E5-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_align(const Value: WideString); safecall;
    function Get_align: WideString; safecall;
    property align: WideString read Get_align write Set_align;
  end;

{ DispInterface declaration for Dual Interface IHTMLSpanFlow }

  IHTMLSpanFlowDisp = dispinterface
    ['{3050F3E5-98B5-11CF-BB82-00AA00BDCE0B}']
    property align: WideString dispid -2147418039;
  end;

  DispIHTMLSpanFlow = dispinterface
    ['{3050F544-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    function createControlRange: IDispatch; dispid 1001;
    property scrollHeight: Integer readonly dispid 1002;
    property scrollWidth: Integer readonly dispid 1003;
    property scrollTop: Integer dispid 1004;
    property scrollLeft: Integer dispid 1005;
    property onscroll: OleVariant dispid -2147412081;
    property align: WideString dispid -2147418039;
    property dataFld: WideString dispid -2147417091;
    property dataSrc: WideString dispid -2147417090;
    property dataFormatAs: WideString dispid -2147417089;
  end;

  IHTMLFrameSetElement = interface(IDispatch)
    ['{3050F319-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_rows(const Value: WideString); safecall;
    function Get_rows: WideString; safecall;
    procedure Set_cols(const Value: WideString); safecall;
    function Get_cols: WideString; safecall;
    procedure Set_border(Value: OleVariant); safecall;
    function Get_border: OleVariant; safecall;
    procedure Set_borderColor(Value: OleVariant); safecall;
    function Get_borderColor: OleVariant; safecall;
    procedure Set_frameBorder(const Value: WideString); safecall;
    function Get_frameBorder: WideString; safecall;
    procedure Set_frameSpacing(Value: OleVariant); safecall;
    function Get_frameSpacing: OleVariant; safecall;
    procedure Set_name(const Value: WideString); safecall;
    function Get_name: WideString; safecall;
    procedure Set_onload(Value: OleVariant); safecall;
    function Get_onload: OleVariant; safecall;
    procedure Set_onunload(Value: OleVariant); safecall;
    function Get_onunload: OleVariant; safecall;
    procedure Set_onbeforeunload(Value: OleVariant); safecall;
    function Get_onbeforeunload: OleVariant; safecall;
    property rows: WideString read Get_rows write Set_rows;
    property cols: WideString read Get_cols write Set_cols;
    property border: OleVariant read Get_border write Set_border;
    property borderColor: OleVariant read Get_borderColor write Set_borderColor;
    property frameBorder: WideString read Get_frameBorder write Set_frameBorder;
    property frameSpacing: OleVariant read Get_frameSpacing write Set_frameSpacing;
    property name: WideString read Get_name write Set_name;
    property onload: OleVariant read Get_onload write Set_onload;
    property onunload: OleVariant read Get_onunload write Set_onunload;
    property onbeforeunload: OleVariant read Get_onbeforeunload write Set_onbeforeunload;
  end;

{ DispInterface declaration for Dual Interface IHTMLFrameSetElement }

  IHTMLFrameSetElementDisp = dispinterface
    ['{3050F319-98B5-11CF-BB82-00AA00BDCE0B}']
    property rows: WideString dispid 1000;
    property cols: WideString dispid 1001;
    property border: OleVariant dispid 1002;
    property borderColor: OleVariant dispid 1003;
    property frameBorder: WideString dispid 1004;
    property frameSpacing: OleVariant dispid 1005;
    property name: WideString dispid -2147418112;
    property onload: OleVariant dispid -2147412080;
    property onunload: OleVariant dispid -2147412079;
    property onbeforeunload: OleVariant dispid -2147412073;
  end;

  DispIHTMLFrameSetElement = dispinterface
    ['{3050F514-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property tabIndex: Smallint dispid -2147418097;
    procedure focus; dispid -2147416112;
    property accessKey: WideString dispid -2147416107;
    property onblur: OleVariant dispid -2147412097;
    property onfocus: OleVariant dispid -2147412098;
    property onresize: OleVariant dispid -2147412076;
    procedure blur; dispid -2147416110;
    procedure addFilter(pUnk: IUnknown); dispid -2147416095;
    procedure removeFilter(pUnk: IUnknown); dispid -2147416094;
    property clientHeight: Integer readonly dispid -2147416093;
    property clientWidth: Integer readonly dispid -2147416092;
    property clientTop: Integer readonly dispid -2147416091;
    property clientLeft: Integer readonly dispid -2147416090;
    property rows: WideString dispid 1000;
    property cols: WideString dispid 1001;
    property border: OleVariant dispid 1002;
    property borderColor: OleVariant dispid 1003;
    property frameBorder: WideString dispid 1004;
    property frameSpacing: OleVariant dispid 1005;
    property name: WideString dispid -2147418112;
    property onload: OleVariant dispid -2147412080;
    property onunload: OleVariant dispid -2147412079;
    property onbeforeunload: OleVariant dispid -2147412073;
  end;

  IHTMLBGsound = interface(IDispatch)
    ['{3050F369-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_src(const Value: WideString); safecall;
    function Get_src: WideString; safecall;
    procedure Set_loop(Value: OleVariant); safecall;
    function Get_loop: OleVariant; safecall;
    procedure Set_volume(Value: OleVariant); safecall;
    function Get_volume: OleVariant; safecall;
    procedure Set_balance(Value: OleVariant); safecall;
    function Get_balance: OleVariant; safecall;
    property src: WideString read Get_src write Set_src;
    property loop: OleVariant read Get_loop write Set_loop;
    property volume: OleVariant read Get_volume write Set_volume;
    property balance: OleVariant read Get_balance write Set_balance;
  end;

{ DispInterface declaration for Dual Interface IHTMLBGsound }

  IHTMLBGsoundDisp = dispinterface
    ['{3050F369-98B5-11CF-BB82-00AA00BDCE0B}']
    property src: WideString dispid 1001;
    property loop: OleVariant dispid 1002;
    property volume: OleVariant dispid 1003;
    property balance: OleVariant dispid 1004;
  end;

  DispIHTMLBGsound = dispinterface
    ['{3050F53C-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property src: WideString dispid 1001;
    property loop: OleVariant dispid 1002;
    property volume: OleVariant dispid 1003;
    property balance: OleVariant dispid 1004;
  end;

  IHTMLFontNamesCollection = interface(IDispatch)
    ['{3050F376-98B5-11CF-BB82-00AA00BDCE0B}']
    function Get_length: Integer; safecall;
    function Get__newEnum: IUnknown; safecall;
    function item(index: Integer): WideString; safecall;
    property length: Integer read Get_length;
    property _newEnum: IUnknown read Get__newEnum;
  end;

{ DispInterface declaration for Dual Interface IHTMLFontNamesCollection }

  IHTMLFontNamesCollectionDisp = dispinterface
    ['{3050F376-98B5-11CF-BB82-00AA00BDCE0B}']
    property length: Integer readonly dispid 1501;
    function item(index: Integer): WideString; dispid 0;
  end;

  IHTMLFontSizesCollection = interface(IDispatch)
    ['{3050F377-98B5-11CF-BB82-00AA00BDCE0B}']
    function Get_length: Integer; safecall;
    function Get__newEnum: IUnknown; safecall;
    function Get_forFont: WideString; safecall;
    function item(index: Integer): Integer; safecall;
    property length: Integer read Get_length;
    property _newEnum: IUnknown read Get__newEnum;
    property forFont: WideString read Get_forFont;
  end;

{ DispInterface declaration for Dual Interface IHTMLFontSizesCollection }

  IHTMLFontSizesCollectionDisp = dispinterface
    ['{3050F377-98B5-11CF-BB82-00AA00BDCE0B}']
    property length: Integer readonly dispid 1502;
    property forFont: WideString readonly dispid 1503;
    function item(index: Integer): Integer; dispid 0;
  end;

  IHTMLOptionsHolder = interface(IDispatch)
    ['{3050F378-98B5-11CF-BB82-00AA00BDCE0B}']
    function Get_document: IHTMLDocument2; safecall;
    function Get_fonts: IHTMLFontNamesCollection; safecall;
    procedure Set_execArg(Value: OleVariant); safecall;
    function Get_execArg: OleVariant; safecall;
    procedure Set_errorLine(Value: Integer); safecall;
    function Get_errorLine: Integer; safecall;
    procedure Set_errorCharacter(Value: Integer); safecall;
    function Get_errorCharacter: Integer; safecall;
    procedure Set_errorCode(Value: Integer); safecall;
    function Get_errorCode: Integer; safecall;
    procedure Set_errorMessage(const Value: WideString); safecall;
    function Get_errorMessage: WideString; safecall;
    procedure Set_errorDebug(Value: WordBool); safecall;
    function Get_errorDebug: WordBool; safecall;
    function Get_unsecuredWindowOfDocument: IHTMLWindow2; safecall;
    procedure Set_findText(const Value: WideString); safecall;
    function Get_findText: WideString; safecall;
    procedure Set_anythingAfterFrameset(Value: WordBool); safecall;
    function Get_anythingAfterFrameset: WordBool; safecall;
    function sizes(const fontName: WideString): IHTMLFontSizesCollection; safecall;
    function openfiledlg(initFile, initDir, filter, title: OleVariant): WideString; safecall;
    function savefiledlg(initFile, initDir, filter, title: OleVariant): WideString; safecall;
    function choosecolordlg(initColor: OleVariant): Integer; safecall;
    procedure showSecurityInfo; safecall;
    function isApartmentModel(const object_: IHTMLObjectElement): WordBool; safecall;
    function getCharset(const fontName: WideString): Integer; safecall;
    property document: IHTMLDocument2 read Get_document;
    property fonts: IHTMLFontNamesCollection read Get_fonts;
    property execArg: OleVariant read Get_execArg write Set_execArg;
    property errorLine: Integer read Get_errorLine write Set_errorLine;
    property errorCharacter: Integer read Get_errorCharacter write Set_errorCharacter;
    property errorCode: Integer read Get_errorCode write Set_errorCode;
    property errorMessage: WideString read Get_errorMessage write Set_errorMessage;
    property errorDebug: WordBool read Get_errorDebug write Set_errorDebug;
    property unsecuredWindowOfDocument: IHTMLWindow2 read Get_unsecuredWindowOfDocument;
    property findText: WideString read Get_findText write Set_findText;
    property anythingAfterFrameset: WordBool read Get_anythingAfterFrameset write Set_anythingAfterFrameset;
  end;

{ DispInterface declaration for Dual Interface IHTMLOptionsHolder }

  IHTMLOptionsHolderDisp = dispinterface
    ['{3050F378-98B5-11CF-BB82-00AA00BDCE0B}']
    property document: IHTMLDocument2 readonly dispid 1503;
    property fonts: IHTMLFontNamesCollection readonly dispid 1504;
    property execArg: OleVariant dispid 1505;
    property errorLine: Integer dispid 1506;
    property errorCharacter: Integer dispid 1507;
    property errorCode: Integer dispid 1508;
    property errorMessage: WideString dispid 1509;
    property errorDebug: WordBool dispid 1510;
    property unsecuredWindowOfDocument: IHTMLWindow2 readonly dispid 1511;
    property findText: WideString dispid 1512;
    property anythingAfterFrameset: WordBool dispid 1513;
    function sizes(const fontName: WideString): IHTMLFontSizesCollection; dispid 1514;
    function openfiledlg(initFile, initDir, filter, title: OleVariant): WideString; dispid 1515;
    function savefiledlg(initFile, initDir, filter, title: OleVariant): WideString; dispid 1516;
    function choosecolordlg(initColor: OleVariant): Integer; dispid 1517;
    procedure showSecurityInfo; dispid 1518;
    function isApartmentModel(const object_: IHTMLObjectElement): WordBool; dispid 1519;
    function getCharset(const fontName: WideString): Integer; dispid 1520;
  end;

  HTMLStyleElementEvents = dispinterface
    ['{3050F3CB-98B5-11CF-BB82-00AA00BDCE0B}']
    function onhelp: WordBool; dispid -2147418102;
    function onclick: WordBool; dispid -600;
    function ondblclick: WordBool; dispid -601;
    function onkeypress: WordBool; dispid -603;
    procedure onkeydown; dispid -602;
    procedure onkeyup; dispid -604;
    procedure onmouseout; dispid -2147418103;
    procedure onmouseover; dispid -2147418104;
    procedure onmousemove; dispid -606;
    procedure onmousedown; dispid -605;
    procedure onmouseup; dispid -607;
    function onselectstart: WordBool; dispid -2147418100;
    procedure onfilterchange; dispid -2147418095;
    function ondragstart: WordBool; dispid -2147418101;
    function onbeforeupdate: WordBool; dispid -2147418108;
    procedure onafterupdate; dispid -2147418107;
    function onerrorupdate: WordBool; dispid -2147418099;
    function onrowexit: WordBool; dispid -2147418106;
    procedure onrowenter; dispid -2147418105;
    procedure ondatasetchanged; dispid -2147418098;
    procedure ondataavailable; dispid -2147418097;
    procedure ondatasetcomplete; dispid -2147418096;
    procedure onreadystatechange; dispid -609;
    procedure onload; dispid 1003;
    procedure onerror; dispid 1002;
  end;

  IHTMLStyleElement = interface(IDispatch)
    ['{3050F375-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_type_(const Value: WideString); safecall;
    function Get_type_: WideString; safecall;
    function Get_readyState: WideString; safecall;
    procedure Set_onreadystatechange(Value: OleVariant); safecall;
    function Get_onreadystatechange: OleVariant; safecall;
    procedure Set_onload(Value: OleVariant); safecall;
    function Get_onload: OleVariant; safecall;
    procedure Set_onerror(Value: OleVariant); safecall;
    function Get_onerror: OleVariant; safecall;
    function Get_styleSheet: IHTMLStyleSheet; safecall;
    procedure Set_disabled(Value: WordBool); safecall;
    function Get_disabled: WordBool; safecall;
    procedure Set_media(const Value: WideString); safecall;
    function Get_media: WideString; safecall;
    property type_: WideString read Get_type_ write Set_type_;
    property readyState: WideString read Get_readyState;
    property onreadystatechange: OleVariant read Get_onreadystatechange write Set_onreadystatechange;
    property onload: OleVariant read Get_onload write Set_onload;
    property onerror: OleVariant read Get_onerror write Set_onerror;
    property styleSheet: IHTMLStyleSheet read Get_styleSheet;
    property disabled: WordBool read Get_disabled write Set_disabled;
    property media: WideString read Get_media write Set_media;
  end;

{ DispInterface declaration for Dual Interface IHTMLStyleElement }

  IHTMLStyleElementDisp = dispinterface
    ['{3050F375-98B5-11CF-BB82-00AA00BDCE0B}']
    property type_: WideString dispid 1002;
    property readyState: WideString readonly dispid 1003;
    property onreadystatechange: OleVariant dispid -2147412087;
    property onload: OleVariant dispid -2147412080;
    property onerror: OleVariant dispid -2147412083;
    property styleSheet: IHTMLStyleSheet readonly dispid 1004;
    property disabled: WordBool dispid 1005;
    property media: WideString dispid 1006;
  end;

  DispIHTMLStyleElement = dispinterface
    ['{3050F511-98B5-11CF-BB82-00AA00BDCE0B}']
    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;
    property className: WideString dispid -2147417111;
    property id: WideString dispid -2147417110;
    property tagName: WideString readonly dispid -2147417108;
    property parentElement: IHTMLElement readonly dispid -2147418104;
    property style: IHTMLStyle readonly dispid -2147418038;
    property onhelp: OleVariant dispid -2147412099;
    property onclick: OleVariant dispid -2147412104;
    property ondblclick: OleVariant dispid -2147412103;
    property onkeydown: OleVariant dispid -2147412107;
    property onkeyup: OleVariant dispid -2147412106;
    property onkeypress: OleVariant dispid -2147412105;
    property onmouseout: OleVariant dispid -2147412111;
    property onmouseover: OleVariant dispid -2147412112;
    property onmousemove: OleVariant dispid -2147412108;
    property onmousedown: OleVariant dispid -2147412110;
    property onmouseup: OleVariant dispid -2147412109;
    property document: IDispatch readonly dispid -2147417094;
    property title: WideString dispid -2147418043;
    property language: WideString dispid -2147413012;
    property onselectstart: OleVariant dispid -2147412075;
    procedure scrollIntoView(varargStart: OleVariant); dispid -2147417093;
    function contains(const pChild: IHTMLElement): WordBool; dispid -2147417092;
    property sourceIndex: Integer readonly dispid -2147417088;
    property recordNumber: OleVariant readonly dispid -2147417087;
    property lang: WideString dispid -2147413103;
    property offsetLeft: Integer readonly dispid -2147417104;
    property offsetTop: Integer readonly dispid -2147417103;
    property offsetWidth: Integer readonly dispid -2147417102;
    property offsetHeight: Integer readonly dispid -2147417101;
    property offsetParent: IHTMLElement readonly dispid -2147417100;
    property innerHTML: WideString dispid -2147417086;
    property innerText: WideString dispid -2147417085;
    property outerHTML: WideString dispid -2147417084;
    property outerText: WideString dispid -2147417083;
    procedure insertAdjacentHTML(const where, html: WideString); dispid -2147417082;
    procedure insertAdjacentText(const where, text: WideString); dispid -2147417081;
    property parentTextEdit: IHTMLElement readonly dispid -2147417080;
    property isTextEdit: WordBool readonly dispid -2147417078;
    procedure click; dispid -2147417079;
    property filters: IHTMLFiltersCollection readonly dispid -2147417077;
    property ondragstart: OleVariant dispid -2147412077;
    function toString: WideString; dispid -2147417076;
    property onbeforeupdate: OleVariant dispid -2147412091;
    property onafterupdate: OleVariant dispid -2147412090;
    property onerrorupdate: OleVariant dispid -2147412074;
    property onrowexit: OleVariant dispid -2147412094;
    property onrowenter: OleVariant dispid -2147412093;
    property ondatasetchanged: OleVariant dispid -2147412072;
    property ondataavailable: OleVariant dispid -2147412071;
    property ondatasetcomplete: OleVariant dispid -2147412070;
    property onfilterchange: OleVariant dispid -2147412069;
    property children: IDispatch readonly dispid -2147417075;
    property all: IDispatch readonly dispid -2147417074;
    property type_: WideString dispid 1002;
    property readyState: WideString readonly dispid 1003;
    property onreadystatechange: OleVariant dispid -2147412087;
    property onload: OleVariant dispid -2147412080;
    property onerror: OleVariant dispid -2147412083;
    property styleSheet: IHTMLStyleSheet readonly dispid 1004;
    property disabled: WordBool dispid 1005;
    property media: WideString dispid 1006;
  end;

  IHTMLStyleFontFace = interface(IDispatch)
    ['{3050F3D5-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_fontsrc(const Value: WideString); safecall;
    function Get_fontsrc: WideString; safecall;
    property fontsrc: WideString read Get_fontsrc write Set_fontsrc;
  end;

{ DispInterface declaration for Dual Interface IHTMLStyleFontFace }

  IHTMLStyleFontFaceDisp = dispinterface
    ['{3050F3D5-98B5-11CF-BB82-00AA00BDCE0B}']
    property fontsrc: WideString dispid -2147413015;
  end;

  IHTMLDialog = interface(IDispatch)
    ['{3050F216-98B5-11CF-BB82-00AA00BDCE0B}']
    procedure Set_dialogTop(Value: OleVariant); safecall;
    function Get_dialogTop: OleVariant; safecall;
    procedure Set_dialogLeft(Value: OleVariant); safecall;
    function Get_dialogLeft: OleVariant; safecall;
    procedure Set_dialogWidth(Value: OleVariant); safecall;
    function Get_dialogWidth: OleVariant; safecall;
    procedure Set_dialogHeight(Value: OleVariant); safecall;
    function Get_dialogHeight: OleVariant; safecall;
    function Get_dialogArguments: OleVariant; safecall;
    function Get_menuArguments: OleVariant; safecall;
    procedure Set_returnValue(Value: OleVariant); safecall;
    function Get_returnValue: OleVariant; safecall;
    procedure close; safecall;
    function toString: WideString; safecall;
    property dialogTop: OleVariant read Get_dialogTop write Set_dialogTop;
    property dialogLeft: OleVariant read Get_dialogLeft write Set_dialogLeft;
    property dialogWidth: OleVariant read Get_dialogWidth write Set_dialogWidth;
    property dialogHeight: OleVariant read Get_dialogHeight write Set_dialogHeight;
    property dialogArguments: OleVariant read Get_dialogArguments;
    property menuArguments: OleVariant read Get_menuArguments;
    property returnValue: OleVariant read Get_returnValue write Set_returnValue;
  end;

{ DispInterface declaration for Dual Interface IHTMLDialog }

  IHTMLDialogDisp = dispinterface
    ['{3050F216-98B5-11CF-BB82-00AA00BDCE0B}']
    property dialogTop: OleVariant dispid -2147418108;
    property dialogLeft: OleVariant dispid -2147418109;
    property dialogWidth: OleVariant dispid -2147418107;
    property dialogHeight: OleVariant dispid -2147418106;
    property dialogArguments: OleVariant readonly dispid 25000;
    property menuArguments: OleVariant readonly dispid 25013;
    property returnValue: OleVariant dispid 25001;
    procedure close; dispid 25011;
    function toString: WideString; dispid 25012;
  end;

  CoHTMLStyle = class
    class function Create: IHTMLStyle;
    class function CreateRemote(const MachineName: string): IHTMLStyle;
  end;

  CoHTMLRuleStyle = class
    class function Create: IHTMLRuleStyle;
    class function CreateRemote(const MachineName: string): IHTMLRuleStyle;
  end;

  CoHTMLFiltersCollection = class
    class function Create: IHTMLFiltersCollection;
    class function CreateRemote(const MachineName: string): IHTMLFiltersCollection;
  end;

  CoHTMLStyleSheetRule = class
    class function Create: IHTMLStyleSheetRule;
    class function CreateRemote(const MachineName: string): IHTMLStyleSheetRule;
  end;

  CoHTMLStyleSheetRulesCollection = class
    class function Create: IHTMLStyleSheetRulesCollection;
    class function CreateRemote(const MachineName: string): IHTMLStyleSheetRulesCollection;
  end;

  CoHTMLStyleSheet = class
    class function Create: IHTMLStyleSheet;
    class function CreateRemote(const MachineName: string): IHTMLStyleSheet;
  end;

  CoHTMLStyleSheetsCollection = class
    class function Create: IHTMLStyleSheetsCollection;
    class function CreateRemote(const MachineName: string): IHTMLStyleSheetsCollection;
  end;

  CoHTMLLinkElement = class
    class function Create: DispIHTMLLinkElement;
    class function CreateRemote(const MachineName: string): DispIHTMLLinkElement;
  end;

  CoHTMLFormElement = class
    class function Create: DispIHTMLFormElement;
    class function CreateRemote(const MachineName: string): DispIHTMLFormElement;
  end;

  CoHTMLTextElement = class
    class function Create: DispIHTMLTextElement;
    class function CreateRemote(const MachineName: string): DispIHTMLTextElement;
  end;

  CoHTMLImg = class
    class function Create: DispIHTMLImgElement;
    class function CreateRemote(const MachineName: string): DispIHTMLImgElement;
  end;

  CoHTMLInputImage = class
    class function Create: DispIHTMLInputImage;
    class function CreateRemote(const MachineName: string): DispIHTMLInputImage;
  end;

  CoHTMLImageElementFactory = class
    class function Create: IHTMLImageElementFactory;
    class function CreateRemote(const MachineName: string): IHTMLImageElementFactory;
  end;

  CoHTMLBody = class
    class function Create: DispIHTMLBodyElement;
    class function CreateRemote(const MachineName: string): DispIHTMLBodyElement;
  end;

  CoHTMLFontElement = class
    class function Create: DispIHTMLFontElement;
    class function CreateRemote(const MachineName: string): DispIHTMLFontElement;
  end;

  CoHTMLAnchorElement = class
    class function Create: DispIHTMLAnchorElement;
    class function CreateRemote(const MachineName: string): DispIHTMLAnchorElement;
  end;

  CoHTMLLabelElement = class
    class function Create: DispIHTMLLabelElement;
    class function CreateRemote(const MachineName: string): DispIHTMLLabelElement;
  end;

  CoHTMLListElement = class
    class function Create: DispIHTMLListElement;
    class function CreateRemote(const MachineName: string): DispIHTMLListElement;
  end;

  CoHTMLUListElement = class
    class function Create: DispIHTMLUListElement;
    class function CreateRemote(const MachineName: string): DispIHTMLUListElement;
  end;

  CoHTMLOListElement = class
    class function Create: DispIHTMLOListElement;
    class function CreateRemote(const MachineName: string): DispIHTMLOListElement;
  end;

  CoHTMLLIElement = class
    class function Create: DispIHTMLLIElement;
    class function CreateRemote(const MachineName: string): DispIHTMLLIElement;
  end;

  CoHTMLBlockElement = class
    class function Create: DispIHTMLBlockElement;
    class function CreateRemote(const MachineName: string): DispIHTMLBlockElement;
  end;

  CoHTMLDivElement = class
    class function Create: DispIHTMLDivElement;
    class function CreateRemote(const MachineName: string): DispIHTMLDivElement;
  end;

  CoHTMLDDElement = class
    class function Create: DispIHTMLDDElement;
    class function CreateRemote(const MachineName: string): DispIHTMLDDElement;
  end;

  CoHTMLDTElement = class
    class function Create: DispIHTMLDTElement;
    class function CreateRemote(const MachineName: string): DispIHTMLDTElement;
  end;

  CoHTMLBRElement = class
    class function Create: DispIHTMLBRElement;
    class function CreateRemote(const MachineName: string): DispIHTMLBRElement;
  end;

  CoHTMLDListElement = class
    class function Create: DispIHTMLDListElement;
    class function CreateRemote(const MachineName: string): DispIHTMLDListElement;
  end;

  CoHTMLHRElement = class
    class function Create: DispIHTMLHRElement;
    class function CreateRemote(const MachineName: string): DispIHTMLHRElement;
  end;

  CoHTMLParaElement = class
    class function Create: DispIHTMLParaElement;
    class function CreateRemote(const MachineName: string): DispIHTMLParaElement;
  end;

  CoHTMLHeaderElement = class
    class function Create: DispIHTMLHeaderElement;
    class function CreateRemote(const MachineName: string): DispIHTMLHeaderElement;
  end;

  CoHTMLSelectElement = class
    class function Create: DispIHTMLSelectElement;
    class function CreateRemote(const MachineName: string): DispIHTMLSelectElement;
  end;

  CoHTMLOptionElement = class
    class function Create: DispIHTMLOptionElement;
    class function CreateRemote(const MachineName: string): DispIHTMLOptionElement;
  end;

  CoHTMLOptionElementFactory = class
    class function Create: IHTMLOptionElementFactory;
    class function CreateRemote(const MachineName: string): IHTMLOptionElementFactory;
  end;

  CoHTMLInputTextElement = class
    class function Create: DispIHTMLInputTextElement;
    class function CreateRemote(const MachineName: string): DispIHTMLInputTextElement;
  end;

  CoHTMLTextAreaElement = class
    class function Create: DispIHTMLTextAreaElement;
    class function CreateRemote(const MachineName: string): DispIHTMLTextAreaElement;
  end;

  CoHTMLInputButtonElement = class
    class function Create: DispIHTMLInputButtonElement;
    class function CreateRemote(const MachineName: string): DispIHTMLInputButtonElement;
  end;

  CoHTMLButtonElement = class
    class function Create: DispIHTMLButtonElement;
    class function CreateRemote(const MachineName: string): DispIHTMLButtonElement;
  end;

  CoHTMLInputFileElement = class
    class function Create: DispIHTMLInputFileElement;
    class function CreateRemote(const MachineName: string): DispIHTMLInputFileElement;
  end;

  CoHTMLMarqueeElement = class
    class function Create: DispIHTMLMarqueeElement;
    class function CreateRemote(const MachineName: string): DispIHTMLMarqueeElement;
  end;

  CoHTMLOptionButtonElement = class
    class function Create: DispIHTMLOptionButtonElement;
    class function CreateRemote(const MachineName: string): DispIHTMLOptionButtonElement;
  end;

  CoHTMLTitleElement = class
    class function Create: DispIHTMLTitleElement;
    class function CreateRemote(const MachineName: string): DispIHTMLTitleElement;
  end;

  CoHTMLMetaElement = class
    class function Create: DispIHTMLMetaElement;
    class function CreateRemote(const MachineName: string): DispIHTMLMetaElement;
  end;

  CoHTMLBaseElement = class
    class function Create: DispIHTMLBaseElement;
    class function CreateRemote(const MachineName: string): DispIHTMLBaseElement;
  end;

  CoHTMLIsIndexElement = class
    class function Create: DispIHTMLIsIndexElement;
    class function CreateRemote(const MachineName: string): DispIHTMLIsIndexElement;
  end;

  CoHTMLNextIdElement = class
    class function Create: DispIHTMLNextIdElement;
    class function CreateRemote(const MachineName: string): DispIHTMLNextIdElement;
  end;

  CoHTMLBaseFontElement = class
    class function Create: DispIHTMLBaseFontElement;
    class function CreateRemote(const MachineName: string): DispIHTMLBaseFontElement;
  end;

  CoHTMLUnknownElement = class
    class function Create: DispIHTMLUnknownElement;
    class function CreateRemote(const MachineName: string): DispIHTMLUnknownElement;
  end;

  CoHTMLHistory = class
    class function Create: IOmHistory;
    class function CreateRemote(const MachineName: string): IOmHistory;
  end;

  CoCMimeTypes = class
    class function Create: IHTMLMimeTypesCollection;
    class function CreateRemote(const MachineName: string): IHTMLMimeTypesCollection;
  end;

  CoCPlugins = class
    class function Create: IHTMLPluginsCollection;
    class function CreateRemote(const MachineName: string): IHTMLPluginsCollection;
  end;

  CoCOpsProfile = class
    class function Create: IHTMLOpsProfile;
    class function CreateRemote(const MachineName: string): IHTMLOpsProfile;
  end;

  CoHTMLNavigator = class
    class function Create: IOmNavigator;
    class function CreateRemote(const MachineName: string): IOmNavigator;
  end;

  CoHTMLLocation = class
    class function Create: IHTMLLocation;
    class function CreateRemote(const MachineName: string): IHTMLLocation;
  end;

  CoHTMLScreen = class
    class function Create: IHTMLScreen;
    class function CreateRemote(const MachineName: string): IHTMLScreen;
  end;

  CoHTMLWindow2 = class
    class function Create: IHTMLWindow2;
    class function CreateRemote(const MachineName: string): IHTMLWindow2;
  end;

  CoHTMLWindowProxy = class
    class function Create: IHTMLWindow2;
    class function CreateRemote(const MachineName: string): IHTMLWindow2;
  end;

  CoHTMLDocument = class
    class function Create: IHTMLDocument2;
    class function CreateRemote(const MachineName: string): IHTMLDocument2;
  end;

  CoHTMLEmbed = class
    class function Create: DispIHTMLEmbedElement;
    class function CreateRemote(const MachineName: string): DispIHTMLEmbedElement;
  end;

  CoHTMLMapElement = class
    class function Create: DispIHTMLMapElement;
    class function CreateRemote(const MachineName: string): DispIHTMLMapElement;
  end;

  CoHTMLAreaElement = class
    class function Create: DispIHTMLAreaElement;
    class function CreateRemote(const MachineName: string): DispIHTMLAreaElement;
  end;

  CoHTMLTableCaption = class
    class function Create: DispIHTMLTableCaption;
    class function CreateRemote(const MachineName: string): DispIHTMLTableCaption;
  end;

  CoHTMLCommentElement = class
    class function Create: DispIHTMLCommentElement;
    class function CreateRemote(const MachineName: string): DispIHTMLCommentElement;
  end;

  CoHTMLPhraseElement = class
    class function Create: DispIHTMLPhraseElement;
    class function CreateRemote(const MachineName: string): DispIHTMLPhraseElement;
  end;

  CoHTMLSpanElement = class
    class function Create: DispIHTMLSpanElement;
    class function CreateRemote(const MachineName: string): DispIHTMLSpanElement;
  end;

  CoHTMLTable = class
    class function Create: DispIHTMLTable;
    class function CreateRemote(const MachineName: string): DispIHTMLTable;
  end;

  CoHTMLTableCol = class
    class function Create: DispIHTMLTableCol;
    class function CreateRemote(const MachineName: string): DispIHTMLTableCol;
  end;

  CoHTMLTableSection = class
    class function Create: DispIHTMLTableSection;
    class function CreateRemote(const MachineName: string): DispIHTMLTableSection;
  end;

  CoHTMLTableRow = class
    class function Create: DispIHTMLTableRow;
    class function CreateRemote(const MachineName: string): DispIHTMLTableRow;
  end;

  CoHTMLTableCell = class
    class function Create: DispIHTMLTableCell;
    class function CreateRemote(const MachineName: string): DispIHTMLTableCell;
  end;

  CoHTMLScriptElement = class
    class function Create: DispIHTMLScriptElement;
    class function CreateRemote(const MachineName: string): DispIHTMLScriptElement;
  end;

  CoHTMLNoShowElement = class
    class function Create: DispIHTMLNoShowElement;
    class function CreateRemote(const MachineName: string): DispIHTMLNoShowElement;
  end;

  CoHTMLObjectElement = class
    class function Create: DispIHTMLObjectElement;
    class function CreateRemote(const MachineName: string): DispIHTMLObjectElement;
  end;

  CoHTMLFrameBase = class
    class function Create: DispIHTMLFrameBase;
    class function CreateRemote(const MachineName: string): DispIHTMLFrameBase;
  end;

  CoHTMLFrameElement = class
    class function Create: DispIHTMLFrameElement;
    class function CreateRemote(const MachineName: string): DispIHTMLFrameElement;
  end;

  CoHTMLIFrame = class
    class function Create: DispIHTMLIFrameElement;
    class function CreateRemote(const MachineName: string): DispIHTMLIFrameElement;
  end;

  CoHTMLDivPosition = class
    class function Create: DispIHTMLDivPosition;
    class function CreateRemote(const MachineName: string): DispIHTMLDivPosition;
  end;

  CoHTMLFieldSetElement = class
    class function Create: DispIHTMLFieldSetElement;
    class function CreateRemote(const MachineName: string): DispIHTMLFieldSetElement;
  end;

  CoHTMLLegendElement = class
    class function Create: DispIHTMLLegendElement;
    class function CreateRemote(const MachineName: string): DispIHTMLLegendElement;
  end;

  CoHTMLSpanFlow = class
    class function Create: DispIHTMLSpanFlow;
    class function CreateRemote(const MachineName: string): DispIHTMLSpanFlow;
  end;

  CoHTMLFrameSetSite = class
    class function Create: DispIHTMLFrameSetElement;
    class function CreateRemote(const MachineName: string): DispIHTMLFrameSetElement;
  end;

  CoHTMLBGsound = class
    class function Create: DispIHTMLBGsound;
    class function CreateRemote(const MachineName: string): DispIHTMLBGsound;
  end;

  CoHTMLStyleElement = class
    class function Create: DispIHTMLStyleElement;
    class function CreateRemote(const MachineName: string): DispIHTMLStyleElement;
  end;

  CoHTMLStyleFontFace = class
    class function Create: IHTMLStyleFontFace;
    class function CreateRemote(const MachineName: string): IHTMLStyleFontFace;
  end;

  CoHTMLDialog = class
    class function Create: IHTMLDialog;
    class function CreateRemote(const MachineName: string): IHTMLDialog;
  end;

  CoOldHTMLDocument = class
    class function Create: IHTMLDocument2;
    class function CreateRemote(const MachineName: string): IHTMLDocument2;
  end;

  CoOldHTMLFormElement = class
    class function Create: DispIHTMLFormElement;
    class function CreateRemote(const MachineName: string): DispIHTMLFormElement;
  end;



implementation

uses ComObj;

class function CoHTMLStyle.Create: IHTMLStyle;
begin
  Result := CreateComObject(Class_HTMLStyle) as IHTMLStyle;
end;

class function CoHTMLStyle.CreateRemote(const MachineName: string): IHTMLStyle;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLStyle) as IHTMLStyle;
end;

class function CoHTMLRuleStyle.Create: IHTMLRuleStyle;
begin
  Result := CreateComObject(Class_HTMLRuleStyle) as IHTMLRuleStyle;
end;

class function CoHTMLRuleStyle.CreateRemote(const MachineName: string): IHTMLRuleStyle;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLRuleStyle) as IHTMLRuleStyle;
end;

class function CoHTMLFiltersCollection.Create: IHTMLFiltersCollection;
begin
  Result := CreateComObject(Class_HTMLFiltersCollection) as IHTMLFiltersCollection;
end;

class function CoHTMLFiltersCollection.CreateRemote(const MachineName: string): IHTMLFiltersCollection;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLFiltersCollection) as IHTMLFiltersCollection;
end;

class function CoHTMLStyleSheetRule.Create: IHTMLStyleSheetRule;
begin
  Result := CreateComObject(Class_HTMLStyleSheetRule) as IHTMLStyleSheetRule;
end;

class function CoHTMLStyleSheetRule.CreateRemote(const MachineName: string): IHTMLStyleSheetRule;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLStyleSheetRule) as IHTMLStyleSheetRule;
end;

class function CoHTMLStyleSheetRulesCollection.Create: IHTMLStyleSheetRulesCollection;
begin
  Result := CreateComObject(Class_HTMLStyleSheetRulesCollection) as IHTMLStyleSheetRulesCollection;
end;

class function CoHTMLStyleSheetRulesCollection.CreateRemote(const MachineName: string): IHTMLStyleSheetRulesCollection;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLStyleSheetRulesCollection) as IHTMLStyleSheetRulesCollection;
end;

class function CoHTMLStyleSheet.Create: IHTMLStyleSheet;
begin
  Result := CreateComObject(Class_HTMLStyleSheet) as IHTMLStyleSheet;
end;

class function CoHTMLStyleSheet.CreateRemote(const MachineName: string): IHTMLStyleSheet;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLStyleSheet) as IHTMLStyleSheet;
end;

class function CoHTMLStyleSheetsCollection.Create: IHTMLStyleSheetsCollection;
begin
  Result := CreateComObject(Class_HTMLStyleSheetsCollection) as IHTMLStyleSheetsCollection;
end;

class function CoHTMLStyleSheetsCollection.CreateRemote(const MachineName: string): IHTMLStyleSheetsCollection;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLStyleSheetsCollection) as IHTMLStyleSheetsCollection;
end;

class function CoHTMLLinkElement.Create: DispIHTMLLinkElement;
begin
  Result := CreateComObject(Class_HTMLLinkElement) as DispIHTMLLinkElement;
end;

class function CoHTMLLinkElement.CreateRemote(const MachineName: string): DispIHTMLLinkElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLLinkElement) as DispIHTMLLinkElement;
end;

class function CoHTMLFormElement.Create: DispIHTMLFormElement;
begin
  Result := CreateComObject(Class_HTMLFormElement) as DispIHTMLFormElement;
end;

class function CoHTMLFormElement.CreateRemote(const MachineName: string): DispIHTMLFormElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLFormElement) as DispIHTMLFormElement;
end;

class function CoHTMLTextElement.Create: DispIHTMLTextElement;
begin
  Result := CreateComObject(Class_HTMLTextElement) as DispIHTMLTextElement;
end;

class function CoHTMLTextElement.CreateRemote(const MachineName: string): DispIHTMLTextElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLTextElement) as DispIHTMLTextElement;
end;

class function CoHTMLImg.Create: DispIHTMLImgElement;
begin
  Result := CreateComObject(Class_HTMLImg) as DispIHTMLImgElement;
end;

class function CoHTMLImg.CreateRemote(const MachineName: string): DispIHTMLImgElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLImg) as DispIHTMLImgElement;
end;

class function CoHTMLInputImage.Create: DispIHTMLInputImage;
begin
  Result := CreateComObject(Class_HTMLInputImage) as DispIHTMLInputImage;
end;

class function CoHTMLInputImage.CreateRemote(const MachineName: string): DispIHTMLInputImage;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLInputImage) as DispIHTMLInputImage;
end;

class function CoHTMLImageElementFactory.Create: IHTMLImageElementFactory;
begin
  Result := CreateComObject(Class_HTMLImageElementFactory) as IHTMLImageElementFactory;
end;

class function CoHTMLImageElementFactory.CreateRemote(const MachineName: string): IHTMLImageElementFactory;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLImageElementFactory) as IHTMLImageElementFactory;
end;

class function CoHTMLBody.Create: DispIHTMLBodyElement;
begin
  Result := CreateComObject(Class_HTMLBody) as DispIHTMLBodyElement;
end;

class function CoHTMLBody.CreateRemote(const MachineName: string): DispIHTMLBodyElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLBody) as DispIHTMLBodyElement;
end;

class function CoHTMLFontElement.Create: DispIHTMLFontElement;
begin
  Result := CreateComObject(Class_HTMLFontElement) as DispIHTMLFontElement;
end;

class function CoHTMLFontElement.CreateRemote(const MachineName: string): DispIHTMLFontElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLFontElement) as DispIHTMLFontElement;
end;

class function CoHTMLAnchorElement.Create: DispIHTMLAnchorElement;
begin
  Result := CreateComObject(Class_HTMLAnchorElement) as DispIHTMLAnchorElement;
end;

class function CoHTMLAnchorElement.CreateRemote(const MachineName: string): DispIHTMLAnchorElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLAnchorElement) as DispIHTMLAnchorElement;
end;

class function CoHTMLLabelElement.Create: DispIHTMLLabelElement;
begin
  Result := CreateComObject(Class_HTMLLabelElement) as DispIHTMLLabelElement;
end;

class function CoHTMLLabelElement.CreateRemote(const MachineName: string): DispIHTMLLabelElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLLabelElement) as DispIHTMLLabelElement;
end;

class function CoHTMLListElement.Create: DispIHTMLListElement;
begin
  Result := CreateComObject(Class_HTMLListElement) as DispIHTMLListElement;
end;

class function CoHTMLListElement.CreateRemote(const MachineName: string): DispIHTMLListElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLListElement) as DispIHTMLListElement;
end;

class function CoHTMLUListElement.Create: DispIHTMLUListElement;
begin
  Result := CreateComObject(Class_HTMLUListElement) as DispIHTMLUListElement;
end;

class function CoHTMLUListElement.CreateRemote(const MachineName: string): DispIHTMLUListElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLUListElement) as DispIHTMLUListElement;
end;

class function CoHTMLOListElement.Create: DispIHTMLOListElement;
begin
  Result := CreateComObject(Class_HTMLOListElement) as DispIHTMLOListElement;
end;

class function CoHTMLOListElement.CreateRemote(const MachineName: string): DispIHTMLOListElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLOListElement) as DispIHTMLOListElement;
end;

class function CoHTMLLIElement.Create: DispIHTMLLIElement;
begin
  Result := CreateComObject(Class_HTMLLIElement) as DispIHTMLLIElement;
end;

class function CoHTMLLIElement.CreateRemote(const MachineName: string): DispIHTMLLIElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLLIElement) as DispIHTMLLIElement;
end;

class function CoHTMLBlockElement.Create: DispIHTMLBlockElement;
begin
  Result := CreateComObject(Class_HTMLBlockElement) as DispIHTMLBlockElement;
end;

class function CoHTMLBlockElement.CreateRemote(const MachineName: string): DispIHTMLBlockElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLBlockElement) as DispIHTMLBlockElement;
end;

class function CoHTMLDivElement.Create: DispIHTMLDivElement;
begin
  Result := CreateComObject(Class_HTMLDivElement) as DispIHTMLDivElement;
end;

class function CoHTMLDivElement.CreateRemote(const MachineName: string): DispIHTMLDivElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLDivElement) as DispIHTMLDivElement;
end;

class function CoHTMLDDElement.Create: DispIHTMLDDElement;
begin
  Result := CreateComObject(Class_HTMLDDElement) as DispIHTMLDDElement;
end;

class function CoHTMLDDElement.CreateRemote(const MachineName: string): DispIHTMLDDElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLDDElement) as DispIHTMLDDElement;
end;

class function CoHTMLDTElement.Create: DispIHTMLDTElement;
begin
  Result := CreateComObject(Class_HTMLDTElement) as DispIHTMLDTElement;
end;

class function CoHTMLDTElement.CreateRemote(const MachineName: string): DispIHTMLDTElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLDTElement) as DispIHTMLDTElement;
end;

class function CoHTMLBRElement.Create: DispIHTMLBRElement;
begin
  Result := CreateComObject(Class_HTMLBRElement) as DispIHTMLBRElement;
end;

class function CoHTMLBRElement.CreateRemote(const MachineName: string): DispIHTMLBRElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLBRElement) as DispIHTMLBRElement;
end;

class function CoHTMLDListElement.Create: DispIHTMLDListElement;
begin
  Result := CreateComObject(Class_HTMLDListElement) as DispIHTMLDListElement;
end;

class function CoHTMLDListElement.CreateRemote(const MachineName: string): DispIHTMLDListElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLDListElement) as DispIHTMLDListElement;
end;

class function CoHTMLHRElement.Create: DispIHTMLHRElement;
begin
  Result := CreateComObject(Class_HTMLHRElement) as DispIHTMLHRElement;
end;

class function CoHTMLHRElement.CreateRemote(const MachineName: string): DispIHTMLHRElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLHRElement) as DispIHTMLHRElement;
end;

class function CoHTMLParaElement.Create: DispIHTMLParaElement;
begin
  Result := CreateComObject(Class_HTMLParaElement) as DispIHTMLParaElement;
end;

class function CoHTMLParaElement.CreateRemote(const MachineName: string): DispIHTMLParaElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLParaElement) as DispIHTMLParaElement;
end;

class function CoHTMLHeaderElement.Create: DispIHTMLHeaderElement;
begin
  Result := CreateComObject(Class_HTMLHeaderElement) as DispIHTMLHeaderElement;
end;

class function CoHTMLHeaderElement.CreateRemote(const MachineName: string): DispIHTMLHeaderElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLHeaderElement) as DispIHTMLHeaderElement;
end;

class function CoHTMLSelectElement.Create: DispIHTMLSelectElement;
begin
  Result := CreateComObject(Class_HTMLSelectElement) as DispIHTMLSelectElement;
end;

class function CoHTMLSelectElement.CreateRemote(const MachineName: string): DispIHTMLSelectElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLSelectElement) as DispIHTMLSelectElement;
end;

class function CoHTMLOptionElement.Create: DispIHTMLOptionElement;
begin
  Result := CreateComObject(Class_HTMLOptionElement) as DispIHTMLOptionElement;
end;

class function CoHTMLOptionElement.CreateRemote(const MachineName: string): DispIHTMLOptionElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLOptionElement) as DispIHTMLOptionElement;
end;

class function CoHTMLOptionElementFactory.Create: IHTMLOptionElementFactory;
begin
  Result := CreateComObject(Class_HTMLOptionElementFactory) as IHTMLOptionElementFactory;
end;

class function CoHTMLOptionElementFactory.CreateRemote(const MachineName: string): IHTMLOptionElementFactory;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLOptionElementFactory) as IHTMLOptionElementFactory;
end;

class function CoHTMLInputTextElement.Create: DispIHTMLInputTextElement;
begin
  Result := CreateComObject(Class_HTMLInputTextElement) as DispIHTMLInputTextElement;
end;

class function CoHTMLInputTextElement.CreateRemote(const MachineName: string): DispIHTMLInputTextElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLInputTextElement) as DispIHTMLInputTextElement;
end;

class function CoHTMLTextAreaElement.Create: DispIHTMLTextAreaElement;
begin
  Result := CreateComObject(Class_HTMLTextAreaElement) as DispIHTMLTextAreaElement;
end;

class function CoHTMLTextAreaElement.CreateRemote(const MachineName: string): DispIHTMLTextAreaElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLTextAreaElement) as DispIHTMLTextAreaElement;
end;

class function CoHTMLInputButtonElement.Create: DispIHTMLInputButtonElement;
begin
  Result := CreateComObject(Class_HTMLInputButtonElement) as DispIHTMLInputButtonElement;
end;

class function CoHTMLInputButtonElement.CreateRemote(const MachineName: string): DispIHTMLInputButtonElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLInputButtonElement) as DispIHTMLInputButtonElement;
end;

class function CoHTMLButtonElement.Create: DispIHTMLButtonElement;
begin
  Result := CreateComObject(Class_HTMLButtonElement) as DispIHTMLButtonElement;
end;

class function CoHTMLButtonElement.CreateRemote(const MachineName: string): DispIHTMLButtonElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLButtonElement) as DispIHTMLButtonElement;
end;

class function CoHTMLInputFileElement.Create: DispIHTMLInputFileElement;
begin
  Result := CreateComObject(Class_HTMLInputFileElement) as DispIHTMLInputFileElement;
end;

class function CoHTMLInputFileElement.CreateRemote(const MachineName: string): DispIHTMLInputFileElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLInputFileElement) as DispIHTMLInputFileElement;
end;

class function CoHTMLMarqueeElement.Create: DispIHTMLMarqueeElement;
begin
  Result := CreateComObject(Class_HTMLMarqueeElement) as DispIHTMLMarqueeElement;
end;

class function CoHTMLMarqueeElement.CreateRemote(const MachineName: string): DispIHTMLMarqueeElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLMarqueeElement) as DispIHTMLMarqueeElement;
end;

class function CoHTMLOptionButtonElement.Create: DispIHTMLOptionButtonElement;
begin
  Result := CreateComObject(Class_HTMLOptionButtonElement) as DispIHTMLOptionButtonElement;
end;

class function CoHTMLOptionButtonElement.CreateRemote(const MachineName: string): DispIHTMLOptionButtonElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLOptionButtonElement) as DispIHTMLOptionButtonElement;
end;

class function CoHTMLTitleElement.Create: DispIHTMLTitleElement;
begin
  Result := CreateComObject(Class_HTMLTitleElement) as DispIHTMLTitleElement;
end;

class function CoHTMLTitleElement.CreateRemote(const MachineName: string): DispIHTMLTitleElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLTitleElement) as DispIHTMLTitleElement;
end;

class function CoHTMLMetaElement.Create: DispIHTMLMetaElement;
begin
  Result := CreateComObject(Class_HTMLMetaElement) as DispIHTMLMetaElement;
end;

class function CoHTMLMetaElement.CreateRemote(const MachineName: string): DispIHTMLMetaElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLMetaElement) as DispIHTMLMetaElement;
end;

class function CoHTMLBaseElement.Create: DispIHTMLBaseElement;
begin
  Result := CreateComObject(Class_HTMLBaseElement) as DispIHTMLBaseElement;
end;

class function CoHTMLBaseElement.CreateRemote(const MachineName: string): DispIHTMLBaseElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLBaseElement) as DispIHTMLBaseElement;
end;

class function CoHTMLIsIndexElement.Create: DispIHTMLIsIndexElement;
begin
  Result := CreateComObject(Class_HTMLIsIndexElement) as DispIHTMLIsIndexElement;
end;

class function CoHTMLIsIndexElement.CreateRemote(const MachineName: string): DispIHTMLIsIndexElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLIsIndexElement) as DispIHTMLIsIndexElement;
end;

class function CoHTMLNextIdElement.Create: DispIHTMLNextIdElement;
begin
  Result := CreateComObject(Class_HTMLNextIdElement) as DispIHTMLNextIdElement;
end;

class function CoHTMLNextIdElement.CreateRemote(const MachineName: string): DispIHTMLNextIdElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLNextIdElement) as DispIHTMLNextIdElement;
end;

class function CoHTMLBaseFontElement.Create: DispIHTMLBaseFontElement;
begin
  Result := CreateComObject(Class_HTMLBaseFontElement) as DispIHTMLBaseFontElement;
end;

class function CoHTMLBaseFontElement.CreateRemote(const MachineName: string): DispIHTMLBaseFontElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLBaseFontElement) as DispIHTMLBaseFontElement;
end;

class function CoHTMLUnknownElement.Create: DispIHTMLUnknownElement;
begin
  Result := CreateComObject(Class_HTMLUnknownElement) as DispIHTMLUnknownElement;
end;

class function CoHTMLUnknownElement.CreateRemote(const MachineName: string): DispIHTMLUnknownElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLUnknownElement) as DispIHTMLUnknownElement;
end;

class function CoHTMLHistory.Create: IOmHistory;
begin
  Result := CreateComObject(Class_HTMLHistory) as IOmHistory;
end;

class function CoHTMLHistory.CreateRemote(const MachineName: string): IOmHistory;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLHistory) as IOmHistory;
end;

class function CoCMimeTypes.Create: IHTMLMimeTypesCollection;
begin
  Result := CreateComObject(Class_CMimeTypes) as IHTMLMimeTypesCollection;
end;

class function CoCMimeTypes.CreateRemote(const MachineName: string): IHTMLMimeTypesCollection;
begin
  Result := CreateRemoteComObject(MachineName, Class_CMimeTypes) as IHTMLMimeTypesCollection;
end;

class function CoCPlugins.Create: IHTMLPluginsCollection;
begin
  Result := CreateComObject(Class_CPlugins) as IHTMLPluginsCollection;
end;

class function CoCPlugins.CreateRemote(const MachineName: string): IHTMLPluginsCollection;
begin
  Result := CreateRemoteComObject(MachineName, Class_CPlugins) as IHTMLPluginsCollection;
end;

class function CoCOpsProfile.Create: IHTMLOpsProfile;
begin
  Result := CreateComObject(Class_COpsProfile) as IHTMLOpsProfile;
end;

class function CoCOpsProfile.CreateRemote(const MachineName: string): IHTMLOpsProfile;
begin
  Result := CreateRemoteComObject(MachineName, Class_COpsProfile) as IHTMLOpsProfile;
end;

class function CoHTMLNavigator.Create: IOmNavigator;
begin
  Result := CreateComObject(Class_HTMLNavigator) as IOmNavigator;
end;

class function CoHTMLNavigator.CreateRemote(const MachineName: string): IOmNavigator;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLNavigator) as IOmNavigator;
end;

class function CoHTMLLocation.Create: IHTMLLocation;
begin
  Result := CreateComObject(Class_HTMLLocation) as IHTMLLocation;
end;

class function CoHTMLLocation.CreateRemote(const MachineName: string): IHTMLLocation;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLLocation) as IHTMLLocation;
end;

class function CoHTMLScreen.Create: IHTMLScreen;
begin
  Result := CreateComObject(Class_HTMLScreen) as IHTMLScreen;
end;

class function CoHTMLScreen.CreateRemote(const MachineName: string): IHTMLScreen;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLScreen) as IHTMLScreen;
end;

class function CoHTMLWindow2.Create: IHTMLWindow2;
begin
  Result := CreateComObject(Class_HTMLWindow2) as IHTMLWindow2;
end;

class function CoHTMLWindow2.CreateRemote(const MachineName: string): IHTMLWindow2;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLWindow2) as IHTMLWindow2;
end;

class function CoHTMLWindowProxy.Create: IHTMLWindow2;
begin
  Result := CreateComObject(Class_HTMLWindowProxy) as IHTMLWindow2;
end;

class function CoHTMLWindowProxy.CreateRemote(const MachineName: string): IHTMLWindow2;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLWindowProxy) as IHTMLWindow2;
end;

class function CoHTMLDocument.Create: IHTMLDocument2;
begin
  Result := CreateComObject(Class_HTMLDocument) as IHTMLDocument2;
end;

class function CoHTMLDocument.CreateRemote(const MachineName: string): IHTMLDocument2;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLDocument) as IHTMLDocument2;
end;

class function CoHTMLEmbed.Create: DispIHTMLEmbedElement;
begin
  Result := CreateComObject(Class_HTMLEmbed) as DispIHTMLEmbedElement;
end;

class function CoHTMLEmbed.CreateRemote(const MachineName: string): DispIHTMLEmbedElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLEmbed) as DispIHTMLEmbedElement;
end;

class function CoHTMLMapElement.Create: DispIHTMLMapElement;
begin
  Result := CreateComObject(Class_HTMLMapElement) as DispIHTMLMapElement;
end;

class function CoHTMLMapElement.CreateRemote(const MachineName: string): DispIHTMLMapElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLMapElement) as DispIHTMLMapElement;
end;

class function CoHTMLAreaElement.Create: DispIHTMLAreaElement;
begin
  Result := CreateComObject(Class_HTMLAreaElement) as DispIHTMLAreaElement;
end;

class function CoHTMLAreaElement.CreateRemote(const MachineName: string): DispIHTMLAreaElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLAreaElement) as DispIHTMLAreaElement;
end;

class function CoHTMLTableCaption.Create: DispIHTMLTableCaption;
begin
  Result := CreateComObject(Class_HTMLTableCaption) as DispIHTMLTableCaption;
end;

class function CoHTMLTableCaption.CreateRemote(const MachineName: string): DispIHTMLTableCaption;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLTableCaption) as DispIHTMLTableCaption;
end;

class function CoHTMLCommentElement.Create: DispIHTMLCommentElement;
begin
  Result := CreateComObject(Class_HTMLCommentElement) as DispIHTMLCommentElement;
end;

class function CoHTMLCommentElement.CreateRemote(const MachineName: string): DispIHTMLCommentElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLCommentElement) as DispIHTMLCommentElement;
end;

class function CoHTMLPhraseElement.Create: DispIHTMLPhraseElement;
begin
  Result := CreateComObject(Class_HTMLPhraseElement) as DispIHTMLPhraseElement;
end;

class function CoHTMLPhraseElement.CreateRemote(const MachineName: string): DispIHTMLPhraseElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLPhraseElement) as DispIHTMLPhraseElement;
end;

class function CoHTMLSpanElement.Create: DispIHTMLSpanElement;
begin
  Result := CreateComObject(Class_HTMLSpanElement) as DispIHTMLSpanElement;
end;

class function CoHTMLSpanElement.CreateRemote(const MachineName: string): DispIHTMLSpanElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLSpanElement) as DispIHTMLSpanElement;
end;

class function CoHTMLTable.Create: DispIHTMLTable;
begin
  Result := CreateComObject(Class_HTMLTable) as DispIHTMLTable;
end;

class function CoHTMLTable.CreateRemote(const MachineName: string): DispIHTMLTable;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLTable) as DispIHTMLTable;
end;

class function CoHTMLTableCol.Create: DispIHTMLTableCol;
begin
  Result := CreateComObject(Class_HTMLTableCol) as DispIHTMLTableCol;
end;

class function CoHTMLTableCol.CreateRemote(const MachineName: string): DispIHTMLTableCol;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLTableCol) as DispIHTMLTableCol;
end;

class function CoHTMLTableSection.Create: DispIHTMLTableSection;
begin
  Result := CreateComObject(Class_HTMLTableSection) as DispIHTMLTableSection;
end;

class function CoHTMLTableSection.CreateRemote(const MachineName: string): DispIHTMLTableSection;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLTableSection) as DispIHTMLTableSection;
end;

class function CoHTMLTableRow.Create: DispIHTMLTableRow;
begin
  Result := CreateComObject(Class_HTMLTableRow) as DispIHTMLTableRow;
end;

class function CoHTMLTableRow.CreateRemote(const MachineName: string): DispIHTMLTableRow;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLTableRow) as DispIHTMLTableRow;
end;

class function CoHTMLTableCell.Create: DispIHTMLTableCell;
begin
  Result := CreateComObject(Class_HTMLTableCell) as DispIHTMLTableCell;
end;

class function CoHTMLTableCell.CreateRemote(const MachineName: string): DispIHTMLTableCell;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLTableCell) as DispIHTMLTableCell;
end;

class function CoHTMLScriptElement.Create: DispIHTMLScriptElement;
begin
  Result := CreateComObject(Class_HTMLScriptElement) as DispIHTMLScriptElement;
end;

class function CoHTMLScriptElement.CreateRemote(const MachineName: string): DispIHTMLScriptElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLScriptElement) as DispIHTMLScriptElement;
end;

class function CoHTMLNoShowElement.Create: DispIHTMLNoShowElement;
begin
  Result := CreateComObject(Class_HTMLNoShowElement) as DispIHTMLNoShowElement;
end;

class function CoHTMLNoShowElement.CreateRemote(const MachineName: string): DispIHTMLNoShowElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLNoShowElement) as DispIHTMLNoShowElement;
end;

class function CoHTMLObjectElement.Create: DispIHTMLObjectElement;
begin
  Result := CreateComObject(Class_HTMLObjectElement) as DispIHTMLObjectElement;
end;

class function CoHTMLObjectElement.CreateRemote(const MachineName: string): DispIHTMLObjectElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLObjectElement) as DispIHTMLObjectElement;
end;

class function CoHTMLFrameBase.Create: DispIHTMLFrameBase;
begin
  Result := CreateComObject(Class_HTMLFrameBase) as DispIHTMLFrameBase;
end;

class function CoHTMLFrameBase.CreateRemote(const MachineName: string): DispIHTMLFrameBase;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLFrameBase) as DispIHTMLFrameBase;
end;

class function CoHTMLFrameElement.Create: DispIHTMLFrameElement;
begin
  Result := CreateComObject(Class_HTMLFrameElement) as DispIHTMLFrameElement;
end;

class function CoHTMLFrameElement.CreateRemote(const MachineName: string): DispIHTMLFrameElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLFrameElement) as DispIHTMLFrameElement;
end;

class function CoHTMLIFrame.Create: DispIHTMLIFrameElement;
begin
  Result := CreateComObject(Class_HTMLIFrame) as DispIHTMLIFrameElement;
end;

class function CoHTMLIFrame.CreateRemote(const MachineName: string): DispIHTMLIFrameElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLIFrame) as DispIHTMLIFrameElement;
end;

class function CoHTMLDivPosition.Create: DispIHTMLDivPosition;
begin
  Result := CreateComObject(Class_HTMLDivPosition) as DispIHTMLDivPosition;
end;

class function CoHTMLDivPosition.CreateRemote(const MachineName: string): DispIHTMLDivPosition;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLDivPosition) as DispIHTMLDivPosition;
end;

class function CoHTMLFieldSetElement.Create: DispIHTMLFieldSetElement;
begin
  Result := CreateComObject(Class_HTMLFieldSetElement) as DispIHTMLFieldSetElement;
end;

class function CoHTMLFieldSetElement.CreateRemote(const MachineName: string): DispIHTMLFieldSetElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLFieldSetElement) as DispIHTMLFieldSetElement;
end;

class function CoHTMLLegendElement.Create: DispIHTMLLegendElement;
begin
  Result := CreateComObject(Class_HTMLLegendElement) as DispIHTMLLegendElement;
end;

class function CoHTMLLegendElement.CreateRemote(const MachineName: string): DispIHTMLLegendElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLLegendElement) as DispIHTMLLegendElement;
end;

class function CoHTMLSpanFlow.Create: DispIHTMLSpanFlow;
begin
  Result := CreateComObject(Class_HTMLSpanFlow) as DispIHTMLSpanFlow;
end;

class function CoHTMLSpanFlow.CreateRemote(const MachineName: string): DispIHTMLSpanFlow;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLSpanFlow) as DispIHTMLSpanFlow;
end;

class function CoHTMLFrameSetSite.Create: DispIHTMLFrameSetElement;
begin
  Result := CreateComObject(Class_HTMLFrameSetSite) as DispIHTMLFrameSetElement;
end;

class function CoHTMLFrameSetSite.CreateRemote(const MachineName: string): DispIHTMLFrameSetElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLFrameSetSite) as DispIHTMLFrameSetElement;
end;

class function CoHTMLBGsound.Create: DispIHTMLBGsound;
begin
  Result := CreateComObject(Class_HTMLBGsound) as DispIHTMLBGsound;
end;

class function CoHTMLBGsound.CreateRemote(const MachineName: string): DispIHTMLBGsound;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLBGsound) as DispIHTMLBGsound;
end;

class function CoHTMLStyleElement.Create: DispIHTMLStyleElement;
begin
  Result := CreateComObject(Class_HTMLStyleElement) as DispIHTMLStyleElement;
end;

class function CoHTMLStyleElement.CreateRemote(const MachineName: string): DispIHTMLStyleElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLStyleElement) as DispIHTMLStyleElement;
end;

class function CoHTMLStyleFontFace.Create: IHTMLStyleFontFace;
begin
  Result := CreateComObject(Class_HTMLStyleFontFace) as IHTMLStyleFontFace;
end;

class function CoHTMLStyleFontFace.CreateRemote(const MachineName: string): IHTMLStyleFontFace;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLStyleFontFace) as IHTMLStyleFontFace;
end;

class function CoHTMLDialog.Create: IHTMLDialog;
begin
  Result := CreateComObject(Class_HTMLDialog) as IHTMLDialog;
end;

class function CoHTMLDialog.CreateRemote(const MachineName: string): IHTMLDialog;
begin
  Result := CreateRemoteComObject(MachineName, Class_HTMLDialog) as IHTMLDialog;
end;

class function CoOldHTMLDocument.Create: IHTMLDocument2;
begin
  Result := CreateComObject(Class_OldHTMLDocument) as IHTMLDocument2;
end;

class function CoOldHTMLDocument.CreateRemote(const MachineName: string): IHTMLDocument2;
begin
  Result := CreateRemoteComObject(MachineName, Class_OldHTMLDocument) as IHTMLDocument2;
end;

class function CoOldHTMLFormElement.Create: DispIHTMLFormElement;
begin
  Result := CreateComObject(Class_OldHTMLFormElement) as DispIHTMLFormElement;
end;

class function CoOldHTMLFormElement.CreateRemote(const MachineName: string): DispIHTMLFormElement;
begin
  Result := CreateRemoteComObject(MachineName, Class_OldHTMLFormElement) as DispIHTMLFormElement;
end;


end.
