倘若你所希望的应该是将控制台程序显示的内容呈现在你自己的窗体内,<br>可以使用管道来实现<br>如下只是管道使用的简单范例,真实编程的时候应该考虑用多线层来listen管道<br>以下为例,你可以用winexec执行或者直接在DOS命令行下键入dir > //./pipe/mytest<br>你的程序可以直接得到DIR的输出结果,同样,其他的控制台程序甚至于纯粹DOS程序<br>都可以将执行的结果反馈到你的管道。<br>微软的编辑器可能就是如此和编译器结合的。<br><br>procedure TForm1.Button1Click(Sender: TObject);<br>vAR h:Integer;<br> buff:array[0..1024] of char;<br> readed:dword;<br>begin<br> h:=CreateNamedPipe('//./pipe/mytest',PIPE_ACCESS_DUPLEX,PIPE_TYPE_BYTE or PIPE_READMODE_BYTE,5,10000,10000,5000,0);<br> assert(ConnectNamedPipe(h,nil));<br> readfile(h,buff[0],1024,readed,nil);<br> showmessage(buff);<br>end;<br>