通过千千静听歌词服务器下载歌词(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


 

posted @ 2009-07-15 04:19  LAHCS  阅读(3797)  评论(11编辑  收藏  举报