S
shopman
Unregistered / Unconfirmed
GUEST, unregistred user!
来自：DreamTiger 时间：00-4-1 15:14:13 ID:209886
得到button：
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
//或者type='button'，type='cancel'，大小写自己注意
begin
t.all.item(i).click;
exit;
end;
end;
end;
end;
为什么没有效果????
得到button：
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
//或者type='button'，type='cancel'，大小写自己注意
begin
t.all.item(i).click;
exit;
end;
end;
end;
end;
为什么没有效果????