RSS订阅 | 匿名投稿
您的位置:网站首页 > 组件 > 正文

delphi WebBrowser中获取Input表单值

作者:admin 来源: 日期:2018/1/12 22:08:08 人气: 标签:

delphi WebBrowser中获取Input表单值

单元文件:
MSHTML

var
    i:Integer;
    myole:oleVariant;
begin
    myole :=WebBrowser1.OleObject.document;
    for i := 0 to myole.all.length - 1 do
    begin
        if myole.all.item(i).tagName = 'INPUT' then // 一定要大写  小写无效。
        begin

            mmo1.Lines.Add(myole.all.item(i).name);

            mmo1.Lines.Add(myole.all.item(i).value);
        end;
    end;

end;

读完这篇文章后,您心情如何?
0
0
0
0
0
0
0
0
本文网址:
下一篇:没有资料