Differenze tra le versioni di "Eseguire un file MIDI mediante il codice html"
Da Gambas-it.org - Wikipedia.
(Creata pagina con "Un file MIDI potrà essere eseguito con il protocollo ''HTML'' all'interno dell'Oggetto ''WebView''. =Esecuzione di un file Midi da un dispositivo di archiviazione mediante i...") |
|||
| (9 versioni intermedie di uno stesso utente non sono mostrate) | |||
| Riga 1: | Riga 1: | ||
Un file MIDI potrà essere eseguito con il protocollo ''HTML'' all'interno dell'Oggetto ''WebView''. | Un file MIDI potrà essere eseguito con il protocollo ''HTML'' all'interno dell'Oggetto ''WebView''. | ||
| − | |||
=Esecuzione di un file Midi da un dispositivo di archiviazione mediante il codice ''HTML 5'' e l'oggetto ''WebView''= | =Esecuzione di un file Midi da un dispositivo di archiviazione mediante il codice ''HTML 5'' e l'oggetto ''WebView''= | ||
| − | Per | + | Per eseguire un file Midi presente in un [https://it.wikipedia.org/wiki/Storage dispositivo di archiviazione], si utilizzerà la risorsa grafica QT, attivando i Componenti "gb.qt5" e "gb.qt5.webkit", oppure attivando i Componenti "gb.gui.qt" e "gb.gui.qt.webkit". |
<BR>In questo caso la riga di comando scritta in html sarà assegnata direttamente alla proprietà ''.HTML'' dell'oggetto ''WebView''. | <BR>In questo caso la riga di comando scritta in html sarà assegnata direttamente alla proprietà ''.HTML'' dell'oggetto ''WebView''. | ||
| − | <BR> Poiché l'attributo "src" del protocollo HTML contiene un '''URL'''-indirizzo assoluto o relativo del file | + | <BR> Poiché l'attributo "src" del protocollo HTML contiene un '''URL'''-indirizzo assoluto o relativo del media file, il percorso del file Midi sarà anticipato da "'''file://'''". |
Mostriamo un esempio: | Mostriamo un esempio: | ||
| − | + | Private wv As WebView | |
| + | |||
| + | |||
| + | Public Sub Button1_Click() | ||
| − | + | If Object.IsValid(wv) Then wv.Delete | |
With wv = New WebView(Me) | With wv = New WebView(Me) | ||
| Riga 16: | Riga 18: | ||
.W = 340 | .W = 340 | ||
.H = 170 | .H = 170 | ||
| − | <FONT Color= | + | <FONT Color=gray>' ''L'attributo "src" contiene un URL-indirizzo assoluto o relativo del file Midi e </font><FONT Color=#006400>'''non deve avere spazi.'''''</font> |
| − | ' '''''Se non si desidera l'esecuzione automatica del file Midi, bisognerà togliere l'attributo "autoplay" e una volta mostrato nell'Oggetto "WebView" il dispositivo di riproduzione audio, vi si dovrà cliccare sopra con il tasto destro del mouse e nel menu - che appare - scegliere "play".'''''</font> | + | <FONT Color=gray>' '''''Se non si desidera l'esecuzione automatica del file Midi, bisognerà togliere l'attributo "''autoplay'' " e una volta mostrato nell'Oggetto "WebView" il dispositivo di riproduzione audio, vi si dovrà cliccare sopra con il tasto destro del mouse e nel menu - che appare - scegliere "play".'''''</font> |
| − | .HTML = " | + | .HTML = "<AUDIO autoplay controls>" & |
| − | "<Source src=<FONT Color=#B22222>''<B>file://</b></font><FONT Color=gray>/percorso/del/file | + | "<Source src=<FONT Color=#B22222>''<B>file://</b></font><FONT Color=gray>/percorso/del/file/midi''</font> type=audio/<font color="#B22222">midi</font>>" & |
| − | " | + | "</audio>" |
End With | End With | ||
| − | + | End | |
| Riga 29: | Riga 31: | ||
Per ascoltare via internet un file Midi presente in una pagina WEB, bisognerà tenere conto se si sta usando la libreria grafica QT5 oppure GTK3. | Per ascoltare via internet un file Midi presente in una pagina WEB, bisognerà tenere conto se si sta usando la libreria grafica QT5 oppure GTK3. | ||
| − | + | ==Usando il Componente grafico "gb.gui.qt" o quello "gb.qt5"== | |
| − | Se si sta usando il Componente grafico "gb.qt5", si | + | Se si sta usando il Componente grafico "gb.gui.qt", si dovrà attivare anche il Componente "gb.gui.qt.webkit". |
| + | <BR>Se si sta usando il Componente grafico "gb.qt5", si dovrà attivare anche il Componente "gb.qt5.webkit" oppure il Componente "gb.qt5.webview". | ||
| + | |||
| + | ===Usando il Componente "gb.gui.qt.webkit" o quello "gb.qt5.webkit"=== | ||
| + | Scegliendo di utilizzare il Componente "gb.gui.qt.webkit" o quello "gb.qt5.webkit", la riga comprendente il protocollo html, impostato con il TAG <AUDIO>, dovrà essere direttamente assegnata alla Proprietà ".HTML" dell'Oggetto ''WebView''. | ||
| + | |||
| + | Mostriamo un esempio pratico, riprendendo il codice del precedente paragrafo. | ||
| + | <BR>Proviamo la Proprietà ".HTML" con il seguente file Midi presente in una pagina web: | ||
| + | ...... | ||
| + | .HTML = "<AUDIO autoplay controls>" & | ||
| + | "<Source src=<font color=darkgreen>https://www.hamienet.com/40449_Cant-Stop-The-Feeling.mid</font> type=audio/midi></audio>" | ||
| + | ...... | ||
| + | |||
| + | ===Usando il Componente "gb.qt5.webview"=== | ||
| + | Se invece si intende utilizzare il Componente "gb.qt5.webview", la riga di comando scritta in html sarà passata al Metodo ".SetHtml()" dell'oggetto ''WebView''. | ||
Mostriamo un esempio: | Mostriamo un esempio: | ||
| − | '''Public''' Sub Button1_Click() | + | Public Sub Button1_Click() |
| + | |||
| + | Dim wv As WebView | ||
| + | |||
| + | With wv = New WebView(Me) | ||
| + | .X = 50 | ||
| + | .Y = 100 | ||
| + | .W = 340 | ||
| + | .H = 170 | ||
| + | <FONT Color=gray>' ''L'attributo "src" contiene un URL-indirizzo assoluto o relativo del media file:''</font> | ||
| + | .SetHtml("<AUDIO autoplay controls>" & | ||
| + | "<Source src=<FONT Color=gray>''http://indirizzo/web/del/collegamento/web/del/file/midi''</font> type=audio/<font color="#B22222">midi</font>>" & | ||
| + | "</audio>") | ||
| + | End With | ||
| + | |||
| + | End | ||
| + | oppure il TAG html "IFRAME": | ||
| + | Public Sub Button1_Click() | ||
| + | |||
| + | Dim wv As WebView | ||
| + | |||
| + | With wv = New WebView(Me) | ||
| + | .X = 50 | ||
| + | .Y = 100 | ||
| + | .W = 340 | ||
| + | .H = 170 | ||
| + | .SetHtml("<IFRAME src=<FONT Color=gray>''http://indirizzo/del/collegamento/web/del/file/midi''</font> type=audio/<font color="#B22222">midi</font> width=480 height=320><nowiki></iframe></nowiki>") | ||
| + | End With | ||
| + | |||
| + | End | ||
| + | oppure il TAG html "A Href": | ||
| + | Public Sub Button1_Click() | ||
Dim wv As WebView | Dim wv As WebView | ||
| Riga 42: | Riga 89: | ||
.W = 340 | .W = 340 | ||
.H = 170 | .H = 170 | ||
| − | + | .SetHtml("<A Href=<FONT Color=gray>''http://indirizzo/del/collegamento/web/del/file/midi''</font>>Cliccare qui</a>") | |
| − | . | ||
| − | |||
| − | |||
End With | End With | ||
| − | + | End | |
| − | + | ==Usando il Componente grafico "gb.gtk3"== | |
Se si sta usando il Componente grafico "gb.gtk3", si dovrà ovviamente attivare anche il Componente "gb.gtk3.webview", e si utilizzerà il Metodo ".SetHtml()". | Se si sta usando il Componente grafico "gb.gtk3", si dovrà ovviamente attivare anche il Componente "gb.gtk3.webview", e si utilizzerà il Metodo ".SetHtml()". | ||
In tal caso si potrà adoperare il TAG html "AUDIO Controls": | In tal caso si potrà adoperare il TAG html "AUDIO Controls": | ||
| − | + | Public Sub Button1_Click() | |
Dim wv As WebView | Dim wv As WebView | ||
| Riga 63: | Riga 107: | ||
.W = 340 | .W = 340 | ||
.H = 170 | .H = 170 | ||
| − | .SetHtml(" | + | .SetHtml("<AUDIO Controls src=<FONT Color=gray>''http://indirizzo/del/collegamento/web/del/file/midi''</font> type=audio/<font color="#B22222">midi</font> width=480 height=320>" & |
| − | " | + | "</audio>") |
End With | End With | ||
| − | + | End | |
oppure il TAG html "IFRAME": | oppure il TAG html "IFRAME": | ||
| − | + | Public Sub Button1_Click() | |
Dim wv As WebView | Dim wv As WebView | ||
| Riga 78: | Riga 122: | ||
.W = 340 | .W = 340 | ||
.H = 170 | .H = 170 | ||
| − | .SetHtml("<IFRAME src=<FONT Color=gray>''http://indirizzo/del/collegamento/web/del/file | + | .SetHtml("<IFRAME src=<FONT Color=gray>''http://indirizzo/del/collegamento/web/del/file/midi''</font> type=audio/<font color="#B22222">midi</font> width=480 height=320><nowiki></iframe></nowiki>") |
| − | |||
End With | End With | ||
| − | + | End | |
oppure il TAG html "A Href": | oppure il TAG html "A Href": | ||
| − | + | Public Sub Button1_Click() | |
Dim wv As WebView | Dim wv As WebView | ||
| Riga 93: | Riga 136: | ||
.W = 340 | .W = 340 | ||
.H = 170 | .H = 170 | ||
| − | .SetHtml("<A Href=<FONT Color=gray>''http://indirizzo/del/collegamento/web/del/file | + | .SetHtml("<A Href=<FONT Color=gray>''http://indirizzo/del/collegamento/web/del/file/midi''</font>>Cliccare qui</a>") |
End With | End With | ||
| − | + | End | |
Versione attuale delle 08:38, 28 ott 2023
Un file MIDI potrà essere eseguito con il protocollo HTML all'interno dell'Oggetto WebView.
Indice
Esecuzione di un file Midi da un dispositivo di archiviazione mediante il codice HTML 5 e l'oggetto WebView
Per eseguire un file Midi presente in un dispositivo di archiviazione, si utilizzerà la risorsa grafica QT, attivando i Componenti "gb.qt5" e "gb.qt5.webkit", oppure attivando i Componenti "gb.gui.qt" e "gb.gui.qt.webkit".
In questo caso la riga di comando scritta in html sarà assegnata direttamente alla proprietà .HTML dell'oggetto WebView.
Poiché l'attributo "src" del protocollo HTML contiene un URL-indirizzo assoluto o relativo del media file, il percorso del file Midi sarà anticipato da "file://".
Mostriamo un esempio:
Private wv As WebView
Public Sub Button1_Click()
If Object.IsValid(wv) Then wv.Delete
With wv = New WebView(Me)
.X = 50
.Y = 100
.W = 340
.H = 170
' L'attributo "src" contiene un URL-indirizzo assoluto o relativo del file Midi e non deve avere spazi.
' Se non si desidera l'esecuzione automatica del file Midi, bisognerà togliere l'attributo "autoplay " e una volta mostrato nell'Oggetto "WebView" il dispositivo di riproduzione audio, vi si dovrà cliccare sopra con il tasto destro del mouse e nel menu - che appare - scegliere "play".
.HTML = "<AUDIO autoplay controls>" &
"<Source src=file:///percorso/del/file/midi type=audio/midi>" &
"</audio>"
End With
End
Esecuzione di un file Midi da una pagina WEB mediante il codice HTML 5 e l'oggetto WebView
Per ascoltare via internet un file Midi presente in una pagina WEB, bisognerà tenere conto se si sta usando la libreria grafica QT5 oppure GTK3.
Usando il Componente grafico "gb.gui.qt" o quello "gb.qt5"
Se si sta usando il Componente grafico "gb.gui.qt", si dovrà attivare anche il Componente "gb.gui.qt.webkit".
Se si sta usando il Componente grafico "gb.qt5", si dovrà attivare anche il Componente "gb.qt5.webkit" oppure il Componente "gb.qt5.webview".
Usando il Componente "gb.gui.qt.webkit" o quello "gb.qt5.webkit"
Scegliendo di utilizzare il Componente "gb.gui.qt.webkit" o quello "gb.qt5.webkit", la riga comprendente il protocollo html, impostato con il TAG <AUDIO>, dovrà essere direttamente assegnata alla Proprietà ".HTML" dell'Oggetto WebView.
Mostriamo un esempio pratico, riprendendo il codice del precedente paragrafo.
Proviamo la Proprietà ".HTML" con il seguente file Midi presente in una pagina web:
......
.HTML = "<AUDIO autoplay controls>" &
"<Source src=https://www.hamienet.com/40449_Cant-Stop-The-Feeling.mid type=audio/midi></audio>"
......
Usando il Componente "gb.qt5.webview"
Se invece si intende utilizzare il Componente "gb.qt5.webview", la riga di comando scritta in html sarà passata al Metodo ".SetHtml()" dell'oggetto WebView.
Mostriamo un esempio:
Public Sub Button1_Click()
Dim wv As WebView
With wv = New WebView(Me)
.X = 50
.Y = 100
.W = 340
.H = 170
' L'attributo "src" contiene un URL-indirizzo assoluto o relativo del media file:
.SetHtml("<AUDIO autoplay controls>" &
"<Source src=http://indirizzo/web/del/collegamento/web/del/file/midi type=audio/midi>" &
"</audio>")
End With
End
oppure il TAG html "IFRAME":
Public Sub Button1_Click()
Dim wv As WebView
With wv = New WebView(Me)
.X = 50
.Y = 100
.W = 340
.H = 170
.SetHtml("<IFRAME src=http://indirizzo/del/collegamento/web/del/file/midi type=audio/midi width=480 height=320></iframe>")
End With
End
oppure il TAG html "A Href":
Public Sub Button1_Click()
Dim wv As WebView
With wv = New WebView(Me)
.X = 50
.Y = 100
.W = 340
.H = 170
.SetHtml("<A Href=http://indirizzo/del/collegamento/web/del/file/midi>Cliccare qui</a>")
End With
End
Usando il Componente grafico "gb.gtk3"
Se si sta usando il Componente grafico "gb.gtk3", si dovrà ovviamente attivare anche il Componente "gb.gtk3.webview", e si utilizzerà il Metodo ".SetHtml()".
In tal caso si potrà adoperare il TAG html "AUDIO Controls":
Public Sub Button1_Click()
Dim wv As WebView
With wv = New WebView(Me)
.X = 50
.Y = 100
.W = 340
.H = 170
.SetHtml("<AUDIO Controls src=http://indirizzo/del/collegamento/web/del/file/midi type=audio/midi width=480 height=320>" &
"</audio>")
End With
End
oppure il TAG html "IFRAME":
Public Sub Button1_Click()
Dim wv As WebView
With wv = New WebView(Me)
.X = 50
.Y = 100
.W = 340
.H = 170
.SetHtml("<IFRAME src=http://indirizzo/del/collegamento/web/del/file/midi type=audio/midi width=480 height=320></iframe>")
End With
End
oppure il TAG html "A Href":
Public Sub Button1_Click()
Dim wv As WebView
With wv = New WebView(Me)
.X = 50
.Y = 100
.W = 340
.H = 170
.SetHtml("<A Href=http://indirizzo/del/collegamento/web/del/file/midi>Cliccare qui</a>")
End With
End
