Differenze tra le versioni di "Far mostrare l´estensione dell´ultimo file precedentemente aperto"
Da Gambas-it.org - Wikipedia.
|
|
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 With
| |
− |
| |
− | '''End'''
| |
Versione attuale delle 07:38, 6 set 2020