En mi página tienes un par de ejemplos para realizar PING.
Uno utilizando ICMP y el otro WMI. Uno de ellos utiliza threads, cosa que te puede interesar si vas a realizar PING a múltiples servidores.
http://neftali.clubdelphi.com/server...tilizando-wmi/
http://neftali.clubdelphi.com/ping-t...ando-icmp-dll/
Son antiguas, y compiladas con versión 6 de Delphi si no recuerdo mal, pero deberían funcionar en las versiones nuevas sin mayores problemas.