скрол в twebbrowser

← →
Raptoridze (2007-01-31 05:10) [0]

как можно узнать текущую позицию скроллбара в TwebBrowser?
изменять могу ) таким методом WebBrowser1.OleObject.Document.parentWindow.scroll(10,0);
а вот как узнать текущую?

← →
wal © (2007-01-31 08:37) [1]

http://msdn2.microsoft.com/en-us/library/ms535202.aspx

← →
Виктор007 (2007-05-10 20:59) [2]

Function GetWebHwnd(): integer;
var
tHdl: HWND;
begin
tHdl := FindWindowEx(Form1.handle, 0, "Shell Embedding", "");
If tHdl <> 0 Then
begin
tHdl := FindWindowEx(tHdl, 0, "Shell DocObject View", "");
If tHdl <> 0 Then
begin
result := tHdl;
end;
end;
end;

ShowMessage(IntToStr(GetScrollPos(GetWebHwnd, 1)));

Пытаюсь получить информацию, но никак не могу добраться до нужного окна... Я так понял что WebBrowser создает 3 окна:
Shell Embedding
-- Shell DocObject View
--- Internet Explorer_Server

Но не одно не откликается на GetScrollPos :(

скрол в twebbrowser Найти похожие ветки