Saber si un puerto esta abierto

[Besto]

Hola,

antes de nada, no se si este es el foro adecuado, pero no veia claro donde ponerlo.

Trabajo en Delphi 6.

Bueno, mi problema es el siguiente, estoy desarrollando una aplicación y necesito saber si los equipos instalados dentro de la oficina tienen abiertos diversos puertos o no lo tienen abiertos.

He probado a usar un ClientSocket y si solo le pido comprobar un equipo me funciona bien (creo, ...), ahora si quiero comprobar varios equipos a la vez (todos los de un departamento, por ejemplo) , me empieza a dar error,...

Bueno, cualquier ayuda me vendría bien,...

Gracias.