Konsole Fenster unsichtbar machen

[Zodi]

Hi Delphianer

Ich versuche mich gerade etwas mit der Konsole.
Nun würde ich gerne das Konsolefenster unsichtbar machen wenn ich mein Programm ausführe da das schwarze Fenster ja nicht unbedingt schön ist.
Ich habe gelesen das man nur das{$APPTYPE CONSOLE} weglassen muss.
Leider funktioniert das bei mir nicht, weiss wer warum das so ist und an was es liegen kann?

Bisher schaut mein Code so aus.

Delphi-Quellcode:

program meinprogi;

{$R *.res}

//{$APPTYPE CONSOLE}

uses
  messages, windows;

var
  Msg: TMsg;

begin

  NoErrMsg := True;
  SetErrorMode(SEM_FAILCRITICALERRORS + SEM_NOALIGNMENTFAULTEXCEPT + SEM_NOGPFAULTERRORBOX + SEM_NOOPENFILEERRORBOX);

  Randomize;

  while true do begin
    sleep(10);
    PeekMessage(Msg, 0, 0, 0, PM_REMOVE);
    TranslateMessage(Msg);
    DispatchMessage(Msg);
  end;

end.

Grüsse Zodi