TWebBroserのWEB画面のリンクをクリックしたとき

解決


WEBブラウザ勉強中  2008-09-18 02:26:37  No: 31959  IP: [192.*.*.*]

Delphi6パーソナルです。
TWebBrowserをインストールしてフォームに貼り付けて
procedure TForm1.Button1Click(Sender:: TObject);
WebBrowser1.Navigate(URL);
でサイトを表示させるのですが、
画面のリンクを左クリックしてリンク先のページを表示するとき
このURLを捕まえる方法はあるのでしょうか。
明示的にWebBrowser1.Navigate(URL);を指令していないのに
不思議です。
イベントを見てもそれらしきものがないようですが。
WebBrowser1BeforeNavigate2イベントも通過しないようです。
よろしくお願いします。

編集    削除
WEBブラウザ勉強中  2008-09-18 02:32:21  No: 31960  IP: [192.*.*.*]

自己レスです。
WebBrowser1BeforeNavigate2のURLで取得できました。
すみませんでした。

編集    削除