Como obtener el nombre del EXE???

65 views
Skip to first unread message

David Castelari

unread,
Jul 22, 2018, 10:31:27 AM7/22/18
to Grupo ooHG (Google)
Hola,

Se puede obtener el nombre del EXE que se está ejecutando? 

Saludos cordiales,
Sergio Castellari 


El dom., 22 de jul. de 2018 04:22, David Tato Jimenez <dtat...@gmail.com> escribió:


El dom., 22 jul. 2018 0:02, Fernando Yurisich <fernando...@gmail.com> escribió:
He subido una mejora a GitHub para hacer lo que quieres.

Ver 

Saludos
Fernando Yurisich

El sáb., 21 de jul. de 2018 a la(s) 16:36, maste...@gmail.com (maste...@gmail.com) escribió:
Estimados tengo varios labels definidos en una misma fila como puedo
hacer para al hacer click en uno en particular se le asigne la propiedad
CLIENTEDGE asi se diferencia de los otros.

Saludos.

Juan Manuel Del Valle

--
Has recibido este mensaje porque estás suscrito al grupo "oohg" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a oohg+uns...@googlegroups.com.
Para publicar una publicación en este grupo, envía un correo electrónico a oo...@googlegroups.com.
Visita este grupo en https://groups.google.com/group/oohg.
Para obtener más opciones, visita https://groups.google.com/d/optout.

--
Has recibido este mensaje porque estás suscrito al grupo "oohg" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a oohg+uns...@googlegroups.com.
Para publicar en este grupo, envía un correo electrónico a oo...@googlegroups.com.
Visita este grupo en https://groups.google.com/group/oohg.
Para acceder a más opciones, visita https://groups.google.com/d/optout.

--
Has recibido este mensaje porque estás suscrito al grupo "oohg" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a oohg+uns...@googlegroups.com.
Para publicar en este grupo, envía un correo electrónico a oo...@googlegroups.com.
Visita este grupo en https://groups.google.com/group/oohg.
Para acceder a más opciones, visita https://groups.google.com/d/optout.

Fernando Yurisich

unread,
Jul 22, 2018, 11:03:31 AM7/22/18
to oo...@googlegroups.com
​Puedes utilizar:

   Application.ExeName

   GetProgramFileName()

   TApplication():Define():ExeName
Saludos
Fernando Yurisich

David Field

unread,
Jul 22, 2018, 4:30:28 PM7/22/18
to oohg
Sergio,

Exename()

Saludos,
David Field

Ricardo Sassy

unread,
Jul 23, 2018, 2:57:12 AM7/23/18
to oo...@googlegroups.com

Holaa Sergio.

Puedes usar  EXENAME() que es una función nativa de Harbour o sea que te funciona tanto en modo gráfico como en modo texto.

Y si le agregas la función TRUENAME() obtienes el path completo desde el directorio raiz, donde está corriendo el exe.

Ejemplo:

EXENAME() te devuelve “testing.exe”.

TRUENAME(EXENAME()) te devuelve “e:\shared\dev1\testing.exe”.

 

Saludos…

Ricardo Sassy

Sergio D.Castellari

unread,
Jul 23, 2018, 9:28:50 AM7/23/18
to oo...@googlegroups.com
Gracias totales!!!
 
MsgInfo(Exename(),'Prueba 1')                       //Ruta completa del ejecutable
MsgInfo(GetProgramFileName(),'Prueba 2')            //Ruta completa del ejecutable
MsgInfo(Application.ExeName,'Prueba 3')             //Ruta completa del ejecutable
MsgInfo(TApplication():Define():ExeName,'Prueba 4') //Error: Message not found...
MsgInfo(TRUENAME(EXENAME()),'Prueba 5')             //Ruta completa del ejecutable
 
a) Estaré haciendo algo mal ??? ... en todos los casos me da la ruta completa
b) TApplication():Define():ExeName, me da ése error, ¿¿¿???
 
Saludos,
 
LogoFirmaEmail

Sergio D. Castellari
Analista de Sistemas
(2227)538983 - serc...@gmail.com

SDC Soluciones Informaticas
Mat.CPCIBA Nro.0446
www.sdcinformatica.com.ar

 facebook youtube 

Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a mailto:oohg%2Bunsu...@googlegroups.com.


Para publicar una publicación en este grupo, envía un correo electrónico a oo...@googlegroups.com.
Visita este grupo en https://groups.google.com/group/oohg.
Para obtener más opciones, visita https://groups.google.com/d/optout.

--
Has recibido este mensaje porque estás suscrito al grupo "oohg" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a oohg+uns...@googlegroups.com.
Para publicar en este grupo, envía un correo electrónico a oo...@googlegroups.com.
Visita este grupo en https://groups.google.com/group/oohg.
Para acceder a más opciones, visita https://groups.google.com/d/optout.

--
Has recibido este mensaje porque estás suscrito al grupo "oohg" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a oohg+uns...@googlegroups.com.
Para publicar en este grupo, envía un correo electrónico a oo...@googlegroups.com.
Visita este grupo en https://groups.google.com/group/oohg.
Para acceder a más opciones, visita https://groups.google.com/d/optout.

--
Has recibido este mensaje porque estás suscrito al grupo "oohg" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a oohg+uns...@googlegroups.com.
Para publicar en este grupo, envía un correo electrónico a oo...@googlegroups.com.
Visita este grupo en https://groups.google.com/group/oohg.
Para acceder a más opciones, visita https://groups.google.com/d/optout.


Libre de virus. www.avg.com
LogoFirmaEmail[3].jpg
facebook[3].png
youtube[3].png

Fernando Yurisich

unread,
Jul 23, 2018, 9:38:36 AM7/23/18
to oo...@googlegroups.com
Sergio:

Lo acabo de probar y funciona bien.
Prueba a actualizar desde GitHub.
Si quieres el nombre del ejecutable sin la ruta, utiliza TApplication():Define():FileName o TApplication.FileName.

Saludos
Fernando Yurisich

Sergio D.Castellari

unread,
Jul 23, 2018, 9:56:17 AM7/23/18
to oo...@googlegroups.com
Fernando,
 
Me sigue dando error...evidentemente tengo que actualizar ooHG...
 
y veo que cambio con respeto al formato anterior...
voy a intentar hacer todos los pasos para recompilar completamente ooHG...
 
Saludos,
 
 
LogoFirmaEmail

Sergio D. Castellari
Analista de Sistemas
(2227)538983 - serc...@gmail.com

SDC Soluciones Informaticas
Mat.CPCIBA Nro.0446
www.sdcinformatica.com.ar

 facebook youtube 
LogoFirmaEmail[3].jpg
facebook[3].png
youtube[3].png

Miguel Ingles

unread,
Jul 23, 2018, 1:13:55 PM7/23/18
to oo...@googlegroups.com
Hola

Prueba estos comandos, están listos para verlos en un MSGINFO()

NomFic2:=HB_ProgName() 
MsgInfo( ;
"HB_ProgName() " +HB_ProgName()+HB_eol()+ ; //ruta+nombre+extension
"HB_FNameName() " +HB_FNameName(NomFic2)+HB_eol()+ ; //nombre
"HB_FNameNameExt() " +HB_FNameNameExt(NomFic2)+HB_eol()+ ; //nombre+extension
"HB_FNameDir() " +HB_FNameDir(NomFic2)+HB_eol()+ ; //ruta
"HB_FNameExt() " +HB_FNameExt(NomFic2)+HB_eol()+ ; //extension
"HB_FNameExtSetDef() " +HB_FNameExtSetDef(NomFic2)+HB_eol()+ ;
"HB_OsPathSeparator() " +HB_OsPathSeparator(NomFic2) ) //Separador

Saludos
Miguel


David Field

unread,
Jul 24, 2018, 2:26:27 PM7/24/18
to oohg
Hola Ricardo,

No sé en que versión hayas probado Exename() pero esta función regresa todo el path con el nombre del executable.

Saludos,
David Field

Jorge Garate

unread,
Jul 24, 2018, 3:14:28 PM7/24/18
to oohg
"EXENAME() returns the name and path of the current .EXE program." Eso dice.

Sergio D.Castellari

unread,
Jul 24, 2018, 5:58:03 PM7/24/18
to oo...@googlegroups.com
GRACIAS Miguel!!!!
 
Wow!!!...Me da todos los datos exactos y no tengo necesidad de recompilar la LIB (que por el tema de 64bits, no puedo hacerlo por GitHub)
 
Muchisimas gracias!
Saludos,
 
 
LogoFirmaEmail

Sergio D. Castellari
Analista de Sistemas
(2227)538983 - serc...@gmail.com

SDC Soluciones Informaticas
Mat.CPCIBA Nro.0446
www.sdcinformatica.com.ar

 facebook youtube 
LogoFirmaEmail[3].jpg
facebook[3].png
youtube[3].png

Fernando Yurisich

unread,
Jul 24, 2018, 7:42:06 PM7/24/18
to oo...@googlegroups.com
Sergio:

No necesitas GitHub Desktop, siempre puedes bajar un zip desde la página con todos los fuentes actualizados.

Saludos
Fernando Yurisich

Sergio D.Castellari

unread,
Jul 24, 2018, 9:19:52 PM7/24/18
to oo...@googlegroups.com
Hola Fernando!!!
 
Justo estaba pensando en escribirte, para ver la forma de ‘probar’ y eventualmente aceptar, las nuevas versiones de ooHG, sin tener que hacer ‘todo ése proceso’ que no puedo hacer por el tema de los 64bits.
Mi pregunta de ignorante: ¿El ZIP con fecha 2017-08-25, es una versión completa lista para usar??...de ser así, seria muy bueno que hagas un ZIP todos los meses, o en un periodo mas corto.
 
Mi ultima versión de ooHG (la que estoy usando para todas mis aplicaciones reales, la recompile el 2017-01-27) con tu detallado manual para hacerlo. Anda MUY BIEN, y no quiero estar recompilando por que si nuevas constantemente, ya que mis sistemas se actualizan casi a diario automáticamente por internet...por lo tanto, no puedo arriesgarme a ‘probar’ versiones por que si. Quiero estar bien seguro que todo anda joya antes de cambiar de versión para evitar dolores de cabeza.
 
Gracias por toda tu ayuda!!!
 
Saludos,
LogoFirmaEmail

Sergio D. Castellari
Analista de Sistemas
(2227)538983 - serc...@gmail.com

SDC Soluciones Informaticas
Mat.CPCIBA Nro.0446
www.sdcinformatica.com.ar

 facebook youtube 
LogoFirmaEmail[3].jpg
facebook[3].png
youtube[3].png

Fernando Yurisich

unread,
Jul 24, 2018, 10:01:31 PM7/24/18
to oo...@googlegroups.com
Sergio:

La mejor forma de probar las nuevas versiones es tener un entorno de testing separado.
Ya sea en otro equipo físico o en uno virtual.

Los .zip que están en sourceforge son versiones completas.
A esos .zip son los que hace referencia el documento de instalación y actualización:

En tu caso, que no puedes utilizar GitHub Desktop, una vez ejecutados los pasos del apartado "Procedure to install ooHG official distro" debes continuar con los pasos del apartado "Procedures to update your copy with the latest changes", bajo el subtítulo "For users".

Por último reconstruyes las libs con los pasos del apartado "Procedure to rebuild ooHG's libraries".

Con relación a publicar nuevas versiones, estoy de acuerdo que sería bueno hacerlo más seguido.
Ahora no sabría decirte cuando sería la próxima vez, tal vez en setiembre.

Saludos
Fernando Yurisich
Reply all
Reply to author
Forward
0 new messages