 |
Выполнение функций, после завершения потоков [delphi] |
03.02.2010, 22:40
|
|
Познающий
Регистрация: 07.11.2009
Сообщений: 36
С нами:
8690006
Репутация:
0
|
|
Выполнение функций, после завершения потоков [delphi]
Код:
//scan - поток
..............
if th >= k then
th:= k;
for q:= 1 to th do
Scan.Create(false);
sleep(200);
end;
end.
вместо "........" реализовать проверку:
"После того как все потоки выполнены"....
Что бы, если проверенны не все порты, опять запустить цикл создания потоков
Подскажите как реализовать? |
|
|
03.02.2010, 23:01
|
|
Участник форума
Регистрация: 29.08.2008
Сообщений: 151
С нами:
9315854
Репутация:
107
|
|
Такой вариант: выполнять эту проверку после завершения последнего потока.
Т.е.
T:=0;
/---------------/
поток что-то делает
всё сделал - увеличиваем переменную T
если T равно количеству потоков (т.е. это последний поток завершается), то делаем проверку и при необходимости снова запускаем потоки
/---------------/
|
|
|
|
03.02.2010, 23:04
|
|
Познающий
Регистрация: 07.11.2009
Сообщений: 36
С нами:
8690006
Репутация:
0
|
|
ZdezBilYa думал об этом, только как эту проверку реализовать?
|
|
|
|
03.02.2010, 23:06
|
|
Постоянный
Регистрация: 13.12.2008
Сообщений: 354
С нами:
9162683
Репутация:
175
|
|
Да, можно делать все так, как говорит ZdezBilYa. Или же можно еще переменной T в самом начали присвоить значение количества потоков, а потом в конце основной функции потока пишешь dec(T). Если T равняется 0, значит все потоки выполнены.
|
|
|
|
03.02.2010, 23:09
|
|
Познающий
Регистрация: 07.11.2009
Сообщений: 36
С нами:
8690006
Репутация:
0
|
|
спс, попробую
|
|
|
|
03.02.2010, 23:41
|
|
Постоянный
Регистрация: 16.08.2006
Сообщений: 640
С нами:
10386906
Репутация:
599
|
|
http://msdn.microsoft.com/en-us/library/ms686946%28VS.85%29.aspx
|
|
|
|
|
|
Предыдущая тема
Следующая тема
Похожие темы
|
| Тема |
Автор |
Раздел |
Ответов |
Последнее сообщение |
|
Низкоуровневое исследование клиента игровой платформы Garena
|
Dosia |
Статьи |
29 |
10.10.2010 00:09 |
|
[C#] FAQ Многопточные приложения
|
Algol |
С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby |
13 |
13.04.2010 16:08 |
|
[Delphi] Переключение потоков между собой
|
_PARAZIT_ |
С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby |
27 |
25.12.2009 10:33 |
|
WaitForMultipleObjects для завершения потоков
|
sn0w |
С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby |
0 |
12.12.2009 19:06 |
|
Выполнение скрипта после после закрытия браузера как?
|
Student :) |
PHP |
8 |
18.12.2008 23:15 |
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Линейный вид
