Differenze tra le versioni di "Ottenere la directory di lavoro corrente dell'applicazione Gambas"
Da Gambas-it.org - Wikipedia.
Riga 2: | Riga 2: | ||
− | ==Uso della | + | ==Uso della Proprietà "Application.Path"== |
La prima possibilità è fornita dalla proprietà ''.Path'' della Classe ''Application'' di Gambas. | La prima possibilità è fornita dalla proprietà ''.Path'' della Classe ''Application'' di Gambas. | ||
Esempio: | Esempio: | ||
− | + | Public Sub Main() | |
Dim s As String | Dim s As String | ||
Riga 14: | Riga 14: | ||
Print s | Print s | ||
− | + | End | |
− | + | ==Uso della funzione esterna "getcwd()"== | |
− | ==Uso della funzione esterna | + | Un'altra modalità prevede l'uso della funzione esterna "getcwd()", dichiarata nel file header ''unistd.h''. |
− | Un'altra modalità prevede l'uso della funzione esterna | ||
Esempio: | Esempio: | ||
Riga 29: | Riga 28: | ||
− | + | Public Sub Main() | |
Dim p As Pointer | Dim p As Pointer | ||
p = getcwd(0, 0) | p = getcwd(0, 0) | ||
− | If p = 0 Then Error.Raise("Impossibile ottenere la directory di lavoro corrente !") | + | If p == 0 Then Error.Raise("Impossibile ottenere la directory di lavoro corrente !") |
Print String@(p) | Print String@(p) | ||
− | + | End |
Versione delle 17:09, 28 giu 2024
Per ottenere la directory di lavoro corrente dell'applicazione Gambas, sono disponibili almeno due possibilità.
Uso della Proprietà "Application.Path"
La prima possibilità è fornita dalla proprietà .Path della Classe Application di Gambas.
Esempio:
Public Sub Main() Dim s As String s = Application.Path Print s End
Uso della funzione esterna "getcwd()"
Un'altra modalità prevede l'uso della funzione esterna "getcwd()", dichiarata nel file header unistd.h.
Esempio:
Library "libc:6" ' char *getcwd (char *__buf, size_t __size) ' Get the pathname of the current working directory. Private Extern getcwd(__buf As Pointer, __size As Long) As Pointer Public Sub Main() Dim p As Pointer p = getcwd(0, 0) If p == 0 Then Error.Raise("Impossibile ottenere la directory di lavoro corrente !") Print String@(p) End