如何使自己做的播放器在打开媒体文件后自动播放(50分)

  • 主题发起人 主题发起人 AvidMouse
  • 开始时间 开始时间
A

AvidMouse

Unregistered / Unconfirmed
GUEST, unregistred user!
[:(]小弟近日无聊,做了一个FlashPlayer,和swf文件关联后,打开媒体文件,程序出现了,可就是
文斯不动,还需要自己调用OpenDialog调入文件,才可以播放,请问如何使自己做的播放器在打
开媒体文件后自动播放,就像MediaPlay,SunPlayer那样。(第一次的菜鸟,请大家不吝赐教,谢谢!)
 
在form.onshow中输入:shockwaveflash.movie= 你所要打开的文件名;
shockwaveflash.play;
应该可以,你试试吧!
 
sorry,可能我的表达不清,我是说打开.swf文件,出现我的程序,并且她自动播放,有办法吗??
就像双击.rm,出现RealPlay,而且他开始播放打开的RM文件。
 
添加关联,获取文件参数
 
在TMainForm.FormCreate或TMainForm.FormShow中加上
var
FileName: String;
begin

if ParamCount>0 then

begin

FileName:=ParamStr(1);
end;

end;



ParamCount为参数的个数;
ParamStr(1)为第一个参数的内容,也就是程序路径及名称,把1改为其他数就可以此类推
 
Thank u,孤岛!!!!!50小分,不成敬意。
 

Similar threads

D
回复
0
查看
925
DelphiTeacher的专栏
D
D
回复
0
查看
880
DelphiTeacher的专栏
D
D
回复
0
查看
852
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
后退
顶部