Hide Program complete

ShowWindow( Application.Handle, SW_HIDE );

  SetWindowLong( Application.Handle, GWL_EXSTYLE,
                 GetWindowLong(Application.Handle, GWL_EXSTYLE) or
                 WS_EX_TOOLWINDOW and not WS_EX_APPWINDOW);
                 
  ShowWindow( Application.Handle, SW_SHOW );

  ShowWindow( Handle, SW_HIDE );
  
  SetWindowLong( Handle, GWL_EXSTYLE,
                 GetWindowLong(Handle, GWL_EXSTYLE) or
                 WS_EX_TOOLWINDOW and not WS_EX_APPWINDOW);
                 
  ShowWindow( Handle, SW_SHOW );