Differenze tra le versioni di "Ottenere la directory di lavoro corrente dell'applicazione Gambas"
Da Gambas-it.org - Wikipedia.
Riga 4: | Riga 4: | ||
==Uso della proprietà ''Application.Path''== | ==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() | '''Public''' Sub Main() | ||
− | + | Dim s As String | |
s = Application.Path | s = Application.Path | ||
Riga 21: | Riga 20: | ||
==Uso della funzione esterna ''getcwd()''== | ==Uso della funzione esterna ''getcwd()''== | ||
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 ''getcwd()'', dichiarata nel file header ''unistd.h''. | ||
− | |||
Esempio: | Esempio: | ||
Riga 33: | Riga 31: | ||
'''Public''' Sub Main() | '''Public''' Sub Main() | ||
− | + | Dim p As Pointer | |
p = getcwd(0, 0) | p = getcwd(0, 0) |
Versione delle 18:41, 20 ago 2022
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