你可以:
WinExec('command/c you_prog', SW_HIDE);

解决方案 »

  1.   

    使用shellexecute函数最好了
    shellexecute(form1.handle,'open','commmand/c you_prog',0,0,0,sw_hide);
    就可以了!
      

  2.   

    To windindance(风舞轻扬) and  redlegend_126_com(redlegend) :
    Thank you very much!!With you help,I had solve the problem!
    But I am have another problem(I am now using 2 editbutton,and want to get the 'edit.text' value as a dos prompt destination,it failed)please tell me how to solve the trouble!!
      

  3.   

    WinExec('command/c '+ edit.text, SW_HIDE);
    是你的意思吗?