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 设置系统默认打印机

Delphi xe7 的 android bitmap转jpg图的参数问题

Delphi winapi: movewindow - 改变窗口的位置与大小

Delphi 数据模块池

Delphi xe 新功能试用:多种皮肤样式静、动态设置方法

Delphi xp下的进程静音技术

Delphi滚动标题栏文字

Delphi返回一个汉字的unicode编码

Delphi 调用sql和mysql存储过程

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



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...