如何在Console里直接运行命令提示符下的程序

怎么在Console里直接运行命令提示符下的程序
比如在命令提示符里可以直接这样ping 127.1 -n 3 ，并且可以返回信息

那在Console里应该怎么操作呢？

[解决办法]

Delphi(Pascal) code

加上:edit,button,listbox,idicmpclient四个控件双击buttonprocedure TForm1.Button1Click(Sender: TObject);vari:integer;beginidicmpclient.Host:=edit1.Text;for i:=0 to 3 dobeginidicmpclient.Ping;application.ProcessMessages; sleep(1000);end;end;在idicmpclient事件的onreply中加代码procedure TForm1.idicmpclientReply(ASender: TComponent;  const AReplyStatus: TReplyStatus);varstime:string;beginstime:='=';listbox1.Items.Add(format('Reply from   %s:  time=%dms   TTL=%d ms',[aReplyStatus.fromipaddress,\\ping的IP地址 aReplyStatus.sequenceid div 100,\\整除100是为了显示MS(毫秒) aReplyStatus.timetolive,\\生命周期 stime, aReplyStatus.msroundtriptime]));\\不知道是什么end;