如何找到一个按钮＆QUOT;价值＆QUOT;在html页面（的网页浏览器 - 德尔福）

问题描述

我有，它有3种形式，3提交按钮的HTML页面。按钮有没有名字，但他们有值：

 ＆LT;输入类型=提交VALUE =登陆GT＆;
 

我如何才能找到这个按钮，它的价值和点击它

感谢

解决方案

 程序TForm1.Button1Click（发件人：TObject的）;
VAR
  ovElements：OleVariant;
  我：整数;
开始
  ovElements：= WebBrowser1.OleObject.Document.forms.item（0）.elements;
  对于i：= 0（ovElements.Length  -  1）做
    如果（ovElements.item（I）= .tagNameINPUT）和
      （ovElements.item（I）= .TYPE提交）和
  （ovElements.item（I）。价值='登录'），那么
      ovElements.item（我）。点击;
结束;
 

i have a html page that it have 3 forms with 3 submit buttons . buttons have no name but they have value :

<input type="submit" VALUE="Login">

How can i find this button with its value and click on it ?

Thanks

解决方案

procedure TForm1.Button1Click(Sender: TObject);
var
  ovElements: OleVariant;
  i: Integer;
begin
  ovElements := WebBrowser1.OleObject.Document.forms.item(0).elements;
  for i := 0 to (ovElements.Length - 1) do
    if (ovElements.item(i).tagName = 'INPUT') and
      (ovElements.item(i).type = 'SUBMIT') and
  (ovElements.item(i).Value = 'Login') then
      ovElements.item(i).Click;
end;

这篇关于如何找到一个按钮＆QUOT;价值＆QUOT;在html页面（的网页浏览器 - 德尔福）的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！