关于控制台！ ( 积分: 50 )

我想我创建一个WIN32窗口，需要在WIN32窗口中建立一个控制台或则DOS窗口，但是需要可以随时修改控制台窗口中的文字，而且不是执行命令！就输出一些消息文字这些。

program&nbsp;Project2;<br><br>{$APPTYPE&nbsp;CONSOLE}<br><br>uses<br>&nbsp;&nbsp;SysUtils,<br>&nbsp;&nbsp;Windows;<br><br>var<br>&nbsp;&nbsp;hOut:&nbsp;Cardinal;<br>&nbsp;&nbsp;i:&nbsp;Integer;<br>&nbsp;&nbsp;Pos:&nbsp;COORD;<br>&nbsp;&nbsp;s:&nbsp;String;<br>begin<br>&nbsp;&nbsp;{&nbsp;TODO&nbsp;-oUser&nbsp;-cConsole&nbsp;Main&nbsp;:&nbsp;Insert&nbsp;code&nbsp;here&nbsp;}<br>&nbsp;&nbsp;WriteLn('开始运行控制台程序');<br>&nbsp;&nbsp;hOut&nbsp;:=&nbsp;GetStdHandle(STD_OUTPUT_HANDLE);<br>&nbsp;&nbsp;Pos.X&nbsp;:=&nbsp;0;<br>&nbsp;&nbsp;Pos.Y&nbsp;:=&nbsp;1;<br>&nbsp;&nbsp;for&nbsp;i&nbsp;:=&nbsp;0&nbsp;to&nbsp;5&nbsp;do<br>&nbsp;&nbsp;begin<br>&nbsp;&nbsp;&nbsp;&nbsp;Write(i);<br>&nbsp;&nbsp;&nbsp;&nbsp;Sleep(1000);<br>&nbsp;&nbsp;&nbsp;&nbsp;SetConsoleCursorPosition(hOut,&nbsp;Pos);<br>&nbsp;&nbsp;end;<br>&nbsp;&nbsp;WriteLn('按任意键退出');<br>&nbsp;&nbsp;Read(s);<br>end.

没懂我的意思，就是在应用程序里面创建一个控制台程序。那样可以吗？

把窗口隐藏掉不就类似于控制台了？

就是要显示出控制台的窗口，利用控制台做一个显示程序运行的信息窗口，可以随意打开和关闭！

1.在程序里加一个窗体，做成貌似控制台窗口。<br>2.专门做一个控制台程序来显示你的程序运行的消息，“主程序”通过消息控制控制台程序显示消息。<br>3.程序的工程单元只要加上&nbsp;{$APPTYPE&nbsp;CONSOLE}&nbsp;这句就会多出一个控制台窗口，但是怎么随意打开和关闭就有待研究。