delphi简单好用的ping函数,可以直接进行调用,对于网络方面还是蛮有帮助的