![]() |
|
Модераторы: Snowy, Poseidon, MetalFan |
![]()
|
|
| [RS]ZloY |
|
|||
![]() Новичок Профиль Группа: Участник Сообщений: 18 Регистрация: 14.5.2004 Где: RussiA [AiuR] Репутация: нет Всего: нет |
Всем привет ....
Подскажите САБЖ .... Plz... // Листинг // - --------------------------------------// For i:=1 to ports.Count-1 do begin Tcp1.RemotePort:=ports..Strings[i]; Tcp1.Open; if Tcp1.Connected then Memo1.Lines.Add(ports.strings[i]+' Open'); end; //-------------------------------------// Заранее очень благодарен ... |
|||
|
||||
| _hunter |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 8564 Регистрация: 24.6.2003 Где: Europe::Ukraine:: Kiev Репутация: 5 Всего: 98 |
ну так засунь его в TThread. В чем проблема?
-------------------- Tempora mutantur, et nos mutamur in illis... |
|||
|
||||
| Akella |
|
|||
![]() Творец ![]() ![]() ![]() ![]() Профиль Группа: Модератор Сообщений: 18485 Регистрация: 14.5.2003 Где: Корусант Репутация: 4 Всего: 329 |
есть пример очень быстрого сканера портов, сканирует пачками по 40-50 портов за раз, выложу чуть позже, может завтра, а пока подсказка - используй асинхронность
Добавлено @ 15:52 . |
|||
|
||||
| Akella |
|
|||
![]() Творец ![]() ![]() ![]() ![]() Профиль Группа: Модератор Сообщений: 18485 Регистрация: 14.5.2003 Где: Корусант Репутация: 4 Всего: 329 |
||||
|
||||
![]()
|
| Правила форума "Delphi: Сети" | |
|
|
Запрещено: 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делится вскрытыми компонентами
Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Snowy, Poseidon, MetalFan. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: Сети | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |