[Gambas-user] Online radio with "Shell"

Mon Dec 2 10:17:01 CET 2013

...and without Shell......  ;-)

***************************
Private wv As WebView


Public Sub Form_Open()
  
  With wv = New WebView(Me)
    .X = 10
    .Y = 10
    .W = 430
    .H = 100
  End With

End


Public Sub Button1_Click()

   wv.HTML = "<html><head><audio controls><source src=\"http://music.myradio.ua/trance_news128.mp3\"></audio></head></html>"

End


--------------------------------------------
Lun 2/12/13, Jussi Lahtinen <jussi.lahtinen at ...626...> ha scritto:

 Oggetto: Re: [Gambas-user] Online radio with "Shell"
 A: "mailing list for gambas users" <gambas-user at lists.sourceforge.net>
 Data: Lunedì 2 dicembre 2013, 00:46
 
 Private $hMPlayer As Process
 
 Public Sub _new()
   $hMPlayer = Shell "mplayer -slave -cache 128
 http://music.myradio.ua/trance_news128.mp3>" For
 Input Output As "MPlayer"
 End
 
 Public Sub btnStopPlayback_Click()
   Print #$hMPlayer, "stop"
 End
 
 Public Sub Button1_Click()
   _new()
 End
 
 
 -->
 
 
 Private $hMPlayer As Process
 
 Public Sub _new()
   $hMPlayer = Shell "mplayer -slave -cache 128
 http://music.myradio.ua/trance_news128.mp3" For Input
 Output As "MPlayer"
 End
 
 Public Sub btnStopPlayback_Click()
   Print #$hMPlayer, "stop"
 End
 
 
 Jussi
 
 
 On Mon, Dec 2, 2013 at 1:29 AM, abbat81 <abbat.81 at ...787...>
 wrote:
 
 > Tobi,
 >
 > here is the my code:
 >
 > Private $hMPlayer As Process
 >
 > Public Sub _new()
 >   $hMPlayer = Shell "mplayer -slave
 -cache 128
 > http://music.myradio.ua/trance_news128.mp3>" For
 Input Output As "MPlayer"
 > End
 >
 > Public Sub btnStopPlayback_Click()
 >   Print #$hMPlayer, "stop"
 > End
 >
 > Public Sub Button1_Click()
 >   _new()
 > End
 >
 >
 > And it does not work. Nothing happens.
 > Yes, I use a form.
 > I use a same project where works well next way:
 > Exec ["mplayer", "-cache", "128",
 > "http://music.myradio.ua/trance_news128.mp3"] Wait
 >
 > Maybe I need to add some more component to my project?
 > What's wrong?
 >
 > Thanks,
 > Peter
 >
 >
 >
 >
 >
 > --
 > View this message in context:
 > http://gambas.8142.n7.nabble.com/Online-radio-with-Shell-tp44487p44495.html
 > Sent from the gambas-user mailing list archive at
 Nabble.com.
 >
 >
 >
 ------------------------------------------------------------------------------
 > Rapidly troubleshoot problems before they affect your
 business. Most IT
 > organizations don't have a clear picture of how
 application performance
 > affects their revenue. With AppDynamics, you get 100%
 visibility into your
 > Java,.NET, & PHP application. Start your 15-day
 FREE TRIAL of AppDynamics
 > Pro!
 > http://pubads.g.doubleclick.net/gampad/clk?id=84349351&iu=/4140/ostg.clktrk
 > _______________________________________________
 > Gambas-user mailing list
 > Gambas-user at lists.sourceforge.net
 > https://lists.sourceforge.net/lists/listinfo/gambas-user
 >
 ------------------------------------------------------------------------------
 Rapidly troubleshoot problems before they affect your
 business. Most IT 
 organizations don't have a clear picture of how application
 performance 
 affects their revenue. With AppDynamics, you get 100%
 visibility into your 
 Java,.NET, & PHP application. Start your 15-day FREE
 TRIAL of AppDynamics Pro!
 http://pubads.g.doubleclick.net/gampad/clk?id=84349351&iu=/4140/ostg.clktrk
 _______________________________________________
 Gambas-user mailing list
 Gambas-user at lists.sourceforge.net
 https://lists.sourceforge.net/lists/listinfo/gambas-user