Page 1 of 1

Contar numero de instancias de la aplicación (Solucionado)

PostPosted: Sat Aug 26, 2023 5:45 pm
by leandro
Hola buenas tardes

Quería saber si podemos saber el numero de instancias de la aplicación que están abiertas en un momento determinado?

De antemano gracias

Re: Contar numero de instancias de la aplicación

PostPosted: Sun Aug 27, 2023 7:36 am
by Antonio Linares
Estimado Leandro,

Code: Select all  Expand view
#include "FiveWin.ch"

function Main()

    local nFWHApps := 0

    EnumWindows( { | hWnd | If( GetClassName( hWnd ) == "TWINDOW", nFWHApps++, ) } )

    MsgInfo( nFWHApps )

return nil  

Re: Contar numero de instancias de la aplicación

PostPosted: Sun Aug 27, 2023 1:09 pm
by Horizon

Re: Contar numero de instancias de la aplicación

PostPosted: Tue Aug 29, 2023 6:56 am
by cnavarro
leandro wrote:Hola buenas tardes

Quería saber si podemos saber el numero de instancias de la aplicación que están abiertas en un momento determinado?

De antemano gracias


Leandro, prueba esto enviando a la function el titulo o parte del titulo de la aplicacion
Code: Select all  Expand view

Function FindWndCount( cTitle )

   local hWnd := GetWindow( GetDesktopWindow(), GW_CHILD )
   local nCount    := 0

   while hWnd != 0
      if Upper( cTitle ) $ Upper( GetWindowText( hWnd ) )
         nCount++
      endif
      hWnd := GetWindow( hWnd, GW_HWNDNEXT )
   end

return nCount
 

Re: Contar numero de instancias de la aplicación

PostPosted: Tue Aug 29, 2023 8:43 am
by Antonio Linares
Code: Select all  Expand view
#include "FiveWin.ch"

function Main()

    local nFWHApps := 0

    EnumWindows( { | hWnd | If( GetClassName( hWnd ) $ "TWINDOW;TMDIFRAME", nFWHApps++, ) } )

    MsgInfo( nFWHApps )

return nil

Re: Contar numero de instancias de la aplicación

PostPosted: Tue Aug 29, 2023 2:50 pm
by sysctrl2
y que PCS de la red tienen abierto la app.exe :?:

Re: Contar numero de instancias de la aplicación

PostPosted: Wed Aug 30, 2023 9:40 pm
by leandro
Antonio, Cristóbal, gracias maestros por las respuestas.

Era lo que necesitábamos.