使用WebBrowser如何点击这样的图片?

Question

使用WebBrowser打开,需要模拟点击指定图片x=50,y=10的位置(可能要点有name的,也可能点击没有name的).要求程序可以最小化也能点击到,点击后WebBrowser显示你点击图片的坐标.另外两个图片在网页内的位置不是固定的.请高手帮忙分析!
要点击图片测试地址

Answer 1

procedure Tform1.buttonclick();
var
  i:Word;
  Doc:IHtmlDocument2;
  str:string;
begin
  for i:=0 to WebBrowser1.OleObject.Document.Images.Length - 1 do
  begin
    Doc:=WebBrowser1.Document as IHtmlDocument2;
    Str:=(Doc.Images.Item(i,0) as IHTMLImgElement).href;
    if Pos( 'per_btn_zc.gif',str) <> 0 then
    begin
      ((Doc.Images.Item(i,0) as IHTMLImgElement) as IHTMLElement).Click;
    end;
  end;
end;试试这个代码.可以点击图片的按钮.
把'per_btn_zc.gif'这个改为你要点击的图片就行了

Answer 2

感谢LoveMit的回复,不过这样的点击不能传递被点击的X,Y值