最近编程遇到了个小麻烦,就是用Mediaplayer播放mp3文件时,明显感到有延时,不知道怎么回事?下面是当Button1点击后应该播放test.MP3,但程序经过了几秒延时后才开始播放。请高手指点啊!
procedure TForm1.Button1Click(Sender: TObject);
begin
with Mediaplayer1 do
begin
filename:='C:\test.mp3';
open;
play;
end;
end;
用其他播放器立即能开始出声音,但用delphi会有非常明显的延时,4到5秒左右的延时。 看看我的源代码有没有错误。
delphi中MediaPlayer控件怎么用
if (MediaPlayer1.Mode=mpplaying) then \/\/如果正在播放就停止begin MediaPlayer1.Stop;end; Mediaplayer1.FileName :=ExtractFilePath(Application.ExeName)+'1.mp3'; 设置MediaPlayer文件名,使用ExtractFilePath(Application.ExeName)来返回当前目录加文件名 MediaPlayer1.Open ; 打开文件 MediaPlayer1.Play ;...
delphi MediaPlayer循环播放MP3所有音乐文件问题?
MediaPlayer用得不多, 只知道这种办法, . 假如你已有一个ListBox1并已经装载好全部MP3的完整路径信息了, 可以加一个TIMER1, 在 TIMER1的事件里写代码跟踪播放器的模式, 一停止即播放下一首歌.procedure TForm1.Timer1Timer(Sender: TObject);begin if MediaPlayer1.Mode=mpStopped then begin ...
关于Delphi中MediaPlayer的问题
之后重新安装控件就可以支持自定义类型啦
delphi中mediaplayer的用法
delphi中mediaplayer里编程加歌用mediaplayer1.DeviceType:=dtAutoSelect;mediaplayer1.FileName:='.wav';\/\/路径是对的老是说:无法通过给定的扩展名确定设备类型我是个绝对的新手菜鸟... delphi中mediaplayer里编程加歌用mediaplayer1.DeviceType:=dtAutoSelect;mediaplayer1.FileName:='.wav';\/\/路径是对的老是...
DELPHI 编程如何播放音乐
使用 delphi 自带的 MediaPlayer 控件,可以播放常见的 wav \/ mp3 等格式的音乐文件,使用步骤如下:1.在窗体里添加MediaPlayer1控件。2. 以下代码为播放:MediaPlayer1.FileName:='<需要播放的MP3文件>';MediaPlayer1.Open;以下是该控件的一些相关方法:(1)AutoButtonSet方法 该方法能够指定媒体播放...
delphi里Mediaplayer1播放过程中有时会出现如下图所示故障是什么原因...
MEDIAPLAYER 需要调用系统设备进行播放,但有时系统设备会被其它程序独占,虽然在系统中有该设备的名称,但因为被占用,所以会出现别名。。。
Delphi中MediaPlayer控件的使用
给你个播放当前目录下音乐文件的例子 if (MediaPlayer1.Mode=mpplaying) then \/\/如果正在播放就停止 begin MediaPlayer1.Stop;end;Mediaplayer1.FileName :=ExtractFilePath(Application.ExeName)+'1.mp3';设置MediaPlayer文件名,使用ExtractFilePath(Application.ExeName)来返回当前目录加文件名 Media...
delphi,mediaplayer制作媒体播放器。
procedure TForm1.Button1Click(Sender: TObject);begin if OpenDialog1.Execute then begin MediaPlayer1.FileName := OpenDialog1.FileName;MediaPlayer1.Open;MediaPlayer1.Play;end;先试试上面代码是否可以播放,如果不可以应当是你的播放文件的问题,选择用.mp3格式的试试。
怎么用Delphi制作媒体播放器?
放器有两个步骤:制作播放界面 进入Delphi集成环境后程序将自动生成名为Form1的的屏幕界面,我们只需改变其大小、边框属性和加入一些控制组件即可满足要求。首先,在Component Palette(组件取用区)的System分页中选取MediaPlayer组件,它将作 为播放器的播放键;在Standard分页中选取四个Button组件(分别为But-to...
如何在Delphi里使用TMediaPlayer控件获取一个MP3文件的准确长度_百度知 ...
Mp3size:=MediaPlayer1.Length div 1000; minutesMax:=Trunc(Mp3size\/60); \/\/分 SecondMax:= Mp3size mod 60; \/\/秒 length 获取的是毫秒。