掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Web画面を左クリックで別タブで開くには。 (ID:37188)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
procedure TIETabSheet.WebBrowser1BeforeNavigate2(Sender: TObject; const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData, Headers: OleVariant; var Cancel: WordBool); var IETab: TIETabSheet; begin if (Button1のClickでない場合) then begin Cancel := True; with Form1 do begin IETab := TIETabSheet.Create(PageControl1) IETab.Parent := PageControl1; IETab.PageControl := PageControl1; IETab.PageControl1.ActivePage := TTabSheet(IETab); IETab.WebBrowser1.Navigate(URL); end; end; end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.