[The Shadow]

Как можно получить список портов, используемых на компьютере?

[White_Horse]

Просканировать IP-адрес

[The Shadow]

А как? Для этого есть какие-нибудь функции?

[White_Horse]

Сообщение от The Shadow

А как? Для этого есть какие-нибудь функции?

Ну вообще-то это делается обычными сканерами портов, которых в интернете куча, но можешь и свой написать на Делфях

[The Shadow]

А так и хотел сделать, а в Интернете я и так бы нашел. Мне интересно, как это в Delphi сделать.

[White_Horse]

Ну тогда смотри книгу Фленова М. "Программирование в Delphi глазами хакера" , там ты найдёшь много интересного и не только про порты

[mav_c]

Сообщение от The Shadow

А так и хотел сделать, а в Интернете я и так бы нашел. Мне интересно, как это в Delphi сделать.

Для этого берёшь любой tcp клиент в делфях и пробуешь бодключаться к каждому порту, если исключение то порт свободен, если коннект то порт занят. Соответственно если на своей мажине то можешь пробовать запустить сервер если исключение, то порт занят!!!

[The Shadow]

А насколько быстро получится? Ведь всего портов на компьютере...

[mav_c]

Сообщение от The Shadow

А насколько быстро получится? Ведь всего портов на компьютере...

Всё это будет работать относительно медлено, но зато просто в реализации, можно используя неблокирующие сокеты сделать всё это в асинхронном режиме. то есть попросить соединение и переходить на следующий порт, а когда получаешь результат от прошлого порта узнаёшь его состояние. Портов не так много tcp - 65535 и udp - 65535