Differenze tra le versioni di "Eseguire un file audio mediante il codice html"
| Riga 8: | Riga 8: | ||
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 24: | Riga 27: | ||
End With | End With | ||
| − | + | End | |
Le estensioni dei file audio possono essere: | Le estensioni dei file audio possono essere: | ||
file WAV => <FONT Color=#B22222><B>wav</b></font> | file WAV => <FONT Color=#B22222><B>wav</b></font> | ||
| Riga 50: | Riga 53: | ||
Mostriamo un esempio: | Mostriamo un esempio: | ||
| − | + | Public Sub Button1_Click() | |
Dim wv As WebView | Dim wv As WebView | ||
| Riga 65: | Riga 68: | ||
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 79: | Riga 82: | ||
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 96: | ||
End With | End With | ||
| − | + | End | |
Le estensioni dei file audio possono essere: | Le estensioni dei file audio possono essere: | ||
file WAV => <FONT Color=#B22222><B>wav</b></font> | file WAV => <FONT Color=#B22222><B>wav</b></font> | ||
| Riga 103: | Riga 106: | ||
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 116: | Riga 119: | ||
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 130: | Riga 133: | ||
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 144: | Riga 147: | ||
End With | End With | ||
| − | + | End | |
Versione delle 05:22, 24 set 2023
Un file audio potrà essere eseguito con il protocollo HTML all'interno dell'Oggetto WebView.
Indice
Esecuzione di un file audio da un dispositivo di archiviazione mediante il codice HTML 5 e l'oggetto WebView
Per ascoltare un file audio presente in un dispositivo di archiviazione, si utilizzerà la libreria grafica QT5, attivando anche 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 audio sarà anticipato da "file://".
E' possibile eseguire con questa modalità i file audio di formato: wav, mp3, ogg aac e wma.
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 audio e non deve avere spazi.
' Se non si desidera l'esecuzione automatica del file audio, 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/audio type=audio/estensione_del_file_audio>" &
"</audio>"
End With
End
Le estensioni dei file audio possono essere:
file WAV => wav file OGG => ogg file MP3 => mpeg
Esecuzione di un file audio da una pagina WEB mediante il codice HTML 5 e l'oggetto WebView
Per ascoltare via internet un file audio presente in una pagina WEB, bisognerà tenere conto se si sta usando la libreria grafica QT5 oppure GTK3.
Usando il Componente grafico "gb.qt5"
Se si sta usando il Componente grafico "gb.qt5", è possibile operare attivando anche il Componente "gb.qt5.webkit" oppure il Componente "gb.qt5.webview".
Usando il Componente "gb.qt5.webkit"
Scegliendo di utilizzare il Componente "gb.qt5.webkit", la riga comprendente il protocollo html, impostato con il TAG <AUDIO>, dovrà essere direttamente assegnata alla Proprietà ".HTML" dell'Oggetto WebView.
......
.HTML = "<AUDIO autoplay controls>" &
"<Source src=http://indirizzo/web/del/collegamento/web/del/file/audio type=audio/estensione_del_file_audio>" &
"</audio>"
......
Usando il Componente grafico "gb.qt5.webview"
Se si intende utilizzare il Componente "gb.qt5.webview", la riga di comando scritta in html sarà passata al Metodo ".SetHtml()" dell'oggetto WebView.
E' possibile eseguire con questa modalità i file audio di formato: wav, mp3, ogg aac e wma.
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/audio type=audio/estensione_del_file_audio>" &
"</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/audio type=audio/estensione_del_file_audio 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/audio>Cliccare qui</a>")
End With
End
Le estensioni dei file audio possono essere:
file WAV => wav file OGG => ogg file MP3 => mpeg
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/audio type=audio/estensione_del_file_audio 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/audio type=audio/estensione_del_file_audio 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/audio>Cliccare qui</a>")
End With
End
