Eseguire un file audio mediante il codice html
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 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 al Metodo "SetHtml()" 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". .SetHtml("<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"
Usando il Componente grafico "gb.qt5", si dovrà attivare anche il Componente "gb.qt5.webkit" oppure 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=https://midifiles.com/sites/default/files/mp3demo/kraftwerk/die-roboter/demo-kraftwerk-die-roboter.mp3 type=audio/mpeg>" & "</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