Ver Mensaje Individual
  #1  
Antiguo 09-11-2006
sinalocarlos sinalocarlos is offline
Miembro
 
Registrado: sep 2006
Posts: 152
Reputación: 18
sinalocarlos Va por buen camino
Error despues de sacar aplicacion de la System Tray

Buen dia

molesto nuevamente con un problema que me surgio

utilizo
Código:
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:

Código:
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
Responder Con Cita