Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.04.15;
Скачать: CL | DM;

Вниз

Размер HTML документа в браузере   Найти похожие ветки 

 
BigVova ©   (2007-03-28 15:14) [0]

Здравствуйте! Подскажите пожалуйста как определить размер документа, загруженного в TWEBBrowser. Нужно внедрить окно TWEBBrowser без полос прокрутки.


 
easy ©   (2007-03-28 15:27) [1]

document.body.scrollHeight


 
BigVova ©   (2007-03-28 16:07) [2]

Спасибо большое за ответ!
Не могли бы Вы уточнить как доступиться к этому свойству из-под Делфи?
Я обращаюсь к Document как к интерфейсу IHTMLDocument2, у которого есть свойство body, соответствующее интерфейсу IHTMLElement
но в этом интерфейсе нет свойства scrollHeight
не подскажете как к нему обратиться правильно?


 
easy ©   (2007-03-28 17:37) [3]

procedure TForm1.WebBrowser1DocumentComplete(Sender: TObject;
 const pDisp: IDispatch; var URL: OleVariant);
var
 body:IHTMLElement2;
 Document:IHTMLDocument2;
begin
 WebBrowser1.Document.QueryInterface(IHTMLDocument2,Document);
 Document.body.QueryInterface(IHTMLElement2,body);
 caption:=inttostr(body.scrollHeight);
end;


 
BigVova ©   (2007-03-28 19:35) [4]

Спасибо огромное!


 
palva ©   (2007-03-28 20:14) [5]

easy ©   (28.03.07 17:37) [3]
Что-то не пойму, а где присваивание локальным переменным?
Это так сейчас новые компиляторы позволяют писать? Или недосмотр просто?


 
easy ©   (2007-03-28 20:55) [6]


> а где присваивание локальным переменным?

>function QueryInterface(const IID: TGUID; out Obj): HResult; stdcall;
>Returns a reference to a specified interface if the object supports that interface.
>sets the Obj parameter so that it points to an instance of the specified interface.


насамом деле надо было писать
OleCheck(WebBrowser1.Document.QueryInterface(IHTMLDocument2,Document));
OleCheck(Document.body.QueryInterface(IHTMLElement2,body));

но
> недосмотр просто

или лень..)


 
palva ©   (2007-03-28 21:37) [7]

А, теперь понял. Это я ступил.



Страницы: 1 вся ветка

Текущий архив: 2007.04.15;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.061 c
2-1174458090
frogmaster
2007-03-21 09:21
2007.04.15
Ошибка (Field user must have value)


1-1171893072
tytus
2007-02-19 16:51
2007.04.15
Доступ к Java 1.4.2_05 из Delphi


2-1174490931
vikm
2007-03-21 18:28
2007.04.15
Ошибка ADOQuery.


1-1171532879
MegaVolt
2007-02-15 12:47
2007.04.15
Как красиво отучить TSpeedButton рисовать себя в стиле WinXP


15-1174297229
WG
2007-03-19 12:40
2007.04.15
После переустановки офиса глючит OLE