小弟我的第一个dephi控制台程序，运行后为什么没有显示窗口

我的第一个dephi控制台程序，运行后为什么没有显示窗口？
刚学习dephi，使用delphi7.0 创建了一个控制台程序，代码如下：
program Greeting;

{$APPTYPE CONSOLE}

var MyMessage : string;
begin
  { TODO -oUser -cConsole Main : Insert code here }
  MyMessage := 'Hello world!';
  Writeln( MyMessage );
end.

编译正确，运行时控制台没有显示出来。请问大家是什么原因？
[解决办法]

var MyMessage : string;
begin
  { TODO -oUser -cConsole Main : Insert code here }
  MyMessage := 'Hello world!';
  Writeln( MyMessage );
  Readln;//加上这句
end.
[解决办法]
打开cmd命令提示符窗口，再运行你的程序。
[解决办法]
控件台一闪而过了，你可以加入1楼的ReadIN,等待输入