Muy buenas, ¿Alguien me podría indicar como puedo insertar en el fichero ejecutable la version, y desde fivewin sacar su valor?
Un Saludo.
Version del fichero ejecutable
- cuatecatl82
- Posts: 614
- Joined: Wed Mar 14, 2007 6:49 pm
- Location: San Cristobal de las Casas, Chiapas México
- Contact:
Saludos softruz:
Yo lo hago de la siguiente forma, aqui veduelvo la fecha de creacion o odificacion del exe principal, espero te sirva..
FUNCTION VERSIONEXE()
LOCAL dVersion := DTOS(DIRECTORY(".\TUEXE.EXE")[1,3])
LOCAL cVer:= "Edición "+SUBSTR(ALLTRIM(dVersion),7,2)+"."+SUBSTR(ALLTRIM(dVersion),5,2)+"."+SUBSTR(ALLTRIM(dVersion),1,4)
RETURN cVer
Yo lo hago de la siguiente forma, aqui veduelvo la fecha de creacion o odificacion del exe principal, espero te sirva..
FUNCTION VERSIONEXE()
LOCAL dVersion := DTOS(DIRECTORY(".\TUEXE.EXE")[1,3])
LOCAL cVer:= "Edición "+SUBSTR(ALLTRIM(dVersion),7,2)+"."+SUBSTR(ALLTRIM(dVersion),5,2)+"."+SUBSTR(ALLTRIM(dVersion),1,4)
RETURN cVer
Soluciones y Diseño de Software
Damos Soluciones...
I.S.C. Victor Daniel Cuatecatl Leon
Director y Diseñador de Proyectos
http://www.soldisoft.unlugar.com
http://www.sisa.unlugar.com
danyleon82@hotmail.com
www.facebook.com/victordaniel.cuatecatlleon
Damos Soluciones...
I.S.C. Victor Daniel Cuatecatl Leon
Director y Diseñador de Proyectos
http://www.soldisoft.unlugar.com
http://www.sisa.unlugar.com
danyleon82@hotmail.com
www.facebook.com/victordaniel.cuatecatlleon
Re: Version del fichero ejecutable
En el fichero RC incluye esto:softruz wrote:¿Alguien me podría indicar como puedo insertar en el fichero ejecutable la version, y desde fivewin sacar su valor?
1 VERSIONINFO
FILEVERSION 1, 0, 0, 0
PRODUCTVERSION 1, 0, 0, 0
FILEOS VOS__WINDOWS16
{
BLOCK "StringFileInfo"
{
BLOCK "040904E4"
{
VALUE "ProductVersion", "1.0 ßeta"
VALUE "FileVersion", "1.0 ßeta"
VALUE "FileDescription", "FiveWin+xHarbour... o lo que sea"
}
}
}
Después en el ejecutable botón derecho propiedades y folder versión.
Mi abuelo decía: Los aviones vuelan porque Dios quiere, y los helicópteros ni Dios sabe porque vuelan.
FWH 16.02, xHarbour 1.2.3, Harbour 3.2.0, WorkShop 4.5, AJ Make 0.30, Borlan BCC 7.00, VisualStudio 2013
FWH 16.02, xHarbour 1.2.3, Harbour 3.2.0, WorkShop 4.5, AJ Make 0.30, Borlan BCC 7.00, VisualStudio 2013
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact: