[Decoding]

так

Код:

 
procedure TForm1.FormShow(Sender: TObject);
begin
   ShowWindow( Application.Handle, SW_HIDE );
end;

или так

Код:

 
program Project1;
 
uses
  Forms,
  Windows,
  Unit1 in 'Unit1.pas' {Form1};
 
{$R *.res}
 
var
  EStyle: integer;
 
begin
   Application.Initialize;
   EStyle := GetWindowLong( Application.Handle, GWL_EXSTYLE );
   SetWindowLong( Application.Handle, GWL_EXSTYLE, EStyle or WS_EX_TOOLWINDOW );
   Application.CreateForm( TForm1, Form1 );
   Application.Run;
end.