掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Webページの表示完了を知りたい (ID:39281)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
>Refreshの代わりにNavigateというのは確かにその通りですね。頭が固まっていました。 >ただどちらにしても、フレームページでは何度もDocumentCompleteが発生するので、何か考えないと >だめですね。当たり前ですが。 フレームを使用してるWEBページでの対策ならば、 procedure TForm1.WebBrowser1DocumentComplete(Sender: TObject; const pDisp: IDispatch; var URL: OleVariant); var CurWB: IWebBrowser; TopWB: IWebBrowser; sName: string; begin CurWB := pDisp as IWebBrowser; TopWB := (Sender as TWebBrowser).ControlInterface; sName := OleVariant(CurWB.Document).ParentWindow.Name; if CurWB <> TopWB then begin // サブフレーム読み込み(まだミカン) Memo1.Lines.Add(' SubFrame：'+ sName); end else begin // 全フレーム読み込み、いよ！完(イヨカン)だね // …ページ表示完了時の処理… Memo1.Lines.Add('MainFrame：'+ sName); end; end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.