这个是Delphi 2007下写的，需要Indy的ICMP控件 (Delphi2006应该也能编译，因为都带的是Indy10) 原理就是多线程Ping一个网关下的所有主机，然后导出ARP缓存。 因为Ping前会发出ARP请求获取每个IP的MAC地址，所以在Ping完后用 arp -a 取得本机ARP缓存。 最后就是读入arp -a 的返回，并存起来备查。