Far mostrare l´estensione dell´ultimo file precedentemente aperto: differenze tra le versioni

Da Gambas-it.org - Wikipedia.
Vai alla navigazione Vai alla ricerca
(Nuova pagina: Poniamo il caso di volere che nel ''ComboBox'': "''Tipo di File''" all'interno della finestra di dialogo ''OpenFile'', o di quella ''SaveFile'', venga scritta l'estensione dell'ultimo ...)
 
 
(2 versioni intermedie di uno stesso utente non sono mostrate)
Riga 1: Riga 1:
Poniamo il caso di volere che nel ''ComboBox'': "''Tipo di File''" all'interno della finestra di dialogo ''OpenFile'', o di quella ''SaveFile'', venga scritta l'estensione dell'ultimo file precedentemente aperto, o - nell'altro caso - dell'ultimo file precedentemente salvato.
#REDIRECT [[Far_mostrare_l'estensione_dell'ultimo_file_precedentemente_aperto]]
 
Potremo utilizzare ad esempio il seguente codice:
'''Private''' percorso As String
'''Public''' Sub Form_Open()
  percorso = "*.*"
'''End'''
'''Public''' Sub Button1_Click()
  With Dialog
    .Filter = [*." & File.Ext(percorso), "File "])
    If OpenFile() Then Return  <FONT color=#006400>' ''oppure ".SaveFile"''</font>
    percorso = .Path
'''End'''

Versione attuale delle 08:38, 6 set 2020