音乐直链获取支持多线程下载

歌曲地址 ＝ 超级列表框1.取标题 (超级列表框1.现行选中项, 4)
.如果真 (歌曲地址 ＝ “”)
信息框 (“您还没有选中歌曲或还没有获取歌曲列表”, #信息图标, “温馨提示”, )
返回 ()
.如果真结束
.如果 (按钮2.标题 ＝ “歌曲试听”)
按钮2.标题 ＝ “停止试听”
写到文件 (取运行目录 () ＋ “\temp.mp3”, 网页_访问 (超级列表框1.取标题 (超级列表框1.现行选中项, 4)))
播放MP3 (1, 取运行目录 () ＋ “\temp.mp3”)
.否则
按钮2.标题 ＝ “歌曲试听”
停止播放 ()表。