Conoscere la versione di Gambas: differenze tra le versioni

Da Gambas-it.org - Wikipedia.
Vai alla navigazione Vai alla ricerca
Nessun oggetto della modifica
Nessun oggetto della modifica
Riga 4: Riga 4:
===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 "''/home/....../trunk/VERSION''":
  '''Public''' Sub Button1_Click()   
  '''Public''' Sub Main()   
    
    
   Dim s As String   
   Dim s As String   
Riga 32: Riga 32:
===Con ''Shell''===
===Con ''Shell''===
In generale si potrà utilizzare anche ''Shell'':
In generale si potrà utilizzare anche ''Shell'':
  '''Public''' Sub Button1_Click()
  '''Public''' Sub Main()
   
   
   Dim s As String
   Dim s As String

Versione delle 10:42, 11 set 2016

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 "/home/....../trunk/VERSION":

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 "Versione: "; s
 
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

Se si possiede Gambas-2, allora il comando sarà gbx2.