为什么不能播放*.dat文件(10分)

  • 主题发起人 主题发起人 tanjinping120
  • 开始时间 开始时间
T

tanjinping120

Unregistered / Unconfirmed
GUEST, unregistred user!
请看mediaplayer1.DeviceType:=dtautoselect;
把dtautoselect改为其他的一些,也不行
 
潭总
你是不是在做播放器啊[blue][/blue]
 
function checksystem:boolean;
var
config:tinifile;
pc:pchar;
ss:string;
begin

result:=true;
getmem(pc,255);
GetWindowsDirectory(pc,255);
config:=tinifile.create(pc+'/Win.ini');
ss:=config.ReadString('mci extensions','dat','');
if ss<>'MPEGVideo' then

begin


config.WriteString('mci extensions','dat','MPEGVideo');

config.WriteString('mci extensions','dat','MPEGVideo2');

result:=false;
end;

freemem(pc,255);
config.Free;
end;

这个函数是使MediaPlayer支持*.dat这类文件的播放,
或直接在在win.ini 中的 [mci extensions] 段加上 dat=MPEGVideo 就可以了
 
多情剑客无情剑 大哥,怎么没用呀
 
潭总啊,千万别叫我大哥啊,受不起啊。
1。你打开你的Win.ini文件看一看。不知道你的系统是98 OR 2000,
肯定会有mp3=MPEGVideo2这一组吧,再这一组加上dat=MPEGVideo,
2。换个DAT文件试试,
3。http://delphibbs.com/delphibbs/dispq.asp?lid=444322
 
多情剑客无情剑 你是哪个?不然我不给你分
 
楼主拿10分来威胁我!!!哈哈。。。。搞笑。。。。。
说实话,我不认识你。。。。。你也不认识我。。。。。
 
哦,我知道了,你是照着xiaojie1在叫了,我还以为你认识我呢。
虽然问题没解决,但看你一篇好意,这10分也给你算了。
 
没解决问题你就结贴??
 
后退
顶部