Page 1 of 1

Minimizar aplicación en la barra de tareas

PostPosted: Wed Jun 16, 2021 7:46 am
by leandro
Buenos días para todos,

Como dice el encabezado, requiero colocar mi aplicación en modo silencioso, que se ejecute cada vez que se inicie el windows y que se vea en la parte inferior derecha de la pantalla como se muestra en la imagen.

Se que se puede hacer, lo había visto en el foro hace algún tiempo, pero no encuentro el POST, alguien tiene un ejemplo o me puede guiar como debo iniciar.

De antemano gracias,

Image

Re: Minimizar aplicación en la barra de tareas

PostPosted: Wed Jun 16, 2021 12:58 pm
by karinha

Re: Minimizar aplicación en la barra de tareas

PostPosted: Wed Jun 16, 2021 3:28 pm
by cmsoft
Code: Select all  Expand view

**********************************************************************
**** Poner en la Tray Bar la agenda
STATIC FUNCTION Dormir()
oApp:oTray := TTrayIcon():New(oApp:oWnd,oApp:oIcon,"Programa...",;
         {|nRow,nCol|MenuTray(nRow,nCol)},;
         {|nRow,nCol|MenuTray(nRow,nCol)})
oApp:oWnd:Hide()
RETURN nil

STATIC FUNCTION MenuTray( nRow, nCol )
LOCAL oMenu
    Menu oMenu POPUP
      MenuItem "Despertar" ACTION oApp:oWnd:Show(), ;
                           oApp:oWnd:SetFocus(),;
                           oApp:oTray:End(), oApp:oWnd:Refresh()
      separator
      MenuItem "Cerrar agenda"   ACTION oApp:oWnd:end()
   ENDMENU
   ACTIVATE POPUP oMenu AT nRow, nCol OF oApp:oTray:oWnd
RETURN NIL

Fijate si esto te sirve
Puedes lanzar Dormir() al init de la pantalla principal

Re: Minimizar aplicación en la barra de tareas

PostPosted: Wed Jun 16, 2021 7:54 pm
by leandro
Excelente, era lo que necesitaba, muchas gracias.

:D