FiveTech Software tech support forums

... cCOMP cPasta := ".\dados" cServ := Space(1) cCOMP := "01/2021" // Space(7) REQUEST LETO RDDSETDEFAULT( "LETO" ) IF IsExeRunning( "letodb.exe" ) RETURN MsgStop( "O programa servidor já está aberto neste computador!", "Impossível Continuar!" ...

... with using OLE with Excel. I believe it is because Excel is running in the background when I attempt to launch a new instance. I attempted to use IsExeRunning("Excel",".",.f.) including many versions with case "EXCEL", and "excel" and it seems it reports ...

Just pop this into any app that has a menu so you can call it multiple times without terminating the app. Function McsExcelRunning() If IsExeRunning( "excel",".",.F. ) MsgStop( "Excel is currently running...","IsExeRunning" ) Else MsgInfo( "Excel ...

... with using OLE with Excel. I believe it is because Excel is running in the background when I attempt to launch a new instance. I attempted to use IsExeRunning("Excel",".",.f.) including many versions with case "EXCEL", and "excel" and it seems it reports ...

... al frente de las demas abiertas, la probe en ambas formas con 5 aplicacion abiertas y todas maximizadas, asi que por los momentos me quedare con IsExeRunning

Saludos, se que este tema ya es viejo...pero ahora que estoy usando IsExeRunning, pregunto...HAY MANERA DE HACER QUE ADEMAS DE DECIRME QUE MI APLICACION YA ESTA EN USO....ESTA TOME EL FOCUS DE LAS APLICACIONES ABIERTAS O SI ESTA MINIMIZADA SE MAXIMIZE ASI ...

io ho un altro problema : #define NOME_PROGRAMMA_TITLE "STUDIO" IF ISEXERUNNING( CFILENAME( HB_ARGV( 0 ) ) ) MsgWait(NOME_PROGRAMMA_TITLE+" è già in esecuzione !","Attenzione") SHOWWINDOW( FINDWINDOW( 0, NOME_PROGRAMMA_TITLE ), 9 ...

Ops !! Ho dovuto immediatamente togliere questo controllo ISEXERUNNING( CFILENOEXT( HB_ARGV( 0 ) ) ) ...... poichè più di un cliente mi ha riferito che non riusciva a a lanciare in programma, in quanto tale funzione risultava già in esecuzione !! Eppure ...

Haga asi:

Code: Select all  Expand view

   IF ISEXERUNNING( CFILENAME( HB_ARGV( 0 ) ) )
      __Quit()
   ENDIF
 


Saludos.

Colocando al inicio de mi sistema la funcion: IsExeRunning(cFileNoPath(HB_ArgV(0))) me indica .F. si en un servidor nadie mas esta usando el mismo sistema. Perfecto! Pero si mas adelante vuelvo a usar la misma funcion en mi sistema, ya me regresa ...

... = .T. > Is there a way as soon closing MS-calc.exe, to set < lRun = .F.> to stop the animation ? I tested inside the loop with MsgAlert( IsExeRunning( "calc.exe" ) ) 1. lRun starts with .F. 2. after open calc.exe lRun shows .T. 3. closing calc.exe < IsExeRunning( "calc.exe" ...

... oDlg:bResized := {|| ON_TOP() } ACTIVATE DIALOG oDlg CENTERED .. .. RETURN NIL // ---- FUNCTION ON_TOP() CFILENAME := "COLORPICK.exe" IF ISEXERUNNING( CFILENAME( HB_ARGV( 0 ) ) ) SHOWWINDOW( FINDWINDOW( 0, "COLORPICK" ), 9 ) SETFOREGROUNDWINDOW( FINDWINDOW( 0, "COLORPICK" ...

IF IsExeRunning( cFileNoPath( HB_ArgV( 0 ) ) ) // Sirve para verificar si ya se ejecuto el Exe... MsgBox( "El programa " + APP_TITLE + " ya esta siendo ejecutado!" ) hWnd := FindWindow( APP_TITLE ) IF hWnd ...

... [ ON | OFF ] In 32 bits the same can be achieved by using the following code // Check whether the application is already running in the same PC if IsExeRunning( cFileName( HB_ARGV( 0 ) ) ) MsgWait( "Another instance of this application is already running in this PC", "Multiple Instance ...

Anyone know how to use the handle of the process I get this funtcion with FWH. For example to activate the process window, or close the process. As does FindWindow Alguien sabe como poder usar el handle del proceso que obtengo en esta funtcion con FWH. Por ejemplo para activar la ventana del proceso...