把Ping命令可视化,用Delphi写成winForm窗口式的程序,一个可以单步执行的DelphiPing命令操作程序源码,在框内输入IP地址,点击“执行Ping”按钮,将执行一次Ping命令,不能连续执行Ping操作,不过稍加改进就能做出类似Windows一样的Ping程序。try
ifpReqData^=pIPE^.Options.OptionsData^then
begin
StatusShow.Lines.Add(PChar(PingEdit.Text)'-----'
IntToStr(pI