TWebBrowserのスクロール制御

解決

たけちゃん 2013-03-07 23:21:56 No: 44004

自前でWin8タブレット用のブラウザを作っています
WebBrowser1を、自前の２つの上下ボタンで、
設定した分（例えば3行分ぐらいとか5行分）
上下にスクロールさせるにはどうすれば良いでしょうか？
XE2です。

DEKO 2013-03-08 00:15:26 No: 44005

こんにちは。

// 下へ移動
WebBrowser1.OleObject.Document.ParentWindow.ScrollBy(0, +100);

// 上へ移動
WebBrowser1.OleObject.Document.ParentWindow.ScrollBy(0, -100);

[...scroll TWebBrowser with own buttons? (Torry's Delphi Pages)]
http://www.swissdelphicenter.ch/torry/showcode.php?id=1186

DEKO 2013-03-08 00:43:54 No: 44006

> Win8タブレット用
タブレットだと上下スクロールはパニングが有効ですので、
ボタンによるスクロールは使い所が難しいかもしれませんね。

たけちゃん 2013-03-08 18:08:11 No: 44007

教えて頂いた方法でうまくいきました！
タブレットでも問題無かったです。
ありがとうございました！