delphi cmd 获取命令返回源码

获取cmd 命令 返回并且显示 文章地址：http://blog.csdn.net/qq_14876677/article/details/51762007

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        446  2016-06-26 10:04  cmd\Project1.cfg

     文件       2014  2016-06-26 10:04  cmd\Project1.dof

     文件        188  2016-06-26 10:04  cmd\Project1.dpr

     文件     385024  2016-06-26 10:04  cmd\Project1.exe

     文件        876  2016-06-26 09:53  cmd\Project1.res

     文件       6782  2016-06-26 10:04  cmd\Unit1.dcu

     文件       1179  2016-06-26 10:18  cmd\Unit1.dfm

     文件       3327  2016-06-26 10:22  cmd\Unit1.pas

     文件       1179  2016-06-26 10:18  cmd\Unit1.~dfm

     文件       3327  2016-06-26 10:22  cmd\Unit1.~pas

     文件         67  2016-06-26 11:24  cmd\说明.txt

     目录          0  2016-06-26 11:24  cmd

----------- ---------  ---------- -----  ----

               404409                    12