Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Minimizar Aplicacion... Captura (https://www.clubdelphi.com/foros/showthread.php?t=37564)

DarkDrakon 16-11-2006 16:49:04

Minimizar Aplicacion... Captura
 
Holas de nuevo colegas del Mundo Delphi...

Bueno aqui con otra de mis dudas :p .

Quisiera capturar el Mensaje que da un Formulario, cuando este es MINIMIZADO. Lo que quiero hacer es que cuando este se Minimice, hacer que este se vuelva invisible y desaparezca de la Barra de Tareas.

Bueno ya de antemano les agradezco ... :rolleyes:

seoane 16-11-2006 17:08:18

Prueba a interceptar el mensaje WM_SYSCOMMAND

Código Delphi [-]

TForm1 = class(TForm)
  private
    { Private declarations }
    procedure WMSYSCOMMAND(var Msg: TMessage); message WM_SYSCOMMAND;
  public
    { Public declarations }
  end;

 ....

procedure TForm1.WMSYSCOMMAND(var Msg: TMessage);
begin
  if Msg.wParam = SC_MINIMIZE then
  begin
    Hide
  end else
    Inherited;
end;

seoane 16-11-2006 17:15:08

Aunque ahora que lo pienso también puedes usar el componente TAplicationEvents que encontraras en la paleta "Additonal". Este componente cuenta con el evento OnMinimize, que se ajusta aun mas a lo que tu buscas.


La franja horaria es GMT +2. Ahora son las 04:30:26.

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