Obtener las IP de todas la pc de una red local

[kurono]

hola amigos del foros como estan me gustaria saber como puedo sacar la ip de cada una de las maquina de una red local desde delphi 7

[Neeruu]

Podrias hacer ping por el nombre de host y obtener la ip, con los componentes indy se que se puede hacer ping!!!

En la paleta Indy Client hay un componente llamado IdIcmpclient que sirve para hacer ping!!!

Mira esta ejemplo:

http://www.delphipages.com/threads/thread.cfm?ID=37403&G=37389

este es una aclaracion del anterior

http://www.delphipages.com/threads/thread.cfm?ID=43705&G=37389

Cualquier cosa me avisas si te sirve


Saluda Atte Neeruu!!!:)
Haber si alguien hace algun aporte a mi post de Msj a Celulares desde Delphi

[kurono]

amigo neeruu el codigo me da error en la siguiente linea

function TfmTracertMain.PingHost(Host: string; TTL: Integer): Boolean;

[Neeruu]

Hola a todos como estan???

Kurono, por donde dices que te da el error supongo que copias el codigo, lo pegaste y apretaste la tecla F9, sin detenerte un poco a mirarlo...Cpas me equivoco y pido disculpas....


Subi al FTP de ChubDelphi un pequeñisimo programita, hecho con la funcion que te pase... Para que puedas comparar y ver el error!!!

Puedes descargarlo de:
http://www.terawiki.clubdelphi.com/archivos/Herramientas/Ping%20-%20By%20Neeruu.rar

Otra cosa compañero, para la proxima vez trata de ser mas explicito en como armaste tu ejemplo, o de que error te tira, para poder ayudarte!!!

Espero que te sirva de ayuda!!!
P/D: Es el mismo ejemplo de la Pagina, con la diferencia que le agrege un memo y un combo para que escribas el host


Saluda Atte Neeruu!!!:)

[cHackAll]

Hola (http://www.clubdelphi.com/trucos/index.php?id=460)

[kurono]

gracias amigo hack ese ejemplo es lo que queria