Detectar boton Minimizar Formulario

Gabriel · #1 10-03-2008

Hola Foro

Tengo una aplicación, que practicamente tiene bastantes pantallas modales, y pueden llegar a haber 3 profundidades de pantalla modal.

Quisiera poder detectar, si el cliente presiona el boton minimizar del formulario, para, detectarlo y minimizar la aplicación.

Ejemplo
if pulsan minimizar From Then Application.minimized;

Gracias

[gluglu] · #2 10-03-2008

Código Delphi [-]private
  procedure WMSysCommand(var Msg: TWMSysCommand); message WM_SYSCOMMAND;
  ...
 
procedure TForm.WMSysCommand(var Msg: TWMSysCommand);
begin
  if (Msg.CmdType = SC_MAXIMIZE) then
    ...
  else
  if (Msg.CmdType = SC_MINIMIZE) then
    ...
  else
  if (Msg.CmdType = SC_RESTORE) then
    ...
  else DefaultHandler(Msg);
end;

Saludos

Gabriel · #3 10-03-2008

Muchas Gracias

Gabriel

Temas Similares
Tema	Autor	Foro	Respuestas	Último mensaje
boton minimizar	Max_E.	Varios	2	06-03-2007 17:42:43
Evento que se ejecuta al Pulsar el boton de Minimizar de una Forma	AGAG4	Varios	2	09-10-2004 17:31:38
Boton de minimizar un quick report	raugadel	Impresión	2	13-04-2004 15:55:09
Como puedo saber si se le ha dado al botón de minimizar en una ventana?	lolobs	Varios	3	10-09-2003 12:44:33
Cambiar boton de minimizar	gemma	Varios	3	08-07-2003 16:53:56