Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Como puedo saber si se le ha dado al botón de minimizar en una ventana? (https://www.clubdelphi.com/foros/showthread.php?t=3517)

lolobs 10-09-2003 12:24:56

Como puedo saber si se le ha dado al botón de minimizar en una ventana?
 
Hola a todos!
Como puedo saber si se le ha dado al botón de minimizar en una ventana?
Lo he probado en el evento OnResize del formulario pero cuando yo le doy al botón de minimizar WindowsState es wsNormal. De modo que cuando se minimiza y le doy a otro botón ya si está windowsstate a wsminimized pero yo quiero saber en el momento que se le da al botón...que se le ha dado el botón de minimizar.
Alguien me puede ayudar?


Gracias por anticipado.

__cadetill 10-09-2003 12:29:25

quizas te sirva el truco 102 de Trucomania "ejecutar algo antes de que tu aplicacion sea minimizada"

lolobs 10-09-2003 12:42:07

Como es el truco 102? No termino de entender lo que me dices.

DarkByte 10-09-2003 12:44:33

ESTE ES EL TRUCO ORIGINAL DE TRUCOMANÍA:
//////////////////////////////////////////////////////////////
Ejecutar algo antes de que tu aplicación sea mini-
mizada:

Podemos hacerlo capturando el mensaje WM_SYSCOMMAND

-Primero, capturamos el mensaje, añadiendo esta linea en el private de la declaracion de la form:



type
TForm1 = class(TForm)
private
{Esta linea/This Line}
procedure WMSysCommand(var Msg: TWMSysCommand); message WM_SYSCOMMAND;
end;



-Y en el implementation, ponemos la procedure:



procedure TForm1.WMSysCommand(var Msg: TWMSysCommand);
begin
if (Msg.CmdType = SC_MINIMIZE) or
(Msg.CmdType = SC_MAXIMIZE) then
MessageBeep(0);
DefaultHandler(Msg);
end;


La franja horaria es GMT +2. Ahora son las 22:33:30.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi