delphi编写控制台程序（用WRITELN（）输出），输出结果在仿真DOS窗口中，为何该仿真DOS窗口一闪而过，几乎来不急看清，如何调节时间？？

Question

你开一个 dos 窗口执行就行了

Answer 1

如果你不想开 dos 窗口，可以用以下办法解决：
1、在 Writeln 之后加以条 Readln 语句，这样就会等待一个回车之后才会退出；
2、在 Writeln 之后用 Sleep(500) 让当前线程停 500 毫秒。

Answer 2

在程序结尾加入readln,这样，只有敲了回车才退出

Answer 3

var
   s : string;
 begin
   Write('Enter a line of text: ');
   Readln(s);
   Writeln('You typed: ',s);
   Writeln('Hit <Enter> to exit');
   Readln;