Ver Mensaje Individual
  #3  
Antiguo 03-07-2005
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.141
Reputación: 36
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Lepe, dependerá también del tipo de aplicación que sea, aunque sea una mala costumbre y poco intuitivo lo cierto es que aplicaciones como el Microsoft Messenger hace uso de algo así.

Por otro lado no me funciona lo que dices de "OnClose", aun poniendo "Action" a "caHide" el formulario se cierra. Digo yo de utilizar el evento "OnCloseQuery", dar el valor "false" a la variable "CanClose" y utilizar el método "HideMainForm" conque cuenta el propio componente CoolTrayIcon.

Algo así, vamos:

Código Delphi [-]
 procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
 begin
   CanClose := false;
   CoolTrayIcon1.HideMainForm;
 end;

Siempre queda la posibilidad de hacer algo así también:

Código Delphi [-]
 procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
 begin 
   CanClose := DecisionUsuario; // el usuario decide  
   CoolTrayIcon1.HideMainForm;
 end;
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita