Muy buenas, tengo una funcion que funciona perfectamente en windows XP, pero da la casualidad que en Windws 7 se queda pillado en la linea: Replicas:=IcmpSendEcho(IcmpHandle, inet_addr(DestinationAddress), RequestData, RequestSize,0, ReplyBuffer, ReplySize, Timeout) y de ahí no pasa, ...