Differenze tra le versioni di "Utilizzare un Componente obsoleto"
Riga 36: | Riga 36: | ||
− | + | Public Sub Main() | |
Dim sym, percorso_file As String | Dim sym, percorso_file As String | ||
Riga 43: | Riga 43: | ||
<FONT Color=gray>' ''Imposta il percorso del file audio (.wav, .mp3, .ogg) o del file Midi:''</font> | <FONT Color=gray>' ''Imposta il percorso del file audio (.wav, .mp3, .ogg) o del file Midi:''</font> | ||
− | percorso_file = "<FONT Color= | + | percorso_file = "<FONT Color=darkgreen>''/percorso/del/file''</font>" |
<FONT Color=gray>' ''Carica innanzitutto il Componente obsoleto necessario per utilizzare la Classe che permetterà di eseguire il file:''</font> | <FONT Color=gray>' ''Carica innanzitutto il Componente obsoleto necessario per utilizzare la Classe che permetterà di eseguire il file:''</font> | ||
Riga 72: | Riga 72: | ||
Quit | Quit | ||
− | + | End | |
− | + | Public Sub Application_Read() | |
<FONT Color=gray>' ''Premendo il tasto "Invio" della tastiera, termina l'esecuzione del file:''</font> | <FONT Color=gray>' ''Premendo il tasto "Invio" della tastiera, termina l'esecuzione del file:''</font> | ||
Riga 81: | Riga 81: | ||
esce = True | esce = True | ||
− | + | End | |
Riga 89: | Riga 89: | ||
[1] Minisini ha spiegato brevemente perché i Componenti ''obsoleti'' non vengono rimossi dall'architettura dello sviluppo di Gambas in questa discussione della ''Mailing list'' ufficiale: https://lists.gambas-basic.org/pipermail/user/2020-June/069507.html | [1] Minisini ha spiegato brevemente perché i Componenti ''obsoleti'' non vengono rimossi dall'architettura dello sviluppo di Gambas in questa discussione della ''Mailing list'' ufficiale: https://lists.gambas-basic.org/pipermail/user/2020-June/069507.html | ||
− | [2] Vedere anche questa pagina | + | [2] Vedere anche questa pagina: [[Attivare un Componente dinamicamente da codice]] |
Versione delle 10:41, 10 giu 2024
Come è noto, qualche Componente, attivo nelle precedenti versioni di Gambas, oggi è invece considerato obsoleto, e pertanto è stato disattivato.
Tali Componenti obsoleti non sono più disponibili nell'apposita sezione dell'IDE fra quelli forniti dalla corrente versione di Gambas, e non sono più utilizzabili nei progetti.
Eppure, qualora tali Componenti obsoleti non siano stati definitivamente eliminati dai sorgenti di Gambas [nota 1], è possibile richiamarli e quasi sempre utilizzare le loro Classi.
Sono almeno due le modalità per richiamare ed utilizzare le risorse di tali Componenti ormai obsoleti (purché - come già detto - non siano stati definitivamente estromessi dai sorgenti di Gambas).
Riattivazione dall'IDE di Gambas
La prima modalità prevedere la loro possibile riattivazione dall'IDE di Gambas.
Ecco come fare:
1) nell'IDE cliccare in alto nel menu e scegliere le seguenti voci: " Progetto --> Proprietà ";
2) nella finestra di dialogo che appare cliccare su "Componenti";
3) appariranno tutti i Componenti attivabili;
4) al di sopra di essi, a destra, e più precisamente nella prima riga scrivibile all'estrema destra, proprio sotto la icona X per chiudere la finestra di dialogo, v'è un tastino virtuale contenente una piccola icona con un cerchietto rosso sbarrato. Lasciando il puntatore del mouse su tale icona, apparirà un popup avente il seguente testo: " Show deprecated components ".
5) cliccare su tale tastino;
6) in tal modo saranno mostrati i Componenti ormai obsoleti, che potranno comunque essere attivati con la modalità consueta e così utilizzati.
Ecco, dunque, come si mostrerà la finestra dei Componenti; quelli in colore grigio chiaro sono i Componenti obsoleti riattivabili:
Riattivazione da codice
Il richiamo ed uso dei Componenti ormai obsoleti può avvenire anche da codice. [nota 2]
Nel progetto Gambas si dovrà fare uso delle Classi:
- " Component ", per richiamare il Componente obsoleto;
- " Class ", per richiamare la Classe che ci interessa di quel Componente obsoleto;
- " Object ", per richiamare Metodi e Proprietà della Classe utilizzata del Componente obsoleto.
Mostriamo un esempio pratico, nel quale si richiamerà l'ormai obsoleto e disattivato Componente "gb.sdl.sound" - ormai obsoleto - e si utilizzeranno alcune risorse della sua Classe "Music" per eseguire un file audio o Midi:
Private cl As Class Private esce As Boolean Public Sub Main() Dim sym, percorso_file As String Dim co As Component Dim b As Byte ' Imposta il percorso del file audio (.wav, .mp3, .ogg) o del file Midi: percorso_file = "/percorso/del/file" ' Carica innanzitutto il Componente obsoleto necessario per utilizzare la Classe che permetterà di eseguire il file: co = Component.Load("gb.sdl.sound") ' Carica quindi la Classe che permetterà di eseguire il file: cl = Class.Load("Music") Print "Simboli (\"Costanti\", \"Proprietà\", \"Metodi\" e \"Eventi\") posseduti e gestiti da '\e[34m"; co.Name; "\e[0m':" For Each sym In cl.Symbols Print b, sym Inc b Next Print Print ' Carica infine i Metodi specifici della Classe necessari per caricare ed eseguire il file: Object.Call(cl, cl.Symbols[1], [percorso_file]) Object.Call(cl, cl.Symbols[2], Null) While Not esce ' Richiama anche la Proprietà ".Pos" della Classe "Music" per sapere la currente posizione temporale dell'esecuzione: Write "\e[0m\r Tempo trascorso: \e[31m" & Date(0, 0, 0, 0, 0, 0, Object.GetProperty(cl, cl.Symbols[0]) * 1000) Wait 0.01 Wend Write "\nEsecuzione terminata" Quit End Public Sub Application_Read() ' Premendo il tasto "Invio" della tastiera, termina l'esecuzione del file: Object.Call(cl, cl.Symbols[3], Null) esce = True End
Note
[1] Minisini ha spiegato brevemente perché i Componenti obsoleti non vengono rimossi dall'architettura dello sviluppo di Gambas in questa discussione della Mailing list ufficiale: https://lists.gambas-basic.org/pipermail/user/2020-June/069507.html
[2] Vedere anche questa pagina: Attivare un Componente dinamicamente da codice