Differenze tra le versioni di "Ottenere la lista di tutte le variabili d'ambiente nel proprio sistema mediante le risorse del API di GLIB-2.0"

Da Gambas-it.org - Wikipedia.
(Creata pagina con "La funzione esterna ''g_get_environ( )'' del API di GLIB-2.0 consente di ottenere una lista di tutte le [https://it.wikipedia.org/wiki/Variabile_d%27ambiente variabili d'ambi...")
 
Riga 1: Riga 1:
 
La funzione esterna ''g_get_environ( )'' del API di GLIB-2.0 consente di  ottenere una lista di tutte le [https://it.wikipedia.org/wiki/Variabile_d%27ambiente variabili d'ambiente] nel nostro sistema.
 
La funzione esterna ''g_get_environ( )'' del API di GLIB-2.0 consente di  ottenere una lista di tutte le [https://it.wikipedia.org/wiki/Variabile_d%27ambiente variabili d'ambiente] nel nostro sistema.
  
E' necessario avere installata e richiamare in Gambas la libreria dinamica condivisa: "''libglib-2.0''"
+
E' necessario avere installata e richiamare in Gambas la libreria condivisa: "''libglib-2.0.so.0.6400.6'' ".
  
  
 
Mostriamo un semplice esempio:
 
Mostriamo un semplice esempio:
  Library "libglib-2.0"
+
  Library "libglib-2.0:0.6400.6"
 
   
 
   
 
  <FONT Color=gray>' ''gchar ** g_get_environ (void)''
 
  <FONT Color=gray>' ''gchar ** g_get_environ (void)''
Riga 22: Riga 22:
 
   Dim s As String
 
   Dim s As String
 
    
 
    
  en = g_get_environ()
+
  en = g_get_environ()
 
+
 
  Repeat
+
  Repeat
    s = String@(Pointer@(en + i))
+
    s = String@(Pointer@(en + i))
    Print s
+
    Print s
    i += SizeOf(gb.Pointer)
+
    i += SizeOf(gb.Pointer)
  Until s == Null
+
  Until s == Null
 
+
 
  g_strfreev(en)
+
  g_strfreev(en)
 
    
 
    
 
  '''End'''
 
  '''End'''

Versione delle 16:35, 9 dic 2021

La funzione esterna g_get_environ( ) del API di GLIB-2.0 consente di ottenere una lista di tutte le variabili d'ambiente nel nostro sistema.

E' necessario avere installata e richiamare in Gambas la libreria condivisa: "libglib-2.0.so.0.6400.6 ".


Mostriamo un semplice esempio:

Library "libglib-2.0:0.6400.6"

' gchar ** g_get_environ (void)
' Gets the list of environment variables for the current process.
Private Extern g_get_environ() As Pointer

' void g_strfreev (gchar **str_array)
' Frees a NULL-terminated array of strings.
Private Extern g_strfreev(str_array As Pointer)


Public Sub Main()
 
 Dim en As Pointer
 Dim i As Integer
 Dim s As String
  
 en = g_get_environ()
 
 Repeat
   s = String@(Pointer@(en + i))
   Print s
   i += SizeOf(gb.Pointer)
 Until s == Null
 
 g_strfreev(en)
  
End