(26-06-2022, 19:47)vuott escribió: Sì, la solución de nuestro Cónsul romano es más rápida y elegante.
Probablemente debajo de esta instrucción se oculte: "gambas3 -V", pero para eso hay que consultarlo al oráculo.
Quizás la clase System se pueda ver en las fuentes de Gambas.
Puede que sea más habitual este:
System.Version
Puede que uno haya sustituido al otro.
Las referencias que encontré a los archivos del código de Gambas fueron estas con la palabra FullVersion.
Estando dentro del directorio de las fuentes de Gambas3.
Código:
grep -lir "System.FullVersion" ./
Cita:
./app/src/gambas3/.src/Project.module
./app/src/gambas3/.src/Packager/FMakeInstall.class
./app/src/gambas3/.src/Packager/Package.module
./app/src/gambas3/.src/Project/Farm/FPublish.class
./app/src/gambas3/.src/Project/Farm/Publish/CTagCompletion.class
./app/src/gambas-wiki/.src/Main.module
./comp/src/gb.logging/.src/Formatter.module
Principalmente me llamó este más la atención: ./app/src/gambas3/.src/Project.module
Si, es una carpeta dentro del proyecto Gambas3 y si llama Project.
Este proceso también atrajo mi curiosidad.
Código:
Private Sub InitVersion()
Dim sVer As String
Dim aVer As String[]
'Shell "gbx" & System.Version & " -V" To sVer
'FullVersion = Trim(Mid$(sVer, InStr(sVer, "-") + 1))
FullVersion = System.FullVersion
aVer = Split(FullVersion, ".")
aVer.Remove(aVer.Max)
Version = aVer.Join(".")
Exec [System.Path &/ "bin/gbx" & System.Version, "-V"] To sVer
FullVersionWithRevision = Trim(sVer)
If FullVersionWithRevision Ends ".0" Then FullVersionWithRevision = Left$(FullVersionWithRevision, -2)
Catch
Version = "?"
End
Me gustaría investigarlo mejor, pero mis deberes de cónsul romano me reclaman.
Que por cierto si os fijáis se lee "gbx" cuando realmente solemos encontrar "gbx3" en el directorio del sistema.
Es que System.Versión solo devuelve "3"...
Cita:
gbx3 (1) - GAMBAS Interpreter
Julio:
Supuse que era eso. Ya veo que es un problema y puede que bien grande o bastante pesado para resolverlo.
En mucho de tus programas tenías esa opción, aplicación como el de las damas y muchos más. Sobre todo
las que son de gran tamaño.
Saludos