Web stream PasLibVlc

[pcurtis]

How do I play a stream e.g. http://media-ice.musicradio.com/CapitalMP3 with PasLibVlc?

Thanks in advance.

[paweld]

Code: Pascal  [Select][+][-]

1. procedure TForm1.bPlayClick(Sender: TObject);
2. var
3.   murl: WideString;
4. begin
5.   murl:='http://media-ice.musicradio.com/CapitalMP3';
6.   PasLibVlcPlayer1.Play(murl);
7. end;
8.  
9. procedure TForm1.bStopClick(Sender: TObject);
10. begin
11.   PasLibVlcPlayer1.Stop();
12. end;  

[pcurtis]

Thanks. So easy.

While I've got your attention. Is it possible to show Goom or ProjectM?

[paweld]

Code: Pascal  [Select][+][-]

1. procedure TForm1.bPlayClick(Sender: TObject);
2. var
3.   murl: WideString;
4. begin
5.   murl:='http://media-ice.musicradio.com/CapitalMP3';
6.   //Goom
7.   PasLibVlcPlayer1.StartOptions.Add('--audio-visual=goom');
8.   //or projectM
9.   {PasLibVlcPlayer1.StartOptions.Add('--audio-visual=projectm');}
10.   //or others visualizers: dummy, scope, spectrum, spectrometer and vuMeter
11.   {PasLibVlcPlayer1.StartOptions.Add('--audio-visual=visual');
12.   PasLibVlcPlayer1.StartOptions.Add('--effect-list=VISUALIZATION-NAME'); //eg. PasLibVlcPlayer1.StartOptions.Add('--effect-list=dummy');}
13.   PasLibVlcPlayer1.Play(murl);
14. end;

[pcurtis]

Perfect. Thanks.

[pcurtis]

Is there a correct procedure for starting to play / unloading the component?

There is a very long wait before the stream starts playing (with or without Goom). In VLC it is immediate.

*** UPDATE ***

OK. This is only in the IDE (Win 10). Are there setting I can tweak to help solve this problem?