文档章节

简单播放 mp3 - 回复 "heyongan" 的问题

涂孟超
 涂孟超
发布于 2014/09/26 15:35
字数 163
阅读 6
收藏 0
点赞 0
评论 0
问题来源: http://www.cnblogs.com/del/archive/2008/09/17/1288772.html#1319271

代码文件:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, MPlayer;

type
  TForm1 = class(TForm)
    Button1: TButton;
    MediaPlayer1: TMediaPlayer;
    procedure Button1Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  MediaPlayer1.Visible := False;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  MediaPlayer1.FileName := 'c:\temp\Test.mp3';
  MediaPlayer1.Open;
  MediaPlayer1.Play;
end;

end.

 
 
 
 
 

 

 

  
窗体文件:
object Form1: TForm1
  Left = 0
  Top = 0
  Caption = 'Form1'
  ClientHeight = 149
  ClientWidth = 270
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Button1: TButton
    Left = 96
    Top = 72
    Width = 75
    Height = 25
    Caption = 'Button1'
    TabOrder = 0
    OnClick = Button1Click
  end
  object MediaPlayer1: TMediaPlayer
    Left = 8
    Top = 24
    Width = 253
    Height = 30
    TabOrder = 1
  end
end

 
 
 
 
 

 

 

  

© 著作权归作者所有

共有 人打赏支持
涂孟超
粉丝 12
博文 2004
码字总数 14107
作品 0
深圳
程序员
怎样使用libmad

libmad是一个开源mp3解码库,其对mp3解码算法做了很多优化,性能较好,很多播放器如mplayer、xmms等都是使用这个开源库进行解码的;如果要设计mp3播放器而又不想研究mp3解码算法的话,libma...

mjrao ⋅ 2012/05/18 ⋅ 0

Rhythmbox中文乱码解决办法

Rhythmbox中文乱码解决办法 分类: Linux 2012-08-10 15:251368人阅读评论(0)收藏举报 转自:http://hi.baidu.com/morgensonne/item/3470aef58747abde6325d2d9 今天在网络上找到了一个比较好...

一叶柳 ⋅ 2012/12/02 ⋅ 0

HTML 音频(Audio)

声音在HTML中可以以不同的方式播放. 问题以及解决方法 在 HTML 中播放音频并不容易! 您需要谙熟大量技巧,以确保您的音频文件在所有浏览器中(Internet Explorer, Chrome, Firefox, Safari,...

wybo521 ⋅ 2015/12/25 ⋅ 0

转贴:ubuntu Rhythmbox歌曲名乱码问题

ubuntu存在好多乱码问题,幸亏网上高人无数,对这些问题还都有解决之道。 先说最简单的解决办法吧! sudo apt-get install python-mutagen 安装上这个东西 然后跳入到存放音乐文件的目录下,...

燃灯 ⋅ 2011/01/13 ⋅ 0

开源的在线音频播放器

在线音频播放器,在线音频播放器允许任何人在他们的站点和博客上添加,比如常见的音乐网站及其他个性的网站中。在这篇文章中,我已编制了20个免费为您的网站和博客提供的音频播放器,希望能帮...

大猪 ⋅ 2011/02/14 ⋅ 1

MP3解码播放,出现的奇怪问题,不知是什么原因,请教各位?

原本是想做MP3文件传输的,但远程播放时出现噪音,不知是什么原因? 出现的问题: 我用组播实现将MP3文件分帧发送出去,另一个程序加入该组接收并播放,声音可以正常播放,但出现一点小噪音,...

chentian08 ⋅ 2012/07/13 ⋅ 2

关于iOS 录音并且转码上传的相关问题

第一步: 录音 录音这个很简单,给大家分享一个比较全面的demo, https://github.com/liuchunlao/RecordAndPlayVoice; 录音和播放的功能基本够用了, /** 录音工具的单例 / + (instancetype)shar...

cgqianmo123 ⋅ 2016/07/19 ⋅ 0

关于录音播放的一些问题记录

问题:将网络录音播放器,也能播放本地录音 解决1:单独为本地录音创建开始录音,更新进度条,暂停录音等方法 解决 收获,跟ui有关系的都要放到handler中区执行,因为那才是在主线程中,不让...

xaozu ⋅ 2014/01/18 ⋅ 1

Linux版网易云音乐更新至V1.1.0

Linux版网易云音乐更新至V1.1.0 IMCN 2017年12月1日暂无评论 阅读 540 次 网易云音乐Linux版更新到V1.1.0版,本次更新除了迁移到QCEF框架,对GNOME、KDE桌面环境支持更好,支持最新Debian 9、...

IMCN ⋅ 2017/12/01 ⋅ 0

Kreogist Mu 0.9.1 发布,跨平台音乐管理中心

在 0.9 版发布后,Kreogist Mu 迎来了第一次常规更新,本次更新为 Retina Display 做了完整适配,解决了 Mac OS X 下显示不正常的问题。除此以外,为全平台带来了全屏功能。并修正了部分bug...

東條・スペンサー・咲 ⋅ 2015/10/20 ⋅ 34

没有更多内容

加载失败,请刷新页面

加载更多

下一页

熊掌号收录比例对于网站原创数据排名的影响[图]

从去年下半年开始,我在写博客了,因为我觉得业余写写博客也还是很不错的,但是从2017年下半年开始,百度已经推出了原创保护功能和熊掌号平台,为此,我也提交了不少以前的老数据,而这些历史...

原创小博客 ⋅ 31分钟前 ⋅ 0

LVM讲解、磁盘故障小案例

LVM LVM就是动态卷管理,可以将多个硬盘和硬盘分区做成一个逻辑卷,并把这个逻辑卷作为一个整体来统一管理,动态对分区进行扩缩空间大小,安全快捷方便管理。 1.新建分区,更改类型为8e 即L...

蛋黄Yolks ⋅ 50分钟前 ⋅ 0

Hadoop Yarn调度器的选择和使用

一、引言 Yarn在Hadoop的生态系统中担任了资源管理和任务调度的角色。在讨论其构造器之前先简单了解一下Yarn的架构。 上图是Yarn的基本架构,其中ResourceManager是整个架构的核心组件,它负...

p柯西 ⋅ 今天 ⋅ 0

uWSGI + Django @ Ubuntu

创建 Django App Project 创建后, 可以看到路径下有一个wsgi.py的问题 uWSGI运行 直接命令行运行 利用如下命令, 可直接访问 uwsgi --http :8080 --wsgi-file dj/wsgi.py 配置文件 & 运行 [u...

袁祾 ⋅ 今天 ⋅ 0

JVM堆的理解

在JVM中,我们经常提到的就是堆了,堆确实很重要,其实,除了堆之外,还有几个重要的模块,看下图: 大 多数情况下,我们并不需要关心JVM的底层,但是如果了解它的话,对于我们系统调优是非常...

不羁之后 ⋅ 昨天 ⋅ 0

推荐:并发情况下:Java HashMap 形成死循环的原因

在淘宝内网里看到同事发了贴说了一个CPU被100%的线上故障,并且这个事发生了很多次,原因是在Java语言在并发情况下使用HashMap造成Race Condition,从而导致死循环。这个事情我4、5年前也经历...

码代码的小司机 ⋅ 昨天 ⋅ 1

聊聊spring cloud gateway的RetryGatewayFilter

序 本文主要研究一下spring cloud gateway的RetryGatewayFilter GatewayAutoConfiguration spring-cloud-gateway-core-2.0.0.RC2-sources.jar!/org/springframework/cloud/gateway/config/G......

go4it ⋅ 昨天 ⋅ 0

创建新用户和授予MySQL中的权限教程

导读 MySQL是一个开源数据库管理软件,可帮助用户存储,组织和以后检索数据。 它有多种选项来授予特定用户在表和数据库中的细微的权限 - 本教程将简要介绍一些选项。 如何创建新用户 在MySQL...

问题终结者 ⋅ 昨天 ⋅ 0

android -------- 颜色的半透明效果配置

最近有朋友问我 Android 背景颜色的半透明效果配置,我网上看资料,总结了一下, 开发中也是常常遇到的,所以来写篇博客 常用的颜色值格式有: RGB ARGB RRGGBB AARRGGBB 这4种 透明度 透明度...

切切歆语 ⋅ 昨天 ⋅ 0

CentOS开机启动subversion

建立自启动脚本: vim /etc/init.d/subversion 输入如下内容: #!/bin/bash## subversion startup script for the server## chkconfig: 2345 90 10# description: start the subve......

随风而飘 ⋅ 昨天 ⋅ 0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

返回顶部
顶部