Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Сети";
Текущий архив: 2004.09.19;
Скачать: [xml.tar.bz2];

Вниз

Проверка открытия сайта   Найти похожие ветки 

 
НовиЧок ©   (2004-07-10 02:49) [0]

Здравствуйте снова!
Как можно проверить, что в WebBrowser"e открыт сайт?

Дело в том, что у меня процедура загружает в WebBrowser сайт и сразу после этого идёт обработка кода, но конечно сайт не может так быстро загрузиться, следовательно, нужно проверить открылся ли сайт.

Заранее БОЛЬШОЕ спасибо.


 
oleg_SYS   (2004-07-10 07:18) [1]

Сначала объяви переменную типа Boolean потом обработай событие onDownloadComplete

procedure TForm1.WebBrowser1DownloadComplete(Sender: TObject);
begin
com:=true;
end;


Дело в том, что у меня процедура загружает в WebBrowser сайт и сразу после этого идёт обработка кода
//

WebBrowser1.Navigate("http://");
com:=false;
while NOT com do
application.ProcessMessages;


 
SergP ©   (2004-07-10 17:48) [2]


>  [1] oleg_SYS   (10.07.04 07:18)


При многофреймовой документе это сработает ранее чем загрузится весь документ.


>  НовиЧок ©   (10.07.04 02:49)


У TWebbrowser есть свойство busy. попробуй его поюзать. Возможно это поможет. Хотя черт его знает.


 
rOOse ©   (2004-07-10 18:23) [3]

Закинь обработку кода в WebBrowser.OnDownloadComplete


 
Piter ©   (2004-07-11 15:01) [4]

WebBrowser1.Navigate("http://");
Repeat
 Application.ProcessMessages;
Until (WebBrowser1.readyState = 4);



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

Форум: "Сети";
Текущий архив: 2004.09.19;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.042 c
14-1093836600
gn
2004-08-30 07:30
2004.09.19
Карбид кремния избавит процессор от вентилятора


14-1093772348
Cheater
2004-08-29 13:39
2004.09.19
Хороший сайт с mp3 музыкой


1-1094047277
Alek
2004-09-01 18:01
2004.09.19
Как зашифровать в MD5?


4-1091136573
BaG
2004-07-30 01:29
2004.09.19
Как свернуть окно в "Область уведомлений" (правый нижний угол)?


14-1093677955
ASilver
2004-08-28 11:25
2004.09.19
Подскажите литературу по программированию на perl под Linux.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский