Dale un vistazo a este código, y ya tenès la mitad de lo q buscas… Saludos!
* FUNCTION: Is_Run32.prg * AUTHOR: George Tasker * DATE: January 13, 1998 - 8:26 AM * PURPOSE: Determines if a Windows * application is running and returns * the handle of the window if it is, * otherwise returns 0. 32 bit version * for Windows 95/NT 3.51-4 LPARAMETER pctitle * Parameter list description * * pctitle - The title bar of the Window * Note: The title does not have to be * the complete title that appears * * * API Declarations DECLARE INTEGER GetActiveWindow IN Win32API DECLARE INTEGER GetWindow IN Win32API; INTEGER hwnd, INTEGER dflag DECLARE INTEGER GetWindowText IN Win32API ; INTEGER hwnd, STRING @lptstr, INTEGER cbmax LOCAL lnhwnd, lnnext, lldone, lctitle_bar, lcsearchfor,; lntext_len lcsearchfor = UPPER(ALLTRIM(pctitle)) lnhwnd = GetActiveWindow() lnnext = 2 lldone = .F. lctitle_bar = "" lncnt=0 DO WHILE NOT lldone IF NOT EMPTY(lnhwnd) lctitle_bar = SPACE(200) + CHR(0) lntext_len = GetWindowText(lnhwnd, @lctitle_bar, 200) lctitle_bar = UPPER(LEFT(lctitle_bar, lntext_len)) IF(lcsearchfor $ lctitle_bar) lnCNT=lncnt+1 endif lnhwnd = GetWindow(lnhwnd, lnnext) ELSE lldone = .T. ENDIF ENDDO RETURN lncnt Enviado desde Correo de Windows De: Cesar Luque Enviado el: sábado, 06 de junio de 2015 06:56 a.m. Para: GUFA List Member run cae_dos.exe ----- Original Message ----- From: Pablo Pioli To: GUFA List Member Sent: Wednesday, June 03, 2015 11:03 PM Subject: [GUFA] Re: Ejecucion de un .exe desde un fox/dos Como ejecutas el programa? De: Cesar Luque Enviado el: miércoles, 03 de junio de 2015 07:06 p.m. Para: [email protected] Estimados Al ejecutar un .exe ( hecho en vfp90 ) desde un programa en fox para dos, el programa en dos se minimiza y para volverlo a primer plano hay que picar sobre el mismo en la barra de tareas. Alguien pudo hace que esto no suceda? es decir que quede el programa en dos siempre en primer plano? Saludos. César.-
