如何用 delphi 列出 局域网 所有在线的 机器的 ip

[微工程]

用 delphi 列出 局域网中 所有在线的 机器的 ip地址
显示在list中

[hellward]

楼主留下邮箱，我发给你个实例。

[微工程]

[e-mail] ，谢谢，我看了会回复你。

[dinoalex]

http://www.codefans.net/soft/2215.shtml

[hellward]

[Quote=引用 2 楼 guanlianwei 的回复:]
[e-mail] ，谢谢，我看了会回复你。
[/Quote]发了

[kfcoffe]

LZ 给我一份吧 谢谢
[e-mail]

[微工程]

多谢 hellward 和dinoalex 帮忙。经过几个小时 ，有点眉目了。
现在的问题是，怎样通过ip ，来获得局域网中 网卡的mac （或者cpu，硬盘，主板）的信息。
谢谢指教

[sanguomi]

你没和那些电脑通讯,取硬件信息不太靠谱,

[Dereky]

可以给我一份吗？
[e-mail]

[微工程]

[Quote=引用 7 楼 sanguomi 的回复:]
你没和那些电脑通讯,取硬件信息不太靠谱,
[/Quote]

在局域网内，通过机器标示能得到mac ，通过ip 怎样得到mac，（能得到cpu，硬盘，主板更好）。

请高手指教，谢谢了。

[微工程]

通过ip 得到远程机器的Mac 的方法已解决，谢谢大家。

有没有方法 得到远程机器的 cpu 或 硬盘 或 主板 的 信息呢。

请教了，谢谢！！

快啊，解决了，就结贴散分。

[微工程]

在服务程序里，不接受键盘输入，这怎样处理呀？

[daisy0038]

LZ也给我一份嘛！谢谢
[e-mail]

[newsony]

也请发我一份，3Q!

[newsony]

忘了上邮箱了！

[e-mail]

[nkym0626]

[e-mail]


给我一份啊

[yuanstudy]

也给我一份吧 谢谢啦
[e-mail]

[微工程]

评论一下：
hellward，主要用到了 WNetOpenEnum（）函数。
dinoalex 主要用到了多线程ping 的方法。

比较后，发现，WNetOpenEnum（）函数，在有的机器上可能不能正常运行，无法获取ip。
多线程ping加ip段扫描，基本可以解决问题，不存在挑机器的问题。
结贴。

[微工程]

需要的人多，没法一一发送，我把源码上传到了资源里，请大家自行下载使用。
下载地址：
http://download.csdn.net/source/1674285