Delphi 播放器[源码]

        Delphi 音乐播放器，支持桌面歌词、换肤、换颜色、歌词自动下载，Win7下支持小窗口预览，有些功能未完全完成，就如调整音量（懒得搞，但是可以听了，只写了一次性播放列表没得循环的）。支持酷狗、QQ的动感歌词，以动感方式显示自己的实现方法，工程是使用Delphi XE2开发,原本是用delphi7后因为要支持win7下面的那个小窗口模式的，所以改为delphi xe2了。

主界面：

   自己使用GDI+做了个png图片的控件根据皮肤的xml配置文件动态生成上去的,一部分代码：

type
  TImageState = (isNormal, isActive, isDown, isDisable);

  TGDIImageButton = class(TGraphicControl)
    private
    (*鼠标进入*)
    FOnMouseEnter : TNotifyEvent;
    (*鼠标离开*)
    FOnMouseLeave : TNotifyEvent;
    (*当前状态*)
    FState : TImageState;
    (*状态图标数量*)
    FImgCount: Integer;
    (*自动调整大小*)
    FAutoSize: Boolean;
    (*按钮是否按下状态*)
    FDownState: Boolean;
    (*图片文件名称*)
    FFileName: string;
    (*GDI图片对象*)
    FGDIImage: TGPImage;
    (*标题*)
    FCaption: string;
    (*是否显示标题*)
    FShowCaption: Boolean;
    (*对齐方式*)
    FAlignment : TAl