掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
マルチスレッドでWebBrowser1NewWindow2で窓を開くには。 (ID:34439)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
procedure TIETabSheet.WebBrowser1NewWindow2(Sender: TObject;var ppDisp: IDispatch;var Cancel: WordBool); var I: Integer; begin I := Form6.PageControl1.PageCount; TNaviThread.Create(''); //＜＜■■ここで右クリックの新しいタブが開くには？？■■ while Form6.PageControl1.PageCount = I do begin Application.ProcessMessages; end; ppDisp := (Form6.PageControl1.Pages[Form6.PageControl1.PageCount-1] as TIETabSheet).WebBrowser1.Application; Form6.PageControl1.ActivePageIndex := Form6.PageControl1.PageCount-1; //ppDisp := (Form6.PageControl1.ActivePage as TIETabSheet).WebBrowser1.Application; end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.