Version del fichero ejecutable

Version del fichero ejecutable

Postby softruz » Mon Mar 31, 2008 4:23 pm

Muy buenas, ¿Alguien me podría indicar como puedo insertar en el fichero ejecutable la version, y desde fivewin sacar su valor?

Un Saludo.
softruz
 
Posts: 485
Joined: Fri Feb 09, 2007 10:34 am

Postby cuatecatl82 » Mon Mar 31, 2008 4:43 pm

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
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
User avatar
cuatecatl82
 
Posts: 625
Joined: Wed Mar 14, 2007 6:49 pm
Location: San Cristobal de las Casas, Chiapas México

Re: Version del fichero ejecutable

Postby JmGarcia » Mon Mar 31, 2008 4:43 pm

softruz wrote:¿Alguien me podría indicar como puedo insertar en el fichero ejecutable la version, y desde fivewin sacar su valor?

En el fichero RC incluye esto:

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
User avatar
JmGarcia
 
Posts: 654
Joined: Mon May 29, 2006 3:14 pm
Location: Madrid - ESPAÑA

Re

Postby softruz » Tue Apr 01, 2008 7:14 am

Voy a probarlo y os comento.

Un Saludo.
softruz
 
Posts: 485
Joined: Fri Feb 09, 2007 10:34 am

Postby Antonio Linares » Tue Apr 01, 2008 8:34 am

Tienes un ejemplo funcionando en fwh\samples\FileVer.prg y FileVer.rc
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 41373
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain


Return to FiveWin para Harbour/xHarbour

Who is online

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