Здравствуйте!
Столкнулся со следующей проблемой: на форме есть объект TCppWebBrowser и пара кнопок TButton (PgUp и PgDown),
нужно, чтобы при нажатии на эти кнопки, загруженный документ в CppWebBrowser скроллировался.
Пробовал делать так, но не работает:
SendMessage(CppWebBrowser->Handle, WM_VSCROLL, SB_PAGEUP, NULL);
Как это можно реализовать?
Здравствуйте, Pike, Вы писали:
P>Здравствуйте!
P>Столкнулся со следующей проблемой: на форме есть объект TCppWebBrowser и пара кнопок TButton (PgUp и PgDown),
P>нужно, чтобы при нажатии на эти кнопки, загруженный документ в CppWebBrowser скроллировался.
P>Пробовал делать так, но не работает:
P>P>SendMessage(CppWebBrowser->Handle, WM_VSCROLL, SB_PAGEUP, NULL);
P>
P>Как это можно реализовать?
void __fastcall TForm1::Button8Click(TObject *Sender)
{
CComQIPtr<IHTMLDocument2, &IID_IHTMLDocument2> pDoc;
CComQIPtr<IHTMLWindow2, &IID_IHTMLWindow2> pw;
if ( SUCCEEDED (WB->Document->QueryInterface(IID_IHTMLDocument2, (LPVOID*)&pDoc)))
if ( SUCCEEDED (pDoc->get_parentWindow(&pw)))
pw->scrollBy(0, 100);
}
или IHTMLElement::scrollIntoView
Все работает.
_GIZMO, большое Вам спасибо!