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

Вниз

Полная загрузка страницы в WebBrowser   Найти похожие ветки 

 
Checist [root]   (2003-12-12 17:41) [0]

Как мне определить загружена ли полностью страница с фреймами, картинками и прочим в WebBrowser?
Дайте кусок сырца, плиз


 
Checist [root]   (2003-12-17 16:02) [1]

Ну, дайте, я прошу!


 
VAleksey ©   (2003-12-17 16:15) [2]


procedure TBSPLinkWorker.WaitForComplete;
consts
cDocComplete = "complete";
var
vDoc:IHTMLDocument2;
IDisp:IDispatch;
vDocs:TFramesObject;
i, k:integer;
begin
While true do
begin
IDisp := fWeb.ControlInterface.Document;
IDisp.QueryInterface(IID_IHTMLDocument2,vDoc);
//Получает список всех IHTMLDocument2 из фреймов
vDocs := TFramesObject.Create(vDoc);
k:=0;
try
for i:=0 to vDocs.Count-1 do
begin
if AnsiLowerCase(vDocs.items[i].readyState) <> cDocComplete then
k:=k+1;
end;
if k=0 then Break;
finally
vDocs.Free;
end;
Application.ProcessMessages;
end;
end;


PS
если я не прав или кто-нибудь имеет более продвинутый вариант просьба сказать в данной веточке или на мыло.


 
VAleksey ©   (2003-12-17 16:17) [3]

Т.е. суть такая, что тебе нужно получить список всех IHTMLDocument2 из фреймов и проверить их readyState.


 
Checist [root]   (2003-12-24 17:53) [4]

Тип TFramesObject как его подключить, какой юнит нужен и где его взять?
А есть, ли еще методы?


 
Checist [root]   (2003-12-24 18:23) [5]

Ну, давайте, помогите!


 
Checist [root]   (2003-12-24 19:02) [6]

Меня, чего, игнорируют?



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

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

Наверх




Память: 0.47 MB
Время: 0.038 c
3-25238
Mikka
2003-12-11 10:27
2004.01.09
Базы данных SQL


3-25214
MegaSharp
2003-12-13 15:19
2004.01.09
Logon


8-25451
NikB
2003-09-09 01:02
2004.01.09
Point In Poligon


1-25347
Goida
2003-12-22 11:24
2004.01.09
Странно ведет себя Delphi


14-25595
Ega23
2003-12-17 13:17
2004.01.09
А пользуется ли кто-нибудь Add-To-Do?