Differenze tra le versioni di "Conoscere il tipo di file mediante le funzioni esterne del API di libglib-2.0"
Da Gambas-it.org - Wikipedia.
(4 versioni intermedie di uno stesso utente non sono mostrate) | |||
Riga 1: | Riga 1: | ||
− | Con la funzione esterna | + | Con la funzione esterna "g_file_test()", è possibile verificare se il file corrisponde a un tipo previsto dall'enumerazione ''[https://docs.gtk.org/glib/flags.FileTest.html GFileTest]''. |
− | E' necessario avere installata nel sistema e richiamare in Gambas la libreria condivisa: "''libglib-2.0.so.0. | + | E' necessario avere installata nel sistema e richiamare in Gambas la libreria condivisa: "''libglib-2.0.so.0.8000.2'' ". |
Mostriamo un semplice esempio: | Mostriamo un semplice esempio: | ||
− | Library "libglib-2.0:0. | + | Library "libglib-2.0:0.8000.2" |
Private Enum G_FILE_TEST_IS_REGULAR = 1, G_FILE_TEST_IS_SYMLINK, G_FILE_TEST_IS_DIR, G_FILE_TEST_IS_EXECUTABLE, G_FILE_TEST_EXISTS | Private Enum G_FILE_TEST_IS_REGULAR = 1, G_FILE_TEST_IS_SYMLINK, G_FILE_TEST_IS_DIR, G_FILE_TEST_IS_EXECUTABLE, G_FILE_TEST_EXISTS | ||
Riga 13: | Riga 13: | ||
− | + | Public Sub Main() | |
Dim bo As Boolean | Dim bo As Boolean | ||
− | bo = g_file_test("<FONT Color= | + | bo = g_file_test("<FONT Color=darkgreen>''/percorso/del/file''</font>", G_FILE_TEST_EXISTS) |
Print bo | Print bo | ||
− | + | End |
Versione attuale delle 15:12, 8 giu 2024
Con la funzione esterna "g_file_test()", è possibile verificare se il file corrisponde a un tipo previsto dall'enumerazione GFileTest.
E' necessario avere installata nel sistema e richiamare in Gambas la libreria condivisa: "libglib-2.0.so.0.8000.2 ".
Mostriamo un semplice esempio:
Library "libglib-2.0:0.8000.2" Private Enum G_FILE_TEST_IS_REGULAR = 1, G_FILE_TEST_IS_SYMLINK, G_FILE_TEST_IS_DIR, G_FILE_TEST_IS_EXECUTABLE, G_FILE_TEST_EXISTS ' gboolean g_file_test (const gchar *filename, GFileTest test) ' Returns TRUE if any of the tests in the bitfield test are TRUE. Private Extern g_file_test(filename As String, test As Integer) As Boolean Public Sub Main() Dim bo As Boolean bo = g_file_test("/percorso/del/file", G_FILE_TEST_EXISTS) Print bo End