怎么让TMediaPlayer从特定的位置开始播放mp3文件？

最新推荐文章于 2021-05-26 07:11:33 发布
最新推荐文章于 2021-05-26 07:11:33 发布
阅读量844 收藏
点赞数
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/dafan/article/details/4223110
版权

怎么让TMediaPlayer从特定的位置开始播放mp3文件？

 

比如从第20秒开始播放。

 

MediaPlayer.Position:=20000;  
MediaPlayer.Play;

 

MediaPlayer.Position       单位是毫秒

dafan
关注
  • 0
    点赞
  • 踩
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
播放多媒体文件(c++builder)
01-21
它提供了丰富的属性、方法和事件，例如`FileName`属性用来设置要播放的文件路径，`Play`方法用来开始播放，`Stop`方法用来停止播放，`Position`属性可以用来获取或设置播放的位置。 3. **文件格式支持**：...
操作mediaplay播放音乐
01-02
// 开始播放 end; ``` 然而，你提到的“有些mp3格式不对可能引起异常报错”，这通常涉及到编码问题或者文件损坏。在播放之前，建议先检查音乐文件是否能正常播放。如果不能，可能是由于以下原因： 1. **编码不...
Android MediaPlayer指定文件位置播放
qiaoweishu的博客
10-18 1949
工作性质原因对声音数据的操作主要是针对文件或者数据库内部的内容，此种情况可以采用从文件或者数据库中将数据读取出来，保存为文件，再通过指定文件路径的方式进行播放。 如下是自我尝试的方式，抛砖引玉。 打开文件，获取FileDescriptor： [code="java"]RandomAccessFile mRandomFile = new RandomAccessFile(sRandom...
QT 基于QMediaplayer类的视频播放，指定播放位置
RwinR的博客
12-25 5942
  利用QT的Mediaplayer类来做播放器播放视频的时候，可以利用label控件来指定视频播放的位置，以便以我们可以在其他位置设计其他空间，而不受视频播放的影响。代码如下： void video::video(QWidget *parent) : QWidget(parent), ui(new Ui::video) { ui->setupUi(this); ...
TMediaPlayer相关知识
岁月如歌
09-11 917
<br />1、播放前要先open<br />    今天测试TMediaPlayer播放mp3文件时，写了如下代码，报错：<br />    Player.Close;<br />    Player.Notify := True;<br />    Player.FileName := 'alarm.mp3';<br />    Player.Play;<br />    错误为“No MCI device open”，查阅资料后发现需要在Player.Play前加上Player.Open;<br />
Mp3 ID3清除工具 delphi xe2代码
06-23
1. **读取ID3标签**：通过打开MP3文件并定位到ID3标签的位置（通常在文件末尾或开头），读取标签内容。对于ID3v2，可能还需要处理帧头和数据。 2. **解析ID3信息**：解码标签中的数据，包括文本信息、URL链接、图片...
Delphi的MP3管理系统
10-15
我们需设置其FileName属性为要播放的MP3文件路径，然后调用Play方法即可开始播放。此外，还可以通过调整Volume和Speed属性来控制音量和播放速度，实现暂停、停止、快进、倒退等操作。 查找功能是系统的关键之一。这...
精典源码Delphi032：校园网多媒体自动播放系统.rar
08-18
7. **自动化播放**：作为“自动播放”系统，它可能有一个定时或触发机制，按照设定的时间表或条件自动播放特定的多媒体内容，例如在课间休息时自动播放通知或教育视频。 通过这个Delphi源码项目，开发者不仅可以...
自制MP3播放器 (TMediaPlayer/BmpShape)
01-13
一个自制MP3播放器(含原代码)这个程序的关键是BmpShape的应用。unit BmpShape;{2002/08/22 by ultrared根据BMP文件创建窗口注意：1. BMP文件最左上的一个点颜色作为背景色2. BmpShape控件只能用在TForm容器上3. BMP文件可以是256色或者24位色4。大块背景色必须和背景色绝对相等才能获得正常效果}interfaceuses Forms,Windows, Messages, SysUtils, Classes, Controls, ExtCtrls,Graphics;type TBmpShape = class(TImage) private { Private declarations } BackColor:TColor;//背景颜色 FColorDither:boolean;//是否允许背景颜色有一定的抖动 function GetRegion:HRGN;//前景图片的区域 procedure setColorDither(cd:Boolean); protected { Protected declarations } public { Public declarations } constructor Create(AOwner:TComponent);override; procedure Apply;//使用效果 published { Published declarations } property Dither:Boolean read FColorDither write setColorDither; end;procedure Register;implementationprocedure Register;begin RegisterComponents('Samples', [TBmpShape]);end;procedure TBmpShape.setColorDither(cd:Boolean);begin if cd<>FColorDither then FColorDither:=cd;end;constructor TBmpShape.Create(AOwner:TComponent);begin inherited Create(AOwner); BackColor:=RGB(0,0,0); FColorDither:=FALSE;end;//核心子程序，获得BMP图片的前景区域function TBmpShape.GetRegion:HRGN;var i,j:integer; rgn1,rgn2:HRGN; StartY:integer; r,g,b,r1,g1,b1:BYTE; cc:TColor;begin if Picture.Bitmap<>nil then begin BackColor:=Picture.Bitmap.Canvas.Pixels[0,0]; rgn1:=CreateRectRgn(0,0,0,0); for i:=0 to Picture.Bitmap.Width-1 do begin StartY:=-1; for j:=0 to Picture.Bitmap.Height-1 do begin cc:=Picture.Bitmap.Canvas.Pixels[i,j]; if FColorDither then begin //允许和背景有一定的色差 r:=(cc and $FF0000) shr 16; g:=(cc and $FF00) shr 8; b:=cc and $FF; r1:=(BackColor and $FF0000) shr 16; g1:=(BackColor and $FF00) shr 8; b1:=BackColor and $FF; if (abs(r-r1)<10) and (abs(g-g1)<10) and (abs(b-b1)<10) then begin if (StartY>=0) and (j>=StartY) then begin rgn2:=CreateRectRgn(i,StartY,i+1,j); CombineRgn(rgn1,rgn1,rgn2,RGN_OR); StartY:=-1; end; end else begin if Starty<0 then StartY:=j else if j=(Picture.Bitmap.Height-1) then //最下面一个点 begin rgn2:=CreateRectRgn(i,StartY,i+1,j); CombineRgn(rgn1,rgn1,rgn2,RGN_OR); end; end; end else //不允许色差 begin if cc=BackColor then begin if (StartY>=0) and (j>=StartY) then begin rgn2:=CreateRectRgn(i,StartY,i+1,j); CombineRgn(rgn1,rgn1,rgn2,RGN_OR); StartY:=-1; end; end else begin if Starty<0 then StartY:=j else if j=(Picture.Bitmap.Height-1) then //最下面一个点 begin rgn2:=CreateRectRgn(i,StartY,i+1,j); CombineRgn(rgn1,rgn1,rgn2,RGN_OR); end; end; end; end; end; result:=rgn1; end else result:=0;end;procedure TBmpShape.Apply;begin if Parent is TForm then begin Left:=0; Top:=0; Width:=Picture.Bitmap.Width; Height:=Picture.Bitmap.Height; with (Parent as Tform) do begin BorderStyle:=bsNone; Width:=Self.Width; Height:=Self.Height; end; SetWindowRgn(Parent.Handle,GetRegion,FALSE); end;end;end.
Android--MP3播放器MediaPlayer
weixin_34260991的博客
11-21 2433
前言 　　Android提供了常见的音频、视频的编码、解码机制。借助于多媒体类MediaPlayer的支持，开发人员可以很方便在在应用中播放音频、视频。本篇博客主要讲解在Android平台下如何播放一个音频文件。 　　本篇博客主要内容如下： MediaPlayer MediaPlayer的音频源 使用MediaPlayer播放音乐 MediaPlayer使用技巧 Demo--一个...
Android media 测试,android – 如何检测MediaPlayer对象是否开始播放？
weixin_35638129的博客
05-26 706
我正在使用setNextMediaPlayer()方法制作无间隙播放音乐播放器.setNextMediaPlayer()是一个很好的方法来启用无间隙播放,但我有一个问题是刷新下一首歌曲的布局信息.当我使用setNextMediaPlayer()方法时,我不需要使用start()方法来开始播放,因此当回放开始时没有办法捕获.或者,我将信息刷新方法放在onCompletion中,但它有一个限制.pub...
用FireMonkey 编程，不使用TMediaPlayer， 安卓播放pcm数据
最新发布
06-10
如果不想使用TMediaPlayer播放音频数据，可以使用FMX.Platform.Android.JAudioTrack类来播放PCM数据。以下是一个简单的示例代码，演示如何使用JAudioTrack类在安卓平台上播放PCM数据： ``` uses FMX.Platform....

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值