Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.021 c
6-25488
zatochka2
2003-11-05 21:55
2004.01.09
raw socket


3-25187
Вольный Стрелок
2003-12-12 11:16
2004.01.09
работа TQuery.OnUpdateRecord


4-25660
Дремучий
2003-11-05 22:19
2004.01.09
Убрать кнопку максимизации!


3-25224
akim2
2003-12-11 13:44
2004.01.09
FB1 & FB 1.5


14-25524
NeyroSpace
2003-12-19 15:42
2004.01.09
Что с принтером (или с LPT портом)?




   Наверх