请教，在delphi 使用webbrowser， 如何写点击事件，再连接另一个网站

请教，在delphi 使用webbrowser， 如何写点击事件，再连接另一个网站！目的：webbrowser打开的是一个广告图片，想通过点击此广告再连接到一个网站。谢谢各位高手的回复！

解决方案 »

  1.   

    如果广告是个url，你点击后WebBrowser会自动跳到新的网址
      

  2.   

    就是这把：
    <a href="http://www.xxx.com" target="_blank"><img src="http://www.xxxx.com/a.jpg" width="150" height="60" ></a> 
      

  3.   

    Urls.Text:=网址;
    WebBrowser1.Navigate(WideString(Urls.Text), Flags, Flags, Flags, Flags);
      

  4.   

    主要目的是：webbrowser已经打开的是一个广告图片，想通过点再击此广告再连接到一个网站（URL）。有什么方法吗？谢谢。
      

  5.   

    先设置：图片：<a href="http://www.xxx.com" target="_blank"><img src="http://www.xxxx.com/a.jpg" width="150" height="60" ></a>然后在控件事件编写：
    procedure TForm1.WebBrowser1NewWindow2(Sender: TObject;    var ppDisp: IDispatch; var Cancel: WordBool);    begin    ppDisp := WebBrowser2.Application; // 新的窗口先指向WebBrowser2    end;    // 在WebBrowser2的OnBeforeNavigate2事件中：    procedure TForm1.WebBrowser2BeforeNavigate2(Sender: TObject;    const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,    Headers: OleVariant; var Cancel: WordBool);    begin    WebBrowser1.Navigate(string(URL)); // 再指回WebBrowser1    Cancel := True;    end;
      

  6.   

    通过webbrowser.OleObject.document 获取DOM对象，然后就可以用DOM对象的方法来的到连接对象，然后用调用连接对象的click方法就可以了。
      

  7.   

    调用javascript最好