topic-20096

Posts: 1818

Joined: Wed Oct 26, 2005 02:49 PM

Capturar Ventana otro programa
Posted: Wed Oct 20, 2010 06:17 PM

Amigos del foro tengan buen dia....

De antemano muchas gracias al que pueda ayudarme... he estado buscando en el foro la forma de capturar la ventana de un programa y ejecutar una funcion de ese programa que se encuentra en el menu..... pero no se si estoy preguntando mal o es que no han propuesto el tema...

Les cuento lo q tengo q hacer para saber si me pueden ayudar.... En la empresa compramos un aparato que captura la huella digital de cada uno de los empleados y hace el registro de la hora de entrada y salida de cada uno de los empleados.... Este aparatico trae un software que saca la información del aparato y lo guarda en un archivo .txt... lo que necesito es ejecutar ese proceso en ese programa para hacerlo automaticamente sin necesidad de intervencion del usuario y posteriormente sacar la informacion del txt.

Ya del resto me encargo yo.....

Alguien puede ayudarme con eso?

Saludos
LEANDRO AREVALO
Bogotá (Colombia)
https://hymlyma.com
https://hymplus.com/
leandroalfonso111@gmail.com
leandroalfonso111@hotmail.com

[ Turbo Incremental Link64 6.98 Embarcadero 7.70 ] [ FiveWin 25.01 ] [ xHarbour 64 bits) ]

Daniel Garcia-Gil

Posts: 2365

Joined: Wed Nov 02, 2005 11:46 PM

Re: Capturar Ventana otro programa
Posted: Thu Oct 21, 2010 12:10 AM

Leandro

El captador tiene alguna DLL o lib que se puede usar para que controles tu mismo el captador?
verifica
cual el es el modelo y marca, puede que alguien tenga una experiencia?

our best documentation is the source code
Isla de Margarita Venezuela.
danielgarciagil@gmail.com
http://tdolphin.blogspot.com/
https://www.dropbox.com/referrals/NTI5Njk4MDc1OQ?src=global9

Antonio Linares

Posts: 44162

Joined: Thu Oct 06, 2005 05:47 PM

Re: Capturar Ventana otro programa
Posted: Thu Oct 21, 2010 07:56 AM

Leandro,

Puedes usar la función FindWindow() para localizar la ventana sabiendo el título de la misma:

hWnd = FindWindow( , "titulo de esa ventana" )

MsgInfo( hWnd )

una vez tengas el handle de la ventana, podemos capturar su imagen ó lanzar una opción de su menú :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com

JmGarcia

Posts: 654

Joined: Mon May 29, 2006 03:14 PM

Re: Capturar Ventana otro programa
Posted: Thu Oct 21, 2010 08:46 AM

Yo tengo una pequeña utilidad que la llamo "EL PULPO" que la uso para mandar el mismo comando a varias ventanas.
Prioritariamente lo uso con ventanas de MS-DOS cuanto las tengo conectadas con TFP o TELNET y deseo mandar el mismo comando a todas ellas (cd, ls, mget, etc...)

La parte en la que detecto los handles de los programas con ventanas "visibles" la hago así:

Code (fw): Select all Collapse

local aTitles:={},aHandles:={},hWnd:=GETWINDOW(GETDESKTOPWINDOW(),GW_CHILD)
WHILE hWnd != 0 
   cTitle:=alltrim(GETWINDOWTEXT(hWnd))
   if cTitle<>""
      if IsWindowVisible(hWnd) .and. GETWINDOW(hWnd,GW_OWNER)==0 // Solo las ventanas visibles
         aadd(aTitles,cTitle)
         aadd(aHandles,hWnd)
      endif
   endif
   hWnd:=GETWINDOW(hWnd,GW_HWNDNEXT) 
ENDDO

El envio de comandos lo hago así (se han de enviar caracter a caracter):

Code (fw): Select all Collapse

local i,j,cComando:="dir"
cComando:=cComando+chr(13)
for i=1 to len(aHandles)
   for j=1 to Len(cComando)
      SendMessage(aHandles[i],WM_CHAR,Asc(SubStr(cComando,j,1)))
   next j
next i

Pero ejecutar una opción de un menú de otro programa no se como hacerlo.

Mi abuelo decía: Los aviones vuelan porque Dios quiere, y los helicópteros ni Dios sabe porque vuelan.

FWH 16.02, xHarbour 1.2.3, Harbour 3.2.0, WorkShop 4.5, AJ Make 0.30, Borlan BCC 7.00, VisualStudio 2013

leandro

Posts: 1818

Joined: Wed Oct 26, 2005 02:49 PM

Re: Capturar Ventana otro programa
Posted: Thu Oct 21, 2010 04:47 PM

Amigos del foro tengan buena tarde:

Inicialmente me gustaria desarrollar la solución como dice Daniel... el modelo del captador es:

PROWARE - ISET F203

Encontre cuatro librerias en la carpeta del programa que son las siguientes, si es necesario que las envie me avisan, de todas formas me gustaria saber como puedo hacer para abrirlas y al menos para pegarle una ojeadita...

usb.dll
oa280.dll
oa280_wrap.dll
rsidll32.dll

De todas formas voy a hacer lo que me dice Antonio y jmgarcia a ver hasta donde puedo llegar y ya en un rato les digo como me fue, muchas gracias por las respuestas y la buena voluntad.

Saludos
LEANDRO AREVALO
Bogotá (Colombia)
https://hymlyma.com
https://hymplus.com/
leandroalfonso111@gmail.com
leandroalfonso111@hotmail.com

[ Turbo Incremental Link64 6.98 Embarcadero 7.70 ] [ FiveWin 25.01 ] [ xHarbour 64 bits) ]

FiveTech Support Forums

Continue the discussion