怎样制作qq空间播放器

1、去QQ空间素材网上找一个免费的播放器。
2、然后将flash地址复制下来。
3、再回到空间，点击装扮空间，添加模板，flash模板，再将其复制的地址粘贴在地址栏就行了。
4、最后点保存就完成了。

用delphi的mediaplayer组件。
在Delphi中提供了功能完善的多媒体支持工具 MediaPlayer组件,为我们提供了多媒体控制界面(MCI———MediaPlayer Control Interface)的驱动程序。这就使在Windows 3x/95中安装完成的MCI驱动程序,都可以通过MediaPlayer组件来进行播放。它能支持播放
音乐CD、wav、mid声音文件;avi、dat、mpg等格式的视频文件及其它多媒体文件,制作此播
放器有两个步骤:
制作播放界面
进入Delphi集成环境后程序将自动生成名为Form1的的屏幕界面,我们只需改变其大小、
边框属性和加入一些控制组件即可满足要求。
首先,在Component Palette(组件取用区)的System分页中选取MediaPlayer组件,它将作
为播放器的播放键;在Standard分页中选取四个Button组件(分别为But-ton1、Button2、Bu
tton3、Button4),它将作为播放器的外部控制台;在Dialog分页中选取OpenDialog组件置于
Form1上(通过它,播放器才能取得被播放的文件),并用鼠标将它们拖到恰当位置(如图1所示
)。
然后在Object Inspector(对象检阅器)中将Form1的Caption属性改为My_MediaPlayer,
将BorderIcons中的biMaximize设成False。将四个组件的Caption属性分别改为‘&File’、
‘C&lose’、‘CD Audio’、‘E&xit’。制成的界面如图2所示;双击Object Inspector中
OpenDialog1的Filter属性右边的小框,在d出的表格中输入多媒体文件类型及过滤器,如图
3所示。至此,播放器播放界面制作完成。
填入事件处理程序
1、文件打开事件处理
双击File按钮,在d出的程序过程中填入下列语句:
procedure TForm1Button1Click(Sender: TObject);
begin
OpenDialog1Execute;
MediaPlayer1DeviceType:=dtAutoSelect;
MediaPlayer1FileName:=OpenDialog1FileName;
if MediaPlayer1FileName <>' '
then MediaPlayer1open;
end;
2、文件关闭事件处理
双击File按钮,在d出的程序过程中填入下列语句:
procedure TForm1Button2Click(Sender: TObject);
begin
MediaPlayer1FileName:='';
MediaPlayer1close;
end;
3、CD Audio播放事件处理
由于在播放音乐CD时,要求MediaPlayer的FileName为空
所以其事件处理程序为:
procedure TForm1Button3Click(Sender: TObject);
begin
MediaPlayer1DeviceType:=dtCDAudio;
MediaPlayer1FileName:='';
MediaPlayer1open;
end;
4、退出事件处理程序
procedure TForm1Button4Click(Sender: TObject);
begin
close;
end;
至此,媒体播放器制作完成。编译生成的可执行文件即是我们的媒体播放器(可按F9直接
执行该程序),在Windows环境下运行,用File按钮调入播放文件,即可用它来欣赏你的多媒体
了。

那是播放器地址用flash做的
给你一个Flash播放器+跳舞模板的你看一下
>