1,593
社区成员
发帖
与我相关
我的任务
分享IHTMLElement.click出错?
procedure EnumElement(DOC2:IHtmlDocument2;classname:string;title:string);
var
j:Integer;
HTMLElement:IHTMLElement;
begin
for j:=0 to Doc2.all.length-1 do
begin
HTMLElement:=Doc2.all.item(j,0) as IHTMLElement;
if (HTMLElement.className=classname) and(HTMLElement.title=title) then
begin
HTMLElement.click;//这里出错，为什么?
Exit;
end;
end;
end;
var
j:Integer;
HTMLElement:IHTMLElement;
begin
for j:=0 to Doc2.all.length-1 do
begin
HTMLElement:=Doc2.all.item(j,0) as IHTMLElement;
if (HTMLElement.className=classname) and(HTMLElement.title=title) then
begin
HTMLElement.click;//这里出错，为什么?
Exit;
end;
end;
end;
...全文
请发表友善的回复…
发表回复
gogogo2003 2007-10-08
- 打赏
- 举报
有人知道吗?
jieguo 2007-10-08
- 打赏
- 举报
好像只有支持click的元素才可以click，比如 img ,href就可以
像 (doc.images.item('NV_CoolPad1_r2_c2',EmptyParam) As IHTMLElement).Click;
像 (doc.images.item('NV_CoolPad1_r2_c2',EmptyParam) As IHTMLElement).Click;
骑牛上铂金 2007-10-04
- 打赏
- 举报
Up!
