Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   API de Windows (https://www.clubdelphi.com/foros/forumdisplay.php?f=7)
-   -   Error despues de sacar aplicacion de la System Tray (https://www.clubdelphi.com/foros/showthread.php?t=37333)

sinalocarlos 09-11-2006 19:21:35

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

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.ph...ell_notifyicon


La franja horaria es GMT +2. Ahora son las 23:28:20.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi