Riproduzione dell'audio di radio WEB con l'oggetto WebView e con il codice HTML

Da Gambas-it.org - Wikipedia.

La riproduzione audio di radio che trasmettono in streaming su web può essere effettuata mediante l'uso dell'oggetto WevView, attivando il componente gb.qt5.webkit. L'oggetto WebView potrà essere posto sul Form dall'IDE di Gambas, oppure potrà essere creato via codice,

Relativamente all'uso dell'oggetto WebView per la riproduzione audio dei dati ricevuti via streaming dal web, esso potrà essere utilizzato semplicemente assegnando alla sua proprietà .HTML l'indirizzo web del flusso audio della radio web e usando il codice HTML5con il Tag: <Audio>.
Si attribuirà all'oggetto WebView un adeguata dimensione; quindi si passerà alla sua proprietà .HTML il necessario codice html5 con il Tag "Audio" per l'esecuzione dei dati audio contenente anche l'indirizzo web del flusso audio della radio web.
Attualmente sembrano riproducibili soltanto i flussi di dati provenienti dalle radio-WEB aventi al termine del proprio indirizzo la parola "mp3" e "rm" .

L'istruzione Html, più in particolare, potrà essere sia <AUDIO controls><source src=... :

Public Sub Button1_Click()
 
 Dim wv As WebView
 
 With wv = New WebView(Me)
   .X = 0
   .Y = 20
   .W = 450
   .H = 150
   .HTML = "<HTML><HEAD><AUDIO controls><source src=\"http://indirizzo_web_del_flusso_audio_della_radio_web\"></audio></head></html>"
 
 End With
 
End

Un esempio pratico della riga con l'indirizzo web può essere questo:

.HTML = "<HTML><HEAD><AUDIO controls><source src=\"https://jzr-events-01.ice.infomaniak.ch/jzr-events-01.mp3\"></audio></head></html>"

L'istruzione potrà anche essere <AUDIO controls src=... :

Public Sub Button1_Click()
 
 Dim wv As WebView
 
 With wv = New WebView(Me)
   .X = 0
   .Y = 20
   .W = 450
   .H = 150
   .HTML = "<HTML><HEAD><AUDIO controls src=\"http://indirizzo_web_del_flusso_audio_della_radio_web\"></audio></head></html>"
 End With
 
End


Uso di un file html di supporto

E' possibile utilizzare, congiuntamente con l'oggetto WebView, anche un file Html, richiamato dal codice Gambas, e contenente il codice necessario per la riproduzione dei dati provenienti da una radio-web contattata.
Questa soluzione si mostra molto utile sovente quando non è possibile riprodurre il flusso di dati a causa di un particolare indirizzo WEB.

Il codice nel file Html di supporto sarà semplicemente il seguente:

<html>

<head>
   <AUDIO controls><source src="http://indirizzo_web_dello_streaming"></audio>
</head>

</html>

Il file .html sarà richiamato dal seguente codice Gambas:

Public Sub Button1_Click()
 
 Dim wv As WebView
 
 With wv = New WebView(Me)
   .X = 0
   .Y = 20
   .W = 450
   .H = 150
   .Url = "file.html"
 End With

End