Fecha De Creacion Miprograma.gambas


Objetivo: Fecha De Creacion Miprograma.gambas
Hola a todos.
Estoy usando el siguiente fragmento de código para poner la fecha del ejecutable de gambas en el formulario "acerca de"
dtFechaCompilacion = Stat(Application.Path &/ Application.Name & ".gambas").LastModified

Y funciona en cuando lo ejecuto desde el IDE e inclusive si ejecuto el miprograma.gambas pero cuando instalo el paquete .deb esto deja de funcionar.
Así que la pregunta es: ¿Cual es la forma correcta de poner la fecha de "compilación" del ejecutable de gambas? para poder recuperarlo y mostrar lo en acercad de...?

Saludos.

Perfil MP  
Objetivo: Re: Fecha De Creacion Miprograma.gambas
Tincho:

Citar:
¿fecha de compilación?

Y no es más interesante la versión?

application.version

Objetivo: Re: Fecha De Creacion Miprograma.gambas
jsbsan escribió: [Ver mensaje]
Y no es más interesante la versión?

Si claro, eso también lo incluía en otro renglón, aquí mas abajo esta el código completo.
Pero me gusta poner la fecha que se genero el ejecutable ademas de la versión y creía haber encontrado una forma pero parece que no es del todo correcta.
Public Sub Form_Open()

Dim dtFechaCompilacion As Date
Dim stFechaCompilacion As String

dtFechaCompilacion = Stat(Application.Path &/ Application.Name & ".gambas").LastModified

stFechaCompilacion = Year(dtFechaCompilacion) & "-"
stFechaCompilacion &= FormatStrings.Digito2(Month(dtFechaCompilacion)) & "-"
stFechaCompilacion &= FormatStrings.Digito2(Day(dtFechaCompilacion)) & ":"
stFechaCompilacion &= FormatStrings.Digito2(Hour(dtFechaCompilacion)) & ":"
stFechaCompilacion &= FormatStrings.Digito2(Minute(dtFechaCompilacion)) & ":"
stFechaCompilacion &= FormatStrings.Digito2(Second(dtFechaCompilacion))

lblName.Text = FLogin.stAppName
lblDescription.Text = FLogin.stAppDesc
lblVersion.Text = "v" & Application.Version & " [" & stFechaCompilacion & "]"
lblCopyright.Text = "Copyright (C) 2014-" & Year(Now)
lblAutor.Text = "Desarrollador"
lblLicencia.Text = "GPL v3 "
Me.Caption = "Acerca de " & FLogin.stAppName

End

Perfil MP  
Objetivo: Re: Fecha De Creacion Miprograma.gambas
Mmmmm.... Nunca lo he probado, pero.... mmmmm... como todo: ¿Para qué?
No creo que sea de mucha utilidad. Lo digo porque yo me he encontrado con tener que subir, por bugs de última hora, dos o más versiones de un mismo programa al repositorio el mismo día.
El número de versión cambiaría, la fecha no... entonces ¿Qué utilidad tiene?
En el "Acerca de" siempre muestro la versión, que es lo único fiable para identificar... eso: la versión que el usuario está ejecutando.

Aparte de eso ¿qué es Formatstrings? ¿Por qué no usas la función format? Algo así como

lblVersion.Text = "v" & Application.Version & " [" & format(dtFechaCompilacion,"dd-mm-yyyy hh:nn:ss") & "]"


Te ahorras mogollón de líneas.

Perfil MP  
Objetivo: Re: Fecha De Creacion Miprograma.gambas
De todas formas, se me olvidaba darte la respuesta a lo que quieres:

Si ejecutas desde el ide:

dtFechaCompilacion = Stat(Application.Path &/ Application.Name & ".gambas").LastModified


Es correcto, pero si ejecutas desde paquete instalado entonces tienes que eliminar lo de .gambas

dtFechaCompilacion = Stat(Application.Path &/ Application.Name ).LastModified


Para que te funcione en ambos entornos:
try dtFechaCompilacion = Stat(Application.Path &/ Application.Name & ".gambas").LastModified
if Error then
dtFechaCompilacion = Stat(Application.Path &/ Application.Name ).LastModified
endif

Perfil MP  
Objetivo: Re: Fecha De Creacion Miprograma.gambas
Shordi:
Bueno, a los efectos del control de versiones, la marca de tiempo no tiene utilidad y es verdad que con la version vale para esto.
Pero al tener la fecha, esto permite dimensionar en la linea de tiempo (mentalmente digamos) para valorar el estado de "desatención" que tiene el programa y el usuario (o el cliente) puede saber cuando se "toco" el código por ultima vez. Si este se encuentra en medio de un proyecto en el cual se "reviso" el programa, tal vez le interese tener controlado este aspecto.
Pero, creo que, esto de poner la fecha, esta mas cerca de un capricho personal que de una utilidad practica.
He cambiado el código para usar "Format", ya que es verdad que es mas simple y usa menos lineas. Eso viene de cuando empece a aprender e iba creando funciones bajo demanda y desconocía estas que ya incorpora gambas.

Gracias por las respuestas, me han sido de utilidad.
Saludos.

Perfil MP  
Objetivo: Re: Fecha De Creacion Miprograma.gambas
Recuerdo tambien este asunto:

http://foro.gambas-es.org/viewtopic.php?f=1&t=5093

Perfil MP  

Página 1 de 1


  
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
Puede descargar archivos
No puede publicar eventos en el calendario

   

Está utilizando la versión (Lo-Fi). Para ver la versión completa del foro, haga clic aquí.

Powered by Icy Phoenix based on phpBB
Design by DiDiDaDo

Página generada en:: 0.3968s (PHP: -71% SQL: 171%)
Consultas SQL: 45 - Debug off - GZIP Activado