Это уже не delphi 
 Code
 
 <script type="text/javascript">   
   var so = new SWFObject("http://dwrp.tk/radio/energy2.swf", "pl1", "180", "70", "8"); 
   so.addParam("menu", "false"); 
   so.addParam("wmode", "transparent"); 
   so.addParam("allowScriptAccess", "sameDomain"); 
   so.addParam("FlashVars", "filename=http://dwrp.tk/radio"); 
 so.write("energy2"); 
 </script> 
 
  
 На флэшэ плеерок написан 
 energy2.swf