F�rum Usando Messages em componente #232901

18/05/2004

Ol�

Coloquei um componente meu para inserir um �cone no SystemTray.
At� a� tudo bem.

O problema � que o procedimento para interagir com o �cone (tipo ao clicar ele abrir a aplica��o) utiliza [i:a06ade3637]Messages[/i:a06ade3637]...

Quando esse procedimento est� no c�digo normal ele funciona...s� que eu acho que por estar em uma classe � parte ele n�o est� entrando no c�digo necess�rio...ou seja, lee n�o est� reconhecendo que era pra entrar nesse proceidmneto ao clicar

Como eu fa�o para ele reconhecer o c�digo ao clicar?
Devo manipular as �message� do Windows?

o procedimento (bastante divulgado j�) segue abaixo:

const
  WM_ICONTRAY = WM_USER + 1;
(...)

procedure TrayMessage(var Msg: TMessage); message WM_ICONTRAY;
(...)
procedure TIconTray.TrayMessage(var Msg: TMessage);
begin
     case Msg.lParam of

          //Clique duplo do o mouse para exibir
          WM_LBUTTONDBLCLK:
          begin
                (..) // Meu c�digo
           end;
          //Clicar com o bot�o direito para esconder
          WM_RBUTTONDOWN:
          begin
                (..) // Meu c�digo
          end;
     end;
end;

At�+
Obrigado

Paulo_amorim

Curtir t�pico

+ 0

Responder