ping

[NuncaMas]

Tengo que hacer un programa al que se le pasen unas ips y el haga ping a todas ellas y me diga cuales conectan.... alguno se le ocurre algo por favor ... gracias

[__cadetill]

en mi web tienes dos ejemplos de como hacerlo. Mirate el FindPC y el Localizador y, tu mismo decide cual te gusta más ;) (la web en la firma)

[NuncaMas]

He visto el codigo y es bastante complejo. Exactamente que tengo que hacer para que dada una ip saber si el host esta activo o no. He visto en localizador que tu defines un ICMP, asignas el vHost (string) y haces ICMP.ping pero no se que haces con Aplication.processmessages. La verdad no consigo entender el programa. Me puedes hechar una mano ,gracias.

[__cadetill]

Si solo es problema del Application.ProcessMessages, no te apures, puedes borrarlo (lo único que hace es procesar los mensajes de la aplicación para que no se quede "congelada" durante la ejecución del proceso.

El componente ICMP es el componente de las Indy TIdIcmpClient (cómo comente en la web)

[NuncaMas]

Una ultima cosa.. La instruccion TIdIcmpClient.ping cuantos intentos hace...., o es que hace tanto como pueda dentro del intervalo received timeout??? Gracias por todo y felicitarte por tus dos programas.

[__cadetill]

sacado de la ayuda de Delphi


Ping is used to prepare and send and echo request, and to receive the echo response. Ping sends the echo request to the computer identified in Host, and gets the response to the echo request datagram.

Set ReceiveTimeout to indicate the time to wait for a response to the echo request datagram.

Use ReplyStatus to access the TReplyStatus received as a response to the echo request datagram.

Assign an OnReply event handler to perform additional processing when a TOnReplyEvent is detected.

TIdIcmpClient closes the socket handle allocated on completion of the Ping method.

No se si responde a lo que preguntabas

PD: yo sólo he hecho 1 de los 2 programas :o