Ver Mensaje Individual
  #2  
Antiguo 15-03-2010
Alejo15x Alejo15x is offline
Miembro
 
Registrado: ene 2010
Posts: 55
Reputación: 15
Alejo15x Va por buen camino
Resuelto, dejo la respuesta para que os sea de ayuda:

Para ocultar una aplicación de la barra de tareas de Windows, basta con poner el siguiente código en el evento FormShow del formulario principal:
Código Delphi [-]
procedure TForm1.FormShow(Sender: TObject);
begin
  ShowWindow(application.Handle, SW_HIDE)
end;
En sistemas operativos Windows 2000 no funciona este procedimiento, en cambio este otro sí funciona (también funciona para cualquier otro sistema operativo Windows):
Código Delphi [-]
procedure TForm1.FormShow(Sender: TObject);
begin
  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 );
end;
Para mostrar la aplicación en la barra de tareas de nuevo:
Código Delphi [-]
procedure TForm1.Mostrar();
begin
  ShowWindow(Application.Handle, SW_SHOW);
end;
link: http://www.ajpdsoft.com/modules.php?...howpage&pid=40
Responder Con Cita