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

Вниз

URL   Найти похожие ветки 

 
niko4615   (2002-05-29 10:28) [0]

Здравствуйте
Как проверить загрузилась ли страница по заданому URL через определннное время в компоненте Webbrowser?
И как проверить изменился ли URL в Webbrowser?


 
int64 ©   (2002-05-29 12:23) [1]

procedure TForm1.Timer1Timer(Sender: TObject);
Var URL, ReadState: string;
begin
if assigned(WebBrowser1.Document) then
URL:= (WebBrowser1.OleObject.Document.url)
else URL:= "Unknow URL";

case WebBrowser1.readystate of
READYSTATE_COMPLETE: ReadState:= "COMPLETE";
READYSTATE_UNINITIALIZED: ReadState:= "UNINITIALIZED";
READYSTATE_LOADING: ReadState:= "LOADING";
READYSTATE_LOADED: ReadState:= "LOADED";
READYSTATE_INTERACTIVE: ReadState:= "INTERACTIVE";
else ReadState:= "Unknow ReadState";
end;

Caption:= URL+" | "+ReadState;
end;



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

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

Наверх




Память: 0.46 MB
Время: 0.017 c
4-24286
Andrew_K
2002-05-31 10:20
2002.08.08
CreateProcess


3-23911
Evgeny7
2002-07-16 13:48
2002.08.08
Объединение несколькихбаз в одну


6-24162
Sour
2002-05-26 15:47
2002.08.08
Куда делись сообщения?


3-23963
Stecoff
2002-07-19 10:27
2002.08.08
Как проверить, создана ли форма


14-24224
Bboy
2002-07-15 09:29
2002.08.08
Подскажите недогадливому, как снести XP???