Differenze tra le versioni di "Conoscere la versione di Gambas"

Da Gambas-it.org - Wikipedia.
 
(6 versioni intermedie di uno stesso utente non sono mostrate)
Riga 1: Riga 1:
 
Possiamo conoscere il numero della versione di Gambas presente nel nostro sistema almeno mediante due modalità.
 
Possiamo conoscere il numero della versione di Gambas presente nel nostro sistema almeno mediante due modalità.
 
  
 
===Con il solo codice Gambas===
 
===Con il solo codice Gambas===
Se l'aggiornamento della propria versione di Gambas viene effettuato via SVN, allora se ne può conoscere il numero semplicemente leggendolo dal file "''/home/....../trunk/VERSION''":
+
Se l'aggiornamento della propria versione di Gambas viene effettuato via SVN, allora se ne può conoscere il numero semplicemente leggendolo dal file "''VERSION'' ", presente nella cartella principale dei sorgenti di Gambas.
'''Public''' Sub Main() 
+
<BR>Se all'atto dell'installazione di Gambas non sono stati modificati il percorso e la denominazione predefiniti della cartella principale dei sorgenti, ossia ''User.Home &/ "gambasdevel"'', allora la versione potrà essere letta con il seguente codice:
 
+
  Public Sub Main()   
  Dim s As String 
 
   
 
  s = File.Load(User.Home &/ "trunk/VERSION") 
 
   
 
  Print "Gambas - versione "; s 
 
 
 
'''End'''
 
 
 
 
 
oppure estraendo il numero di versione del pacchetto di aggiornamento dal file "''/home/....../trunk/config.h''":
 
  '''Public''' Sub Main(
 
 
 
  Dim s As String 
 
   
 
  s = File.Load(User.Home &/ "trunk/config.h")   
 
 
      
 
      
  s = Scan(s, "*#define PACKAGE_STRING \"*\"*")[1]
+
  Print "Gambas - versione: "; Trim(File.Load(User.Home &/ "gambasdevel/VERSION"))
   
 
  Print "Versione: "; s
 
 
    
 
    
  '''End'''
+
  End
 
 
 
 
  
 
===Con ''Shell''===
 
===Con ''Shell''===
 
In generale si potrà utilizzare anche ''Shell'':
 
In generale si potrà utilizzare anche ''Shell'':
  '''Public''' Sub Main()
+
  Public Sub Main()
 
   
 
   
 
   Dim s As String
 
   Dim s As String
 
   
 
   
  Shell "gbx3 --version" To s
+
  Shell "gbx3 --version" To s
 
   
 
   
  Print s
+
  Print s
 
   
 
   
  '''End'''
+
  End
Se si possiede Gambas-2, allora il comando sarà ''gbx2''.
+
 
 +
 
 +
==Conoscere il numero della revisione ''Commit'' di Gambas==
 +
Se gli aggiornamenti alla versione di Gambas vengono effettuati da GIT, per conoscere a quale ''[https://www.atlassian.com/git/tutorials/saving-changes/git-commit Commit]'' di GitLab corrisponde la revisione del proprio Gambas, bisogna individuare la specifica riga nel file ''User.Home &/ "gambasdevel/main/config.h"'':
 +
Public Sub Main()
 +
 +
  Dim s As String
 +
 
 +
  s = File.Load(User.Home &/ "gambasdevel/main/config.h")
 +
 
 +
  s = Scan(s, "*TRUNK_VERSION *\n*")[1]
 +
  Print s
 +
 
 +
End
 +
Laddove la cartella "''/gambasdevel'' " (se lasciata così chiamata dall'utente di Gambas) è quella contenente i file sorgenti di Gambas nel proprio sistema.

Versione attuale delle 07:45, 28 set 2023

Possiamo conoscere il numero della versione di Gambas presente nel nostro sistema almeno mediante due modalità.

Con il solo codice Gambas

Se l'aggiornamento della propria versione di Gambas viene effettuato via SVN, allora se ne può conoscere il numero semplicemente leggendolo dal file "VERSION ", presente nella cartella principale dei sorgenti di Gambas.
Se all'atto dell'installazione di Gambas non sono stati modificati il percorso e la denominazione predefiniti della cartella principale dei sorgenti, ossia User.Home &/ "gambasdevel", allora la versione potrà essere letta con il seguente codice:

Public Sub Main()  
    
 Print "Gambas - versione: "; Trim(File.Load(User.Home &/ "gambasdevel/VERSION"))
 
End

Con Shell

In generale si potrà utilizzare anche Shell:

Public Sub Main()

 Dim s As String

 Shell "gbx3 --version" To s

 Print s

End


Conoscere il numero della revisione Commit di Gambas

Se gli aggiornamenti alla versione di Gambas vengono effettuati da GIT, per conoscere a quale Commit di GitLab corrisponde la revisione del proprio Gambas, bisogna individuare la specifica riga nel file User.Home &/ "gambasdevel/main/config.h":

Public Sub Main()

 Dim s As String
 
 s = File.Load(User.Home &/ "gambasdevel/main/config.h")
 
 s = Scan(s, "*TRUNK_VERSION *\n*")[1]
 Print s
 
End

Laddove la cartella "/gambasdevel " (se lasciata così chiamata dall'utente di Gambas) è quella contenente i file sorgenti di Gambas nel proprio sistema.