关于使用webbrowser控件获得网页信息的内容

forDream_ 2010-06-09 12:14:36
存在下面一段HTML代码、

<table width=100%>
<tr class=title>
<td width=50%>编号:20100501</td>
<td width=50%>19023059</td>
</tr>
<tr class=title>
<td width=50%>查询周期:2010年5月1日-2010年5月31日</td>
<td width=50%>查询日期:2010年6月9日</td>
</tr>
</table>

我用webbrowser控件想获得“查询周期”这一个单元格的内容(即:查询周期:2010年5月1日-2010年5月31日)、于是有下面的代码

procedure TForm1.FormClick(Sender: TObject);
Var
ii:Cardinal;
ObjTmp:OleVariant;
begin
{wb1为webbrowser控件}
For ii:=0 To wb1.OleObject.Document.getElementsByTagName('td').Length - 1 Do
Begin
ObjTmp:=wb1.OleObject.Document.getElementsByTagName('td').item(ii);
If Pos('查询周期',objtmp.innerText)>0 Then
Begin
ShowMessage(ObjTmp.innerText);
Break;
end;
end;
end;

然而为什么会显示出整个table的文本而不是这个单元格的文本呢?
...全文
66 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
forDream_ 2010-06-14
  • 打赏
  • 举报
回复
嗯、很不好意思、、是我个人原因、、在这个之外还有一个TD标签、而我没复制过来、、汗呐、、是我不仔细的关系、、分数送你了、、端午快乐
lght 2010-06-09
  • 打赏
  • 举报
回复
楼主忽悠我,明明显示的是“查询周期:2010年5月1日-2010年5月31日”

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧