通过千千静听歌词服务器下载歌词(Delphi版)
在网上只能找到C#或者PHP的代码....哎
闲来无事,做成了Delphi版本的.代码转换晕死了.....
有想要的就拿去吧
下载地址:
通过千千静听歌词服务器下载歌词(Delphi版)
现在还有些小错误没有消除...等完全搞定了之后可能会做出一个pas供大家调用.
修改完成:
将两次获取URL的函数封装成了一个单元QianQianLrc.pas方便以后修改调用...
(第一次:根据歌手和歌曲名得到搜索lrc的URL 第二次:根据搜索到的Lrc的歌词ID和通过一大堆位运算得到的code得到下载Lrc的URL)
同时解决了第一版中搜索到的歌曲名中出现&造成的无法下载到歌词的情况...
同时又发现了Unicode的问题,就是如果搜索到的歌词文件列表中出现韩文字符什么的,就会出现无法下载的情况...
Delphi7不支持Unicode...Tnt Unicode Controls控件又不是太会用...T_T折磨中...
下载地址:更新版本
折磨终于搞定了...装了Delphi2009.支持Unicode...终于算是完成了.
下载地址:D2009版(Unicode)
以上提供的下载均是单个程序而已
源码及Demo下载请移步到 http://www.cnblogs.com/lahcs/archive/2010/01/23/1654666.html