| Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате |
| Форум программистов > Delphi: Сети > Многопотоковый сканер... |
| Автор: [RS]ZloY 20.11.2004, 13:56 |
| Всем привет .... Подскажите САБЖ .... 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 20.11.2004, 14:56 |
| ну так засунь его в TThread. В чем проблема? |
| Автор: Akella 10.12.2004, 15:47 |
| есть пример очень быстрого сканера портов, сканирует пачками по 40-50 портов за раз, выложу чуть позже, может завтра, а пока подсказка - используй асинхронность Добавлено @ 15:52 . |
| Автор: Akella 11.12.2004, 09:39 |
| держи пример |