Webbrowserにのタイムアウト機能をつけるには

解決

横井 2014-03-20 03:18:15 No: 46135

よろしくお願いします。
環境はDelphi６P Win７です。
タブブラウザを作成しています。
普通にTabSheetEx.WebBrowser1.Navigate(URL);
でナビケーとしています。イベント処理は普通に、NavigateComplete2,CommandStateChange,1NewWindow2,StatusTextChange,DocumentCompleteを使っています。
悩みは、変なサイトに接続したら、長時間黙りになったり、落ちます。その前に自分で終わらせます。
これを３秒くらいにタイムアウトを決めて、反応が遅い、無いなどのとき
このプロセス（用語が不適当かも）をキャンセルして、ナビゲーションを
リセットして、何事もなかったようにできないでしょうか。
ネットで探しますが、Delphiではほぼ皆無、VBやC＋で２件ほど見ましたが
意味不明。よほど馬鹿なことを聞いているのではと思いながら質問しました。
よろしくお願いします。

横井 2014-03-21 21:28:12 No: 46136

自己レスです。
タイトルが変なので追加説明させてもらいました。
「WebBrowserコントロール自身にタイムアウトを付けたい」ような書き方ですが
twebbrowserを使ったアプリでタイムアウト機能を付けたい」に変更させてください。
TabSheetEx.WebBrowser1のTabSheetExはクラス名です。
プロセス→スレッドに訂正させてください。
あとタイムアウトの記事として
http://okwave.jp/qa/q4846555.html
http://social.msdn.microsoft.com/Forums/vstudio/ja-JP/d7bd78a1-0dc5-437c-93e1-429c06ac39b6/webbrowser?forum=vbgeneralja
に書いてあるのですが、コードが解りませんでした。
以上訂正させていただきました。

横井 2014-03-25 22:44:30 No: 46137

自己レスです。
やはり愚問のようで、解決とさせていただきます。
ありがとうございました。