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

Вниз

Гружу 2 вебброузера одновременно, появился вопрос   Найти похожие ветки 

 
Igor23   (2008-02-16 13:26) [0]

После загрузки документа в WB2 в событии ondocumentcomplete2 реализуется мой код, какое условие поставить, чтобы мой код не исполнялся пока не исполнится код в ondocumentcomplete1 WB2 ???


 
Бегущий человек ©   (2008-02-16 19:25) [1]

Завести глобальную булевскую переменную. Присвоить ей тру, после того как выполнится код ondocumentcomplete1. В ondocumentcomplete2 исполнять код только если переменная равна тру.


 
AndreyV ©   (2008-02-16 21:58) [2]

> [0] Igor23   (16.02.08 13:26)

Они что, в разных потоках?

> [1] Бегущий человек ©   (16.02.08 19:25)
> исполнять код только если переменная равна тру.

Проверять переменную в цикле?


 
Бегущий человек ©   (2008-02-16 23:59) [3]

>AndreyV ©   (16.02.08 21:58) [2]

>
> Проверять переменную в цикле?

Зачем?  Сбрасывать её в false после выполнения события ondocumentcomplete2


 
AndreyV ©   (2008-02-17 00:18) [4]

> [3] Бегущий человек ©   (16.02.08 23:59)
> > Проверять переменную в цикле?
> Зачем?  Сбрасывать её в false после выполнения события ondocumentcomplete2


Проверять в цикле перед "исполнять код только если переменная равна тру"?
И автор ещё не ответил.


 
DiamondShark ©   (2008-02-17 09:28) [5]

procedure Form1.OnDocumentComplete1;
begin
 FDoc1Complete := true;
 if FDoc1Complete and FDoc2Complete then DoMyWork;
end;
procedure Form1.OnDocumentComplete2;
begin
 FDoc2Complete := true;
 if FDoc1Complete and FDoc2Complete then DoMyWork;
end;


 
AndreyV ©   (2008-02-17 15:51) [6]

Перечитал оригинальный пост.
Первый раз понял вопрос неправильно.



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

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

Наверх





Память: 0.46 MB
Время: 0.007 c
11-1185758323
Dr. Andrew
2007-07-30 05:18
2008.03.16
Как установить стиль XP для кнопок и ползунка ScrollBar?


2-1203085303
Rentner
2008-02-15 17:21
2008.03.16
Как вывести надпись на рабочий стол?


2-1203094046
Zurn
2008-02-15 19:47
2008.03.16
Обработка интернет страниц


15-1202475008
korstin
2008-02-08 15:50
2008.03.16
Киноманам посвящается )))


2-1203176661
н.сергей
2008-02-16 18:44
2008.03.16
TTreeView и данные





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский