Differenze tra le versioni di "Riproduzione dell'audio di radio WEB con l'oggetto WebView e con il codice HTML"

Da Gambas-it.org - Wikipedia.
 
(37 versioni intermedie di uno stesso utente non sono mostrate)
Riga 1: Riga 1:
−
La riproduzione audio di radio che trasmettono in ''streaming'' su web può essere effettuata mediante l'uso dell'oggetto ''WevView'', attivando il componente ''gb.qt4.webkit''. L'oggetto ''WebView'' potrà essere posto sul ''Form'' dall'IDE di Gambas, oppure potrà essere creato via codice,
+
La riproduzione audio di radio che trasmettono in ''streaming'' su web può essere effettuata mediante l'uso dell'oggetto ''WevView'', sia attivando il Componente ''gb.qt5.webview'', sia attivando il Componente ''gb.gtk3.webview''.
  
−
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à ''Url'' l'indirizzo web del flusso audio della radio web, oppure facendo uso della sua proprietà ''.HTML'' ed il codice HTML5. A tal ultimo riguardo la riproduzione audio del flusso di dati potrà avvenire attraverso l'uso di due Tag del codice html: ''<Audio>'' oppure ''<Embed>''.
+
L'oggetto ''WebView'', adeguatamente dimensionato, potrà essere utilizzato semplicemente assegnando il Tag <Audio> e l'indirizzo web del flusso audio della radio web al suo Metodo ".SetHtml()".
  
−
 
+
L'istruzione Html, più in particolare, potrà essere '''''<AUDIO controls><source src=......>'''''.
−
 
+
  Public Sub Button1_Click()
−
==Uso della proprietà ''.Url''==
+
 
−
La proprietà ''WebView.Url'' può essere utilizzata:
+
   Dim wv As WebView
−
 
+
 
−
* con le radio-web, per l'ascolto delle quali è prevista l'uso di plugin ''Java''. Tali radio-web sono solitamente ascoltabili ''immediatamente'', automaticamente all'apertura della loro pagina web, oppure cliccando su apposito tasto. In tal caso bisognerà attivare i ''plugin'' nella Classe ''Websettings'', ed assegnare alla proprietà ''.Url'' l'indirizzo web della pagina della radio o della finestra che si apre cliccando sul tasto:
+
  With wv = New WebView(Me)
−
  '''Public''' Sub Button1_Click()
+
    .X = 0
−
+
    .Y = 20
−
   Dim wv As New WebView(Me)
+
    .W = 450
−
+
    .H = 150
−
  <FONT color=#B22222>WebSettings[WebSettings.PluginsEnabled] = True</font>
+
    <FONT color=#B22222>.SetHtml</font>("<AUDIO controls><source src=<FONT Color=darkgreen>https://''indirizzo_web_del_'''flusso_audio'''_della_radio_web</font>''></audio>")
 +
  End With
 
    
 
    
−
  wv<FONT color=#B22222>.Url</font> = "http://''indirizzo_della_pagina_web/o_della finestra_della_radio''"
+
End
−
+
Di seguito un paio di esempi pratici della riga con l'indirizzo web:
−
'''End'''
+
.SetHtml("<AUDIO controls><source src=<FONT color=#B22222>''https&#058;//jzr-events-01.ice.infomaniak.ch/jzr-events-01.mp3''</font>></audio>")
  
−
 
+
.SetHtml("<AUDIO controls><source src=<FONT color=#B22222>''https&#058;//rdst.win:59450/stream''</font>></audio>")
−
* negli altri casi sarà sufficiente assegnare alla proprietà ''.Url'' l'indirizzo internet del <SPAN style="text-decoration:underline">flusso audio</span> (''streaming'') della radio web, come segue:
+
L'istruzione potrà anche essere ''<AUDIO controls src=......>'' :
−
  '''Public''' Sub Button1_Click()
+
  Public Sub Button1_Click()
−
 
−
  Dim wv As New WebView(Me)
 
 
    
 
    
−
    wv<FONT color=#B22222>.Url</font> = "http://''indirizzo_internet_del_flusso_audio_della_radio_web''"
 
−
 
−
'''End'''
 
−
 
 
−
 
−
 
−
==Richiamo del Tag ''Audio'' del codice html con ''WebView.HTML''==
 
−
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.
 
−
<BR>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 particoare, potrà essere sia ''<AUDIO controls><source src=...'' :
 
−
'''Public''' Sub Button1_Click()
 
−
 
−
 
 
   Dim wv As WebView
 
   Dim wv As WebView
 
    
 
    
−
    With wv = New WebView(Me)
+
  With wv = New WebView(Me)
−
      .X = 0
+
    .X = 0
−
      .Y = 20
+
    .Y = 20
−
      .W = 450
+
    .W = 450
−
      .H = 150
+
    .H = 150
−
      <FONT color=#B22222>.HTML</font> = "<HTML><HEAD><AUDIO controls><source src=\"http://''indirizzo_web_del_flusso_audio_della_radio_web''\"></audio></head></html>"
+
    <FONT color=#B22222>.SetHtml</font>("<AUDIO controls style=width:100%; src=https&#058;//stream.laut.fm/radiojazz></audio>")
−
+
  End With
−
    End With
+
 
−
+
  End
−
  '''End'''
+
====Specificare anche il formato dei dati audio ricevuti dalla radio web====
−
Un esempio pratico della riga con l'indirizzo web può essere questa per l'ascolto di RADIO Rai Tre:
+
Altresì, se conosciuto, si potrà eventualmente specificare anche il formato dei dati audio ricevuti dalla radio web:
−
  .HTML = "<HTML><HEAD><AUDIO controls><source src=\"<FONT color=#B22222>''rtsp://live.media.rai.it/broadcast/radiotre.rm''</font>\"></audio></head></html>"
+
  .SetHtml("<AUDIO controls><source src=https://''indirizzo_web_del_flusso_audio_della_radio_web <FONT color=#B22222>type=audio/mp3</font>></audio>)
−
 
+
Esempio pratico:
 +
.SetHtml("<AUDIO controls><source src=https&#058;//icestreaming.rai.it/3.mp3 type=audio/mp3></audio>")
  
−
sia ''<AUDIO controls src=...'' :
+
In quest'altro esempio si faranno apparire anche dei tasti sull'Oggetto ''WebView'' per gestire il flusso audio:
−
  '''Public''' Sub Button1_Click()
+
  Public Sub Form_Open()
−
 
 
   
 
   
 
   Dim wv As WebView
 
   Dim wv As WebView
−
 
 
−
    With wv = New WebView(Me)
 
−
      .X = 0
 
−
      .Y = 20
 
−
      .W = 450
 
−
      .H = 150
 
−
      <FONT color=#B22222>.HTML</font> = "<HTML><HEAD><AUDIO controls src=\"http://''indirizzo_web_del_flusso_audio_della_radio_web''\"></audio></head></html>"
 
 
   
 
   
−
    End With
+
  With wv = New WebView(Me)
−
 
+
    .X = 0
−
 
+
    .Y = 20
−
 
+
    .W = Me.W
−
==Richiamo del Tag ''Embed'' del codice html con ''WebView.HTML''==
+
    .H = 150
−
In questo caso non è necessario attribuire una dimensione e coordinate di posizionamento all'oggetto ''WebView'': basterà soltanto l'uso della sua proprietà ''.HTML'' ed il codice html5 con il Tag ''Embed''  per l'esecuzione dei dati audio contenente anche l'indirizzo web del flusso audio della radio web, come segue:
+
    .SetHtml("<audio id='player' src='https&#058;//giosa.radioca.st/stream'></audio>" &
−
'''Public''' Sub Button1_Click()
+
            "<button onclick=document.getElementById('player').play()>Esegui</button>" &
 +
            "<button onclick=document.getElementById('player').pause()>Pausa</button>" &
 +
            "<button onclick=document.getElementById('player').remove()>Stop</button>" &
 +
            "<button onclick=document.getElementById('player').volume+=0.1>Volume +</button>" &
 +
            "<button onclick=document.getElementById('player').volume-=0.1>Volume -</button>")
 +
  End With
 
   
 
   
−
   
+
  End
−
  Dim wv As New WebView(Me)
 
−
 
−
 
−
    wv<FONT color=#B22222>.HTML</font> = "<HTML><HEAD><EMBED src=\"http://''indirizzo_web_del_flusso_audio_della_radio_web''\" autostart=\"true\"></embed></head></html>"
 
−
 
−
'''End'''
 
−
 
 
  
  
Riga 90: Riga 65:
 
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.
 
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.
 
<BR>Questa soluzione si mostra molto utile sovente quando non è possibile riprodurre il flusso di dati a causa di un particolare indirizzo WEB.
 
<BR>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:
 
Il codice nel file ''Html'' di supporto sarà semplicemente il seguente:
−
  &lt;html>
+
  <html>
 
   
 
   
−
  &lt;head>
+
  &lt;body>
−
     &lt;AUDIO controls><source src="<FONT Color=gray>http://''indirizzo_web_dello_streaming</font>''">&lt;/audio>
+
     &lt;AUDIO controls><source src="<FONT Color=darkgreen>http://''indirizzo_web_dello_streaming_radio</font>''">&lt;/audio>
−
  &lt;/head>
+
  &lt;/body>
 
   
 
   
 
  &lt;/html>
 
  &lt;/html>
−
 
+
Il file .html sarà richiamato dal seguente codice Gambas:
−
Il file Html sarà richiamato dal seguente codice Gambas:
+
  Public Sub Button1_Click()
−
  '''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'''
 
−
 
 
−
 
 
−
 
 
−
==Uso del Tag ''<Iframe>''==
 
−
Un'altra modalità è quella di utilizzare l'oggetto ''WebView'' con il Tag ''<IFRAME>'' del protocollo ''HTML''. Il Tag ''<IFRAME>'' è utilizzato per incorporare un altro documento all'interno del corrente documento ''HTML''.
 
−
 
 
−
Mostriamo di seguito un esempio
 
−
'''Public''' Sub Button1_Click()
 
 
    
 
    
 
   Dim wv As WebView
 
   Dim wv As WebView
 
    
 
    
−
  With wv = New WebView(Me)
+
  With wv = New WebView(Me)
−
    .X = 50
+
    .X = 0
−
    .Y = 100
+
    .Y = 20
−
    .W = 340
+
    .W = 450
−
    .H = 170
+
    .H = 150
−
    .HTML = "<iframe src=<FONT Color=gray>http://''indirizzo_web_dello_streaming</font>></iframe>"
+
    .SetHtml(File.Load("<FONT Color=darkgreen>''/percorso/del/file.html''</font>"))
−
  End With
+
  End With
 
   
 
   
−
  '''End'''
+
  End

Versione attuale delle 20:48, 20 gen 2024

La riproduzione audio di radio che trasmettono in streaming su web può essere effettuata mediante l'uso dell'oggetto WevView, sia attivando il Componente gb.qt5.webview, sia attivando il Componente gb.gtk3.webview.

L'oggetto WebView, adeguatamente dimensionato, potrà essere utilizzato semplicemente assegnando il Tag <Audio> e l'indirizzo web del flusso audio della radio web al suo Metodo ".SetHtml()".

L'istruzione Html, più in particolare, potrà essere <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
   .SetHtml("<AUDIO controls><source src=https://indirizzo_web_del_flusso_audio_della_radio_web></audio>")
 End With
 
End

Di seguito un paio di esempi pratici della riga con l'indirizzo web: 

.SetHtml("<AUDIO controls><source src=https://jzr-events-01.ice.infomaniak.ch/jzr-events-01.mp3></audio>")

.SetHtml("<AUDIO controls><source src=https://rdst.win:59450/stream></audio>")

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
   .SetHtml("<AUDIO controls style=width:100%; src=https://stream.laut.fm/radiojazz></audio>")
 End With
 
End

Specificare anche il formato dei dati audio ricevuti dalla radio web

Altresì, se conosciuto, si potrà eventualmente specificare anche il formato dei dati audio ricevuti dalla radio web: 

.SetHtml("<AUDIO controls><source src=https://indirizzo_web_del_flusso_audio_della_radio_web type=audio/mp3></audio>)

Esempio pratico: 

.SetHtml("<AUDIO controls><source src=https://icestreaming.rai.it/3.mp3 type=audio/mp3></audio>")

In quest'altro esempio si faranno apparire anche dei tasti sull'Oggetto WebView per gestire il flusso audio: 

Public Sub Form_Open()

 Dim wv As WebView

 With wv = New WebView(Me)
   .X = 0
   .Y = 20
   .W = Me.W
   .H = 150
   .SetHtml("<audio id='player' src='https://giosa.radioca.st/stream'></audio>" &
            "<button onclick=document.getElementById('player').play()>Esegui</button>" &
            "<button onclick=document.getElementById('player').pause()>Pausa</button>" &
            "<button onclick=document.getElementById('player').remove()>Stop</button>" &
            "<button onclick=document.getElementById('player').volume+=0.1>Volume +</button>" &
            "<button onclick=document.getElementById('player').volume-=0.1>Volume -</button>")
 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>

<body>
   <AUDIO controls><source src="http://indirizzo_web_dello_streaming_radio"></audio>
</body>

</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
   .SetHtml(File.Load("/percorso/del/file.html"))
 End With

End
Estratto da "https://www.gambas-it.org/wiki/index.php?title=Riproduzione_dell%27audio_di_radio_WEB_con_l%27oggetto_WebView_e_con_il_codice_HTML&oldid=36402"