德尔福使用 Indy 10

Question

我正在使用 Delphi 4，并且我想创建一个标准的非阻塞套接字，而不需要杂乱的 Indy 代码（Pv4 和 Pv6）。我想获取计算机的 IP 地址并能够 ping 有任何人这样做。我可以用 Indy 10 或 Indy 9 来做吗？有没有人编写代码来做这些事情并进行测试。

Answer 1

Indy 很久以前就正式停止支持 Delphi 4。 Delphi 5 是仍受支持的最早版本。 Delphi 有自己的套接字类——TClientSocket 和 TServerSocket——它们可以在阻塞和非阻塞模式下运行。 Indy 仅在阻塞模式下严格运行。

不使用 Indy，您可以使用 WinSock API 的 gethostname 和 gethostbyname 函数或 Win32 API 的 GetAdapterAddresses 或相关函数获取机器的 IP，并使用 Win32 API IcmpSendEcho 函数ping。