Delphi使用Indy 10

Question

我使用的是Delphi4，我想创建一个标准的非阻塞套接字，而不是混乱的Indy代码(Pv4和Pv6)。我想要获取计算机的IP地址，并能够ping通任何人执行此操作。我能用Indy 10或Indy 9做吗?有没有人写了代码来做这些事情，并对其进行了测试。

Answer 1

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

在不使用Indy的情况下，您可以使用WinSock API的gethostname和gethostbyname函数，或者Win32 API的GetAdapterAddresses或相关函数来获取计算机的IP，并使用Win32 API的IcmpSendEcho函数来执行ping操作。