Помощь - Поиск - Пользователи - Календарь
Полная версия: Scroll в WebBrowser...
Форум «Всё о Паскале» > Современный Паскаль и другие языки > Делфи
-Snake_B-
Как узнать значения горизонтального/вертикального скролла в WebBrowser'e?
-Snake_B-
А ну и ещё... как узнать размеры самого webBrowser'а (~)... ну для того чтобы можно было сдвинуть его в крайние положения например...
volvo
Цитата
для того чтобы можно было сдвинуть его в крайние положения например...

Для этого достаточно сделать следующее:
// Передвигаем скроллбар до упора вниз:
WebBrowser1.OleObject.Document.ParentWindow.ScrollBy(0,WebBrowser1.OleObject.Document.Body.ScrollHeight);

// ... и теперь - вверх:
WebBrowser1.OleObject.Document.ParentWindow.ScrollBy(0,-WebBrowser1.OleObject.Document.Body.ScrollHeight);


(влево/вправо - аналогично...)

А вот с определением текущей позиции скроллбара - сложнее, надо с интерфейсами заморачиваться...
Гость
Цитата(volvo @ 27.07.2007 23:40) *

А вот с определением текущей позиции скроллбара - сложнее, надо с интерфейсами заморачиваться...


а можно подробнее... ну очень нуна... smile.gif
volvo
Хм... На самом деле все проще. Вот так определяется позиция ScrollBar-а на WebBrowser-е:

procedure TForm1.Button1Click(Sender: TObject);
var pnt: TPoint;
begin
pnt.X := Webbrowser1.OleObject.Document.Body.ScrollLeft;
pnt.Y := Webbrowser1.OleObject.Document.Body.ScrollTop;

ShowMessage(Format('Left: %d, Top: %d', [pnt.X, pnt.Y]));
end;

Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.