PDA

Ver la Versión Completa : Error despues de sacar aplicacion de la System Tray


sinalocarlos
09-11-2006, 19:21:35
Buen dia

molesto nuevamente con un problema que me surgio

utilizo

Shell_NotifyIcon(NIM_ADD, @MyIcono);


para mandar mi aplicacion a la bandeja del sistema

el problema ocurre al recuperarla windows no la pone ya en la barra de tareas

anoto el codigo ke utilizo para minimizar la forma:


procedure TForm1.WMSysCommand(var Msg: TWMSysCommand);
begin
if (Msg.CmdType = SC_MINIMIZE) then
begin
MyIcono.cbSize := sizeof(IconData);
MyIcono.Wnd := Handle;
MyIcono.uID := 100;
MyIcono.uFlags := NIF_MESSAGE + NIF_ICON + NIF_TIP;
MyIcono.uCallbackMessage := WM_USER + 1;
MyIcono.hIcon := Application.Icon.Handle;
MyIcono.StrPCopy(szTip, Application.Title);

Shell_NotifyIcon(NIM_ADD, @MyIcono);
Hide; //Aqui oculto la form
end
else
DefaultHandler(Msg);
end;



para recuperarla le doy un show a la form

alguna idea o sugerencia

Isnel
17-11-2006, 15:39:33
Casualmente necesitaba lo mismo que tú y buscando encontré esto. Espero te sirva

http://foros.solocodigo.com/index.php?showtopic=3665&hl=shell_notifyicon