ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
 |
Выполнение функций, после завершения потоков [delphi] |

03.02.2010, 22:40
|
|
Познающий
Регистрация: 07.11.2009
Сообщений: 36
Провел на форуме: 77411
Репутация:
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
Провел на форуме: 1551582
Репутация:
107
|
|
Такой вариант: выполнять эту проверку после завершения последнего потока.
Т.е.
T:=0;
/---------------/
поток что-то делает
всё сделал - увеличиваем переменную T
если T равно количеству потоков (т.е. это последний поток завершается), то делаем проверку и при необходимости снова запускаем потоки
/---------------/
|
|
|

03.02.2010, 23:04
|
|
Познающий
Регистрация: 07.11.2009
Сообщений: 36
Провел на форуме: 77411
Репутация:
0
|
|
ZdezBilYa думал об этом, только как эту проверку реализовать?
|
|
|

03.02.2010, 23:06
|
|
Постоянный
Регистрация: 13.12.2008
Сообщений: 354
Провел на форуме: 1747641
Репутация:
175
|
|
Да, можно делать все так, как говорит ZdezBilYa. Или же можно еще переменной T в самом начали присвоить значение количества потоков, а потом в конце основной функции потока пишешь dec(T). Если T равняется 0, значит все потоки выполнены.
|
|
|

03.02.2010, 23:09
|
|
Познающий
Регистрация: 07.11.2009
Сообщений: 36
Провел на форуме: 77411
Репутация:
0
|
|
спс, попробую
|
|
|

03.02.2010, 23:41
|
|
Постоянный
Регистрация: 16.08.2006
Сообщений: 640
Провел на форуме: 1354067
Репутация:
599
|
|
http://msdn.microsoft.com/en-us/library/ms686946%28VS.85%29.aspx
|
|
|
|
 |
Похожие темы
|
| Тема |
Автор |
Раздел |
Ответов |
Последнее сообщение |
|
Низкоуровневое исследование клиента игровой платформы Garena
|
Dosia |
Статьи |
28 |
29.05.2010 11:34 |
|
[C#] FAQ Многопточные приложения
|
Algol |
С/С++, C#, Delphi, .NET, Asm |
13 |
13.04.2010 16:08 |
|
[Delphi] Переключение потоков между собой
|
_PARAZIT_ |
С/С++, C#, Delphi, .NET, Asm |
27 |
25.12.2009 10:33 |
|
WaitForMultipleObjects для завершения потоков
|
sn0w |
С/С++, C#, Delphi, .NET, Asm |
0 |
12.12.2009 19:06 |
|
Выполнение скрипта после после закрытия браузера как?
|
Student :) |
PHP, PERL, MySQL, JavaScript |
8 |
18.12.2008 23:15 |
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|