FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Saber el nombre del exe que estas ejecutanto
Posts: 632
Joined: Thu Jan 19, 2006 10:45 AM

Saber el nombre del exe que estas ejecutanto

Posted: Wed Feb 28, 2007 08:10 AM

Existe alguna manera de saber el nombre del programa que estas ejecutando de forma autonoma. Me refiero si hay forma de que el programa te informe de cual es su nombre, a modo de ejemplo "fivewindemo.exe" y en el directorio donde se ha ejecutado. He buscado si existe alguna funcion GetExeName o GetPrgName y no he encontrado algo similar. Alguna idea.

Saludos

Saludos



Andrés González desde Mallorca
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

Saber el nombre del exe que estas ejecutanto

Posted: Wed Feb 28, 2007 08:15 AM

GetModuleFileName( GetInstance() )

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 632
Joined: Thu Jan 19, 2006 10:45 AM

Saber el nombre del exe que estas ejecutanto

Posted: Wed Feb 28, 2007 08:17 AM

Mas rapido imposible y mira que he revisado las chm para ver si encontraba algo. Gracias nuevamente Antonio.

Saludos



Andrés González desde Mallorca
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

Saber el nombre del exe que estas ejecutanto

Posted: Wed Feb 28, 2007 08:35 AM

Andrés,

El errorsys de FWH lo usa para mostrar el nombre del ejecutable :-)

source\function\errsysw.prg

Esa información es propia del API de Windows, no de FWH

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 632
Joined: Thu Jan 19, 2006 10:45 AM

Saber el nombre del exe que estas ejecutanto

Posted: Thu Mar 01, 2007 06:36 AM
Gracias Antonio, como me gusto la idea de la nueva numeracion de las versiones, crei oportuno implementarlo directamente sin tener que anotarlo cada vez que realizo una nueva compilacion del programa. A modo de ejemplo hice esto:

   ::cVersion  := " Versión: " +   Substr(dtoc(Directory(GetModuleFileName( GetInstance() ) )[1,3]),9,2)+"/"+Substr(dtoc(Directory(GetModuleFileName( GetInstance() ) )[1,3]),4,2)


Que sencillamente me coge los dos digitos del año y los dos del mes, Directori()[1,3] me devuelve la fecha del ejecutable. Asi me muestra "Version: 07/02"
Saludos



Andrés González desde Mallorca
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

Saber el nombre del exe que estas ejecutanto

Posted: Thu Mar 01, 2007 08:08 AM

Andrés,

Es buena idea, pero si le cambian la fecha al EXE (por ejemplo al copiarlo a otro ordenador) entonces dará una fecha errónea, no ?

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 632
Joined: Thu Jan 19, 2006 10:45 AM

Saber el nombre del exe que estas ejecutanto

Posted: Fri Mar 02, 2007 07:45 PM

Si Antonio, como siempre tienes razon pero en mi caso no tiene sentido si cambian el programa de entorno sencillamente deja de funcionar, mas que por seguridad es para mi control. Tengo muchos programas funcionando pero como puedes ver me falta un conocimiento profundo de fivewin, bueno en eso estoy, soy de los que siempre he creido en ti desde las primeras versiones de fivewin aun debo conservar las primeras versiones en disquete, hace mucho mucho tiempo.

Gracias por tu ayuda.

Saludos



Andrés González desde Mallorca

Continue the discussion