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

Вниз

Подскажите как красиво сделать.   Найти похожие ветки 

 
Yakudza   (2003-10-08 13:54) [0]

Запускаеться один поток:
procedure TMyThread.Execute;
begin
if not ConnectTo then
begin
//тут ножно запустить еще один поток который будет пиговать
//получаем результаты пинга и если ок то поехали дальше
end;
end;

Так вот как правильно сделать так, что бы второй поток отработал а первый подождал результат его работы, ну и в зависимости от результатов шо нибуть сделал.


 
Chlavik   (2003-10-08 14:13) [1]

А зачем тебе второй поток?? добавь в этот клас свой метод Ping и пингуй...
procedure TMyThread.Execute;
begin
if not ConnectTo then
begin
Ping;
//Обрабатываем результаты пинга и если ок то поехали дальше
end;
end;

Всё равно VCl тормозить не будет...


 
Yakudza   (2003-10-08 14:22) [2]

Ну здесь я согласен.
А если нужно из основного пототока пинговать, как приостановить первый, пинговать вторым пока не появиться связь или минуту, например, если связь появилась заврешить второй получить из него результат и продолжить первый поток.


 
Polevi   (2003-10-08 14:26) [3]

PingThread.WaitFor



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

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

Наверх





Память: 0.44 MB
Время: 0.007 c
14-65610
Izyum
2003-10-01 10:18
2003.10.20
Разве можно так пить?


3-65367
AlexA
2003-09-30 10:42
2003.10.20
использование ODBС


1-65445
Дмитрий
2003-10-07 15:16
2003.10.20
Стать на последний элемент в ListView


1-65444
PRT
2003-10-07 15:34
2003.10.20
QREPORT


1-65531
bers
2003-10-08 10:10
2003.10.20
Подключение Си-шных библиотек.





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