Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

скрол в twebbrowser [D6, WinXP]


Raptoridze ©   (2007-01-31 05:10:00) 

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


Виктор007   (2007-05-10 20:59:00) [1]

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 :(


wal   (2007-01-31 08:37:00) [2]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо