Quando os controles trayicon delphi, como minimizar a janela para a bandeja do sistema

digite 
  TForm1 = class (a TForm)
   Privado 
    Procedimento WMSysCommand ( var Msg: TWMSysCommand); Mensagem do WM_SYSCOMMAND;
   End ; 
 
  ...... 
   
Procedimento TForm1.WMSysCommand ( var Msg: TWMSysCommand);
 a começar 
  Herdado ;
   IF Msg.CmdType = SC_MINIMIZE o então  / / janela recebe uma mensagem de minimizar 
  a começar 
    Application.Minimize; // programa de minimização 
    ShowWindow (Application.Handle, SW_HIDE); // esconder a barra de tarefas ícone 
  End ;
 End ;

Lembre-se Restaurar janela, clique ou clique duas vezes no TrayIcon evento, caso contrário você não pode ver o programa, só pode usar o Gerenciador de Tarefas para final.

 

resposta do aplicativo para o evento notícias, e se a mensagem é exibida ícone minimizado, ocultar a janela principal e a aplicação.