正文
delphi 网页提交按钮执行点击事件
提示：扫一扫查出行【扫一扫了解最新限行尾号】
复制提示
遍历即可实现，下列代码仅供参考：
var
i: integer;
T: OleVariant;
begin
T := WebBrowser1.Document;
for i := to T.all.Length - 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;
http://blog.csdn.net/yanjiaye520/article/details/7942366
