Icone nao some da barra de tarefa apos fechar aplicacao

[Junior99 0]

Estou com mais um probleminha. A aplicacao possui uma rotina onde se a aplicacao eh minimizada, fica um icone na barra de tarefas do windows, ao lado do relogio, mas quando fecho a aplicacao o icone continua a aparecer.Ele somente fecha se passo com o mouse por cima.Segue codigo://****************** Rotina para jogar icone na barra de tarefas ********************//procedure TFrmPrincipal.TrayMessage(var Msg: TMessage);var p: TPoint;begin Case Msg.lParam Of WM_LBUTTONDBLCLK: Begin ShowWindow(Application.Handle, SW_SHOWNORMAL); End; WM_RBUTTONDOWN: Begin SetForeGroundWindow(Handle); GetCursorPos(p); PopupMenu1.Popup(p.x, p.y); PostMessage(Handle, WM_NULL, 0, 0); End; Else Inherited; End;end;procedure TFrmPrincipal.WMSysCommand(var Msg: TWMSysCommand);begin Case Msg.CmdType Of SC_MINIMIZE: Begin ShowWindow(Application.Handle, SW_MINIMIZE); ShowWindow(Application.Handle, SW_HIDE); End; Else Inherited; End;end;//************************************************************************************//Agradeco qualquer ajuda.Valeu.

[Junior99 0]

Resolvido.

[Hugo Slepicka 0]

Junior, você poderia postar aqui como fez para resolver???

 

Afinal a sua dúvida pode ser a futura duvida de algum outro colega...

 

Flw ae!!!

 

Abraço! http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

[bdexterholland 0]

Como é a minha :)

[Junior99 0]

Mas claro que colocarei.No Destroy do Form, voce coloca://************** Limpar o icone da memoria ******************// Try Shell_NotifyIcon(NIM_DELETE, @TrayIconData); Except End;//*********************************************************//

[Hugo Slepicka 0]

OPa, legal...

 

 

Valeu aew!!! http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

[Junior99 0]

Salve Hugo.Uma dica, joga esse exemplo no Laboratorio de Scripts, assim quando alguem precisar nao precisa fazer uma busa completa pelo Forum.flw

[Hugo Slepicka 0]

Movido Para Scripts!!! http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

[rento 0]

não seria mais fácil, componente.enabled := false;componente.iconvisible := false; //acho que era issofreeAndNil(componente);