WebBrowserでログアウトでウィンドウを閉じるときMsgHandlerでエラー。

解決

武田 2006-08-01 05:44:35 No: 22770

いつもお世話になっております。環境はWindows XP Delphi 6Personalです。
下記でママん様にご指導いただいた方法でPageControlを使ったWebBrowserの簡単なブラウザを作成しました。が
https://www.petitmonte.com/bbs/answers?question_id=4078
それに加えて「WebBrowserでの入力が・・・」で質問されているWebBrowserの画面入力バグ対策を
https://www.petitmonte.com/bbs/answers?question_id=973
でtorum さんが書かれている対処方法をとっています。
ブラウジングおよび入力バグ対策もうまく作動しています。
ただ一つ
画面のログアウトなどの「閉じる」ボタンの時
「ＯＬＥコントロールウィンドウ  ハンドルの取得に失敗しました」というエラーがでるので対処方法に苦慮しています。
場所は  Handled := (IsDialogMessage(WebBrowser1.Handle, Msg) = True);ここだと思うのですがPageControlの閉じ方と関係あるのでしょうか
力不足で解決できません。
たとえば  自分のモデムにログインしてログアウトの閉じるボタンで出るときや、あるいは、ログアウトで画面を閉じる例として
NTTの電話回線の線路情報検索画面の回線距離など調査する画面から
ログアウトするときなど
  NTT東日本  http://www.ntt-east.co.jp/line-info/
  NTT西日本  http://www.ntt-west.co.jp/flets/adsl/plan_sentaku/index.html
エラーが発生します。
TabControlでやる分には子ウィンドウごと破棄するためか問題ありませんでした。
よろしくご指導いただければ幸いです。

武田 2006-08-02 21:02:14 No: 22771

自己レスです。
解決とさせていただきます。
PageControlをつかうのとTabControlを使うのといろいろ試していましたが、
TabControlを使う場合は、この問題は解決できましたので、とりあえず
TabControlでいきます。ただし、画面表示動作などはPageControlを使う方がきれいなので未練はありますが。
ありがとうございました。