Message Box pada Console Apps

program Project1;

{$APPTYPE CONSOLE}

uses
  SysUtils, Windows;
Const
   S : String = '                                       Ü'+#13#10+
                '                      ÜÛ            ÜÛÛÛÛÜ'+#13#10+
                '                   ÜÛÛÛÛÛ          ÛÛÛß  ßÛÜ'+#13#10+
                '                ÜÛÛÛÛÛßÛÛÛ°       ÛÛß      ßÛ°'+#13#10+
                '              ÜÛÛÛß    ÛÛÛ°      ÛÛ°'+#13#10+
                '             ÜÛß      ÛÛÛ°       ßÛÛÜ'+#13#10+
                '             ß       ÛÛÛ°          ÛÛÛÜ'+#13#10+
                '                    ÛÛÛ°            ßÛÛÛÜ'+#13#10+
                '                   ÛÛÛ°               ßÛÛÛÛÜ'+#13#10+
                '                  ÛÛÛ°           ÜÜÜÜÜ   ßÛÛÛ°'+#13#10+
                '                 ÛÛÛ°         ÜÛÛÛßß       ÛÛÛ°'+#13#10+
                '                ÛÛÛß         ÛÛÛ            ÛÛ°'+#13#10+
                '               ÛÛÛÛ°       ÛÛÛ°  ÜÜÜ       ÛÛÛ°'+#13#10+
                '                ÛÛÛÛ°     ÛÛÛ°     ßÛÜ   ÜÛÛÛ°'+#13#10+
                '                 ÛÛÛÛÜ  ÜÛÛÛ°       ßÛÛÛÛÛÛÛ°'+#13#10+
                '                  ßÛÛÛÛÛÛÛÛ°          ßÛÛß'+#13#10+
                '                    ßÛÛÛÛß'+#13#10+
                ''+#13#10+
                '                      Nfo by : Zephio Soft - 2009';
begin
  WriteLn(S);
  MessageBox(0,'Mesage Box'+#13#10'+Press OK to Quit!...','Message Box',0);
// atau ShowMessage('Mesage Box'+#13#10'+Press OK to Quit!...');
// Tambahkan Uses Dialogs
end.