ocultar consola y no formulario

[delphi.com.ar]

Supongo que habrá alguna manera mas prolija, pero se me ocurrió esto:

Código Delphi [-]
program Project2;

{$APPTYPE CONSOLE}

uses
  SysUtils, Windows;

const
  CAPTION = 'Ocultame!!!!';
var
  hWnd: THandle;
begin
  SetConsoleTitle(CAPTION);
  hWnd := FindWindow('ConsoleWindowClass', CAPTION);
  ShowWindow(hWnd, SW_HIDE);
  ...;
end.

Si vas a usar formularios.. .¿Porqué no creas una applicación no-consola y creas una consola con AllocConsole?
Saludos!