Цитата:
|
Сообщение от The Shadow
А так и хотел сделать, а в Интернете я и так бы нашел. Мне интересно, как это в Delphi сделать.
|
Для этого берёшь любой tcp клиент в делфях и пробуешь бодключаться к каждому порту, если исключение то порт свободен, если коннект то порт занят. Соответственно если на своей мажине то можешь пробовать запустить сервер если исключение, то порт занят!!!