Pingar um IP através do Delphi

[QualquerPC 0]

Olá!!!

Podem me ajudar numa dúvida que não estou

conseguindo encontrar solução pela internet?

 

Estou tentando Pingar um valor que está num

Edit, exemplo: [10.1.1.1], clicando num Button.

Eu gostaria que o resultado aparecesse no

Prompt de Comando, como se eu estivesse fazendo esse

procedimento por lá mesmo, Ping 10.1.1.1.

 

Eu agradeço a todos.

Obrigado.

[bdexterholland 0]

No botão, você pode colocar o código:

 

WinExec('cmd /k ping 192.168.1.1', WS_VISIBLE); 

[QualquerPC 0]

No botão, você pode colocar o código:

 

WinExec('cmd /k ping 192.168.1.1', WS_VISIBLE); 

 

 

 

 

Obrigado pela dica.

Fique com Deus.

[bdexterholland 0]

Deu certo? Era o que queria?

[richard1994x 0]

Você tambem pode usar esse comando:

WinExec('command.com /c ping 192.168.1.1', WS_SHOW); 

 

:ermm: