Recibir en ms el ping.

[rauros]

Si pero el ping de los trucos sale en c++, no en delphi. A ver, lo que quiero es hacer una barra(TGauge), y dependiendo del ping, se llena o vacía. Si se llena por completo se le aconseja no jugar porque va a tener mucho retraso. Lo que quiero es obtener el mismo numero que se obtiene desde consola de comandos(de windows) al escribir:
ping una_ip

Gracias de todos modos.

[Neftali [Germán.Estévez]]

Perdón; No me fijé que era para Builder.
Otra opción es usar alguna de las librerías de TCP/Ip que hay; Eso te facilitará el trabajo. Indy, Synapse o ICS por nombrar alguna.

Aquí también puedes encontrar una solución.

Incluso aquí, lo que parece ser una solución muy similar a la del truco, pero en Delphi.

Aquí otra; Y si sigues buscando supongo que encontrarás más...

[rauros]

Uf, los dos son los mismos y mira:

No funcionan con hostnames, solo con IP. Y yo tengo que rastear un nombre no-ip.org, para los que no lo sepan: redirecciona ip que no son estaticas.

[Neftali [Germán.Estévez]]

Si no quieres instalar librerías externas, se me ocurren otras dos forma de hacerlos (digamos un poco más "cutres"), utilizando el comando PING de MS-DOS.

Puedes ejecutar el comando PING y volcar la respuesta a un fichero de texto.
Puedes ejecutar el comando PING y "volcar" la salida a un Memo.

De ambas cosas hay ejemplos por Internet (si no te funciona ya dirás).

En ambos casos tendrás un texto como este:

Código SQL [-]
Haciendo ping a www.no-ip.com [204.16.252.112] con 32 bytes de datos:

Respuesta desde 204.16.252.112: bytes=32 tiempo=217ms TTL=237
Respuesta desde 204.16.252.112: bytes=32 tiempo=219ms TTL=237
Respuesta desde 204.16.252.112: bytes=32 tiempo=218ms TTL=237
Respuesta desde 204.16.252.112: bytes=32 tiempo=219ms TTL=237

Estadísticas de ping para 204.16.252.112:
    Paquetes: enviados = 4, recibidos = 4, perdidos = 0 (0% perdidos),
Tiempos aproximados de recorrido redondo en milisegundos:
    mínimo = 217ms, máximo =  219ms, promedio =  218ms

Una vez obtenido se trata de "parsear" eso para obtener los tiempos (cosa que parece bastante simple).

[rauros]

¿Como ejecuto ping una_ip /a:d > archivo.txt desde delphi? (Se ejecuta desde cmd)

[[egostar]]

Empezado por rauros

¿Como ejecuto ping una_ip /a:d > archivo.txt desde delphi? (Se ejecuta desde cmd)

Con WinExec(), busca su uso en la ayuda de Delphi o aquí en el foro......

Salud OS

[rauros]

No funciona el comando:

WinExec(PChar('ping dragones-muertos.no-ip.org /a:d > c:\ping.txt'),SW_SHOWNORMAL);