Ver Mensaje Individual
  #2  
Antiguo 27-01-2005
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.286
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Cita:
Empezado por el_enigma1
Como se puede minimizar un form que esta en ShowModal, bueno de hecho minimizar la aplicacion que esta mostrando un ventana en ShowModal.
Añade a la parte privada de tu form modal la siguiente definición:

Código Delphi [-]
 procedure WMSyscommand(Var msg: TWmSysCommand); message WM_SYSCOMMAND;

y luego en la implementación de dicha procedure haces lo siguiente:

Código Delphi [-]
   case (msg.cmdtype and $FFF0) of
     SC_MINIMIZE:
     begin
       msg.result := 0;
       EnableWindow(Application.handle, true);
       Application.Minimize;
     end;
   else
     inherited;
   end;

con ésto debería funcionar...
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita