Se puede ocultar una ventana Java?

Se puede ocultar una ventana Java?

Postby José Vicente Beltrán » Sat Dec 16, 2017 3:49 pm

Hola a todos,
¿Se puede ocultar, mientras se ejecuta, la ventana de una aplicación Java que se ha llamado desde una aplicación FW?.
Esto lo he hecho muchas veces con ventanas windows, pero en este caso ignora los argumentos.
Convierto el archivo .jar en .exe mediante 'Launch4j' u otro similar y lo llamo desde código FW

Code: Select all  Expand view  RUN
WaitRun( "appjava.exe", 2 )
SHELLEXECUTE(,"open", "appjava.exe",,, 2)

En ambos casos se ejecuta la aplicación pero la ventana luce en todo su esplendor mientras se ejecuta y no encuentro la forma de ocultarla.
¿Se puede hacer?
Gracias por su interés :shock:
User avatar
José Vicente Beltrán
 
Posts: 282
Joined: Mon Oct 10, 2005 8:55 am
Location: Algeciras, España

Re: Se puede ocultar una ventana Java?

Postby José Vicente Beltrán » Sun Dec 17, 2017 9:03 am

Entonces..... ¿no es posible?
User avatar
José Vicente Beltrán
 
Posts: 282
Joined: Mon Oct 10, 2005 8:55 am
Location: Algeciras, España

Re: Se puede ocultar una ventana Java?

Postby cnavarro » Sun Dec 17, 2017 12:05 pm

Prueba

Code: Select all  Expand view  RUN

WaitRun( "MyExe.Exe", 0 )
 
Cristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
User avatar
cnavarro
 
Posts: 6552
Joined: Wed Feb 15, 2012 8:25 pm
Location: España

Re: Se puede ocultar una ventana Java?

Postby russimicro » Sun Dec 17, 2017 12:30 pm

// lector.bat
// java -jar "lector\lector.jar" %1 %2 %3 %4

FUNCTION capturaHuellaGanaPuntos() // oculta fw .. activa java

LOCAL cUniZer := "C:\TEMP\ZERUS\"
LOCAL APP_TITLE := "RUSSOFT - Lector de Huellas"
LOCAL hWnd := FindWindow( 0, APP_TITLE )

IF hWnd > 0

SetForeGroundWindow( hWnd )

ELSE

ShellExecute( , "open", "LECTOR.BAT " ,;
["] + M->cCajIni + [" ] + ;
["] + ALLTRIM(m->cNomUsr) + [" ] + ;
["] + ALLTRIM(m->cCiaAct) + [" ] + ;
["] + ALLTRIM(m->cNroUsr) + ["] ,, 6 )
inkey(2)
ENDIF


RETURN .T.

//********************************************************
activaDialogo(HB_OEMTOANSI("nombre dialogo fw que desea quedar activo")) // activo fw ... oculta java

FUNCTION activaDialogo(cTitDia)

LOCAL hWnd := FindWindow( 0, cTitDia )

IF hWnd > 0
SetForeGroundWindow( hWnd )
ENDIF

RETURN .T.


russimicro
 
Posts: 262
Joined: Sun Jan 31, 2010 3:30 pm
Location: Bucaramanga - Colombia

Re: Se puede ocultar una ventana Java?

Postby José Vicente Beltrán » Mon Dec 18, 2017 9:28 am

Gracias a ambos por contestar.
Cristobal, el parámetro '0' también es ignorado al igual que el '2'. :shock:
Russimicro, voy a probar tu sugerencia a ver si consigo que funcione. :shock:
User avatar
José Vicente Beltrán
 
Posts: 282
Joined: Mon Oct 10, 2005 8:55 am
Location: Algeciras, España


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 29 guests