Delphi访问网页中的下拉菜单

Delphi通过TWebBrowser浏览网页，然后访问该网页中的下拉菜单：

uses MsHtml;
procedure TForm1.Button1Click(Sender: TObject);
var
doc: IHTMLDocument2;
coll: IHTMLElementCollection;
iPos, iIndex: Integer;
selElem: IHtmlSelectElement;
optElem: IHtmlOptionElement;
begin
doc := WebBrowser1.Document as IHTMLDocument2;
if doc = nil then Exit;

coll := doc.all.tags('select') as IHTMLElementCollection;
iPos := 0; //要访问的下拉菜单的序号，从0开始为第一个
selElem := coll.item(iPos, 0) as IHtmlSelectElement;
if selElem = nil then Exit;

iIndex := 2; //下拉菜单的选项序号，从0开始为第一个，2为第三个选项
optElem := selElem.item(iIndex, 0) as IHtmlOptionElement;
if optElem = nil then Exit;

ShowMessage(optElem.text); //获取该选项的值
optElem.selected := True; //选中该选项
end;

转载于:https://www.cnblogs.com/stroll/p/4716305.html

Delphi访问网页中的下拉菜单相关推荐

html 下拉框设置名称,html下拉菜单怎么做？高手教你如何在HTML和CSS中创建下拉菜单...
html下拉菜单怎么做?html下拉菜单代码是什么?这些对于刚刚入门的新手,还不是很明白,下面高手教你如何在HTML和CSS中创建下拉菜单? 很多人都会遇到将鼠标悬停在导航上,会出现下拉菜单; 一般出 ...
python choice添加下拉框_自定义Django Form中choicefield下拉菜单选取数据库内容实例...
工作中遇到的问题,自定义了一个forms.form表单,某项需要作出下拉菜单,下拉菜单中的选项需要从数据库(objectForm models)中提取. form.py为: class objectF ...
python下拉菜单_自定义Django Form中choicefield下拉菜单选取数据库内容实例
工作中遇到的问题,自定义了一个forms.form表单,某项需要作出下拉菜单,下拉菜单中的选项需要从数据库(objectForm models)中提取. form.py为: class objectF ...
在excel的单元格中设置下拉菜单
很多时候我们在编辑excel的时候,在插入相同的内容时显得比较繁琐,下面教大家在excel单元格中设置下拉菜单,直接点击后更改单元格内容..步骤如下: 1.选中一列,然后点击菜单栏"数据&q ...
新版HyperMesh的Assemblies中调出下拉菜单查看Component（装配关系模型树）
新版HyperMesh的Assemblies中调出下拉菜单查看Component(装配关系模型树) 从Altair更新的2019版本开始,在Model模型树中找不到Assemblies了,这样导致好多 ...
excel中通过下拉菜单显示不同的报表内容，类似下拉选项中，一旦切换内容，后面的表格内容全都不同？
EXCEL是日常办公中应用非常多的办公软件之一,其强大的数据统计.分析功能为我们的工作带来不少方便.我们可以在EXCEL中设置下拉菜单,以方便我们输入相同内容.本文就以将性别设置为下拉菜单为例,介绍具 ...
为什么微信截图无法截取其他软件中的下拉菜单
原因终于找到了: 想要截取其他软件中的下拉菜单,不能使用微信默认的截屏快捷键!!! 改一下快捷键就可以了!!!
【自学HTML笔记第5篇】HTML中的下拉菜单标签
我们每个人都有瑕疵,不满别人的同时我们更应该去懂得理解和接受: 目录下拉菜单标签: 代码演示: select 标签常用属性: 代码演示: option标签常用属性: 代码演示: 如果觉得写的不错,就 ...
excel添加列下拉框票价_如何在excel中设置下拉菜单
excel是日常办公中应用非常多的办公软件之一,其强大的数据统计.分析功能为工作带来不少方便.在EXCEL中设置下拉菜单,以方便输入相同内容.本文就以将性别设置为下拉菜单为例,介绍在excel中设置下 ...

Delphi访问网页中的下拉菜单

Delphi访问网页中的下拉菜单相关推荐

最新文章

热门文章