delphi WebBrowser1 网页提交按钮执行点击事件

本文整理自网络，侵删。

 遍历即可实现，下列代码仅供参考：
var
  i: integer;
  T: OleVariant;
begin
  T := WebBrowser1.Document;
  for i := 0 to T.all.Length - 1 do
  begin
    if T.all.item(i).tagName = 'INPUT' then
    begin
      if T.all.item(i).type = 'submit' then
      begin
        T.all.item(i).click;
        Exit;
      end;
    end;
  end;
end; 

相关阅读 >>

Delphi 悬浮窗口 浮动窗口 迅雷下载浮动窗口的实现

Delphi处理http请求自定义header

Delphi学习sql语句 - insert、update、delete

Delphi用内存流方式获取页面验证码图片

Delphi xe 无法编译apk提示sdk路径问题时？sdk路径配置方法

Delphi中txmldocument控件的用法

Delphi 非主窗体(即子窗体)在任务栏显示按钮

Delphi 一个文件重复生成的小工具[附源码]

Delphi inttohex

Delphi idhttp 实战用法(tidhttpex)

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi WebBrowser1 网页提交按钮执行点击事件