搜索
查看: 684|回复: 1

[音频视频] 一个托盘听FM的小例子

[复制链接]

10

主题

88

帖子

505

积分

三级会员

Rank: 4

积分
505
发表于 2018-9-14 10:52:41 | 显示全部楼层 |阅读模式
例子里的频道比较少,需要的自己添加上就可以了

1.png

  1. import win.ui;
  2. import win.ui.menu;
  3. import com.flash;
  4. import win.util.tray;
  5. /*DSG{{*/
  6. var winform = win.form(text="FM";left=0;top=0;right=62;bottom=19;border="none";exmode="none";mode="popup";parent=...;topmost=1)
  7. winform.add(
  8. flashBox={cls="custom";left=0;top=0;right=420;bottom=45;edge=1;hide=1;z=1}
  9. )
  10. /*}}*/

  11. winform.show(false); //隐藏窗口

  12. var flash = com.flash( winform.flashBox );
  13. flash.movie = "http://www.cnr.cn/images2015/livePlayer_black_2014.swf?liveDataURL=http://www.cnr.cn/player2013/liveData1014.xml&defaultID=10&isAutoPlay=true"
  14. flash.play()
  15.                
  16. var tray = win.util.tray(winform)
  17. tray.message = 0xACCF/*_WM_TRAYMESSAGE*/
  18. tray.tip = "FM" //设置鼠标提示

  19. winform.wndproc = {
  20.         [0xACCF/*_WM_TRAYMESSAGE*/ ] = function(hwnd,message,wParam,lParam){
  21.                 if( lParam = 0x205/*_WM_RBUTTONUP*/ ){
  22.                     var pt = ::POINT();
  23.                         ::User32.GetCursorPos(pt);
  24.                    
  25.                     //弹出托盘菜单以前,一定要前置主窗口中,不然不点击菜单不会消失
  26.                     win.setForeground(winform.hwnd)
  27.                     winform.popmenu.popup(pt.x,pt.y,true )
  28.             }       
  29.         }
  30. }

  31. winform.popmenu = win.ui.popmenu(winform);//创建弹出菜单
  32. winform.popmenu.add(
  33.     text = '文艺之声—CNR';
  34.         bitmapCheckd = "\res\1.bmp";
  35.         proc = function(id){
  36.                 flash.movie = "http://www.cnr.cn/images2015/livePlayer_black_2014.swf?liveDataURL=http://www.cnr.cn/player2013/liveData1014.xml&defaultID=10&isAutoPlay=true"
  37.                 flash.play()
  38.                 for(i=1;winform.popmenu.count();1){
  39.                                 winform.popmenu.check(i,false)//关闭除所有checked图标       
  40.                         }
  41.                 winform.popmenu.check(id-4999);//默认id从5000开始,winform.popmenu.check参数从1开始,所以5000-1
  42. });
  43. winform.popmenu.add(
  44.     text = '文艺之声—蜻蜓';
  45.         bitmapCheckd = "\res\1.bmp";
  46.         proc = function(id){
  47.                 flash.movie = "http://g.alicdn.com/de/prismplayer-flash/1.2.16/PrismPlayer.swf?vurl=http://lhttp.qingting.fm/live/395/64k.mp3&autoPlay=true&showBarTime=99999999"
  48.                 flash.play()       
  49.                 for(i=1;winform.popmenu.count();1){
  50.                                 winform.popmenu.check(i,false)//关闭除所有checked图标
  51.                         }
  52.                 winform.popmenu.check(id-4999);//默认id从5000开始,winform.popmenu.check参数从1开始,所以5000-1
  53. });
  54. winform.popmenu.add();//分隔线
  55. winform.popmenu.add(
  56.         text = '相声小品—CNR';
  57.         bitmapCheckd = "\res\1.bmp";
  58.         proc = function(id){
  59.                 flash.movie = "http://www.cnr.cn/images2015/livePlayer_black_2014.swf?liveDataURL=http://www.cnr.cn/player2013/liveData1014.xml&defaultID=19&isAutoPlay=true"
  60.                 flash.play()
  61.                 for(i=1;winform.popmenu.count();1){
  62.                                 winform.popmenu.check(i,false)//关闭除所有checked图标       
  63.                         }
  64.                 winform.popmenu.check(id-4998);        //默认id从5000开始,但因分隔线也算一个id,所以需要根据实际情况-2
  65. });
  66. winform.popmenu.add(
  67.         text = '相声小品—蜻蜓';
  68.         bitmapCheckd = "\res\1.bmp";
  69.         proc = function(id){
  70.                 flash.movie = "http://g.alicdn.com/de/prismplayer-flash/1.2.16/PrismPlayer.swf?vurl=http://lhttp.qingting.fm/live/4990/64k.mp3&autoPlay=true&showBarTime=99999999"
  71.                 flash.play()
  72.                 for(i=1;winform.popmenu.count();1){
  73.                                 winform.popmenu.check(i,false)//关闭除所有checked图标       
  74.                         }
  75.                 winform.popmenu.check(id-4998);        //默认id从5000开始,但因分隔线也算一个id,所以需要根据实际情况-2
  76. });
  77. winform.popmenu.add();//分隔线
  78. winform.popmenu.add(
  79.         text = '静音';
  80.         bitmapCheckd = "\res\1.bmp";
  81.         proc = function(id){
  82.                 flash.movie = "http://g.alicdn.com/de/prismplayer-flash/1.2.16/PrismPlayer.swf"
  83.                 flash.play()
  84.                 for(i=1;winform.popmenu.count();1){
  85.                                 winform.popmenu.check(i,false)//关闭除所有checked图标       
  86.                         }
  87.                 winform.popmenu.check(id-4997);        //默认id从5000开始,前面两组分割线,所以-3
  88. });
  89. winform.popmenu.add();//分隔线
  90. winform.popmenu.add('&Exit',function(id){  tray.delete();winform.close(); })       

  91. return win.loopMessage();
复制代码
~什么都会点,什么都不会~
回复

使用道具 举报

10

主题

88

帖子

505

积分

三级会员

Rank: 4

积分
505
 楼主| 发表于 2018-9-18 09:37:56 | 显示全部楼层
做了些改动
1.png
  1. import win.ui;
  2. import win.ui.menu;
  3. import com.flash;
  4. import win.util.tray;
  5. /*DSG{{*/
  6. var winform = win.form(text="FM";left=0;top=0;right=62;bottom=19;border="none";exmode="none";mode="popup";parent=...;topmost=1)
  7. winform.add(
  8. flashBox={cls="custom";left=0;top=0;right=420;bottom=45;edge=1;hide=1;z=1}
  9. )
  10. /*}}*/

  11. winform.show(false); //隐藏窗口

  12. var flash = com.flash( winform.flashBox );
  13.                
  14. var tray = win.util.tray(winform)
  15. tray.message = 0xACCF/*_WM_TRAYMESSAGE*/
  16. tray.tip = "FM" //设置鼠标提示

  17. winform.wndproc = {
  18.         [0xACCF/*_WM_TRAYMESSAGE*/ ] = function(hwnd,message,wParam,lParam){
  19.                 if( lParam = 0x205/*_WM_RBUTTONUP*/ ){
  20.                     var pt = ::POINT();
  21.                         ::User32.GetCursorPos(pt);
  22.                    
  23.                     //弹出托盘菜单以前,一定要前置主窗口中,不然不点击菜单不会消失
  24.                     win.setForeground(winform.hwnd)
  25.                     winform.popmenu.popup(pt.x,pt.y,true )
  26.             }       
  27.         }
  28. }


  29. winform.popmenu = win.ui.popmenu(winform);//创建弹出菜单

  30. var nocheck = function(){
  31.     for(i=1;winform.popmenu.count();1){
  32.                 if(winform.popmenu.checked(i)){
  33.                         winform.popmenu.check(i,false)       
  34.                 }
  35.         }
  36. }
  37. winform.popmenu.add(
  38.     text = '文艺之声—CNR';
  39.         bitmapCheckd = "\res\1.bmp";
  40.         proc = function(id){
  41.                 flash.movie = "http://www.cnr.cn/images2015/livePlayer_black_2014.swf?liveDataURL=http://www.cnr.cn/player2013/liveData1014.xml&defaultID=10&isAutoPlay=true"
  42.                 flash.play()
  43.                 nocheck()
  44.                 winform.popmenu.check(id-4999);
  45. });
  46. winform.popmenu.add(
  47.     text = '文艺之声—蜻蜓';
  48.         bitmapCheckd = "\res\1.bmp";
  49.         proc = function(id){
  50.                 flash.movie = "http://g.alicdn.com/de/prismplayer-flash/1.2.16/PrismPlayer.swf?vurl=http://lhttp.qingting.fm/live/395/64k.mp3&autoPlay=true&showBarTime=99999999"
  51.                 flash.play()       
  52.                 nocheck()
  53.                 winform.popmenu.check(id-4999);
  54. });
  55. winform.popmenu.add();//分隔线
  56. winform.popmenu.add(
  57.         text = '相声小品—CNR';
  58.         bitmapCheckd = "\res\1.bmp";
  59.         proc = function(id){
  60.                 flash.movie = "http://www.cnr.cn/images2015/livePlayer_black_2014.swf?liveDataURL=http://www.cnr.cn/player2013/liveData1014.xml&defaultID=19&isAutoPlay=true"
  61.                 flash.play()
  62.                 nocheck()
  63.                 winform.popmenu.check(id-4998);       
  64. });
  65. winform.popmenu.add(
  66.         text = '相声小品—蜻蜓';
  67.         bitmapCheckd = "\res\1.bmp";
  68.         proc = function(id){
  69.                 flash.movie = "http://g.alicdn.com/de/prismplayer-flash/1.2.16/PrismPlayer.swf?vurl=http://lhttp.qingting.fm/live/4990/64k.mp3&autoPlay=true&showBarTime=99999999"
  70.                 flash.play()
  71.                 nocheck()
  72.                 winform.popmenu.check(id-4998);       
  73. });
  74. winform.popmenu.add();//分隔线
  75. winform.popmenu.add(
  76.         text = '静音';
  77.         bitmapCheckd = "\res\1.bmp";
  78.         proc = function(id){
  79.                 flash.movie = "http://g.alicdn.com/de/prismplayer-flash/1.2.16/PrismPlayer.swf"
  80.                 flash.play()
  81.                 nocheck()
  82.                 winform.popmenu.check(id-4997);       
  83. });
  84. winform.popmenu.add();//分隔线
  85. winform.popmenu.add('&Exit',function(id){  tray.delete();winform.close(); })       

  86. winform.popmenu.click(1)

  87. return win.loopMessage();
复制代码
~什么都会点,什么都不会~
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册会员

本版积分规则

手机版|未经许可严禁引用或转载本站文章|站长邮箱|aardio.com|aardio官方社区 ( 皖ICP备09012014号 )

GMT+8, 2018-10-22 04:35 , Processed in 0.078125 second(s), 26 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表