Delphi ComObj调用wmplayer播放音乐

本文整理自网络，侵删。

 
  uses System.Win.ComObj;

var
Player: olevariant;
    Player := CreateOleObject('wmplayer.ocx.7');
    Player.url := olevariant(UTF8Decode('123.mp3'));

    Player.Controls.Play; //播放

    Player.Controls.Pause;  //暂停

    Player.Controls.Stop; //停止
 

相关阅读 >>

Delphi 限制文本框中只接受数字

crc8unt.pas

Delphi firedac 下的 sqlite [9] - 关于排序

Delphi 流分割与合并文件的函数

Delphi datetimetostr函数专用优化版

Delphi 屏蔽汉字，年月日，时间，银行卡正则表达式

Delphi inttohex 查看字符的十六进制值

Delphi kbmmw sampleservice/sampleclient方式传输数据集

Delphi 阿里云发送短信的Delphi单元

Delphi 简单的日志记录

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi ComObj调用wmplayer播放音乐