MP3Class.pas(46): Symbol '_DMp3Play' is specific to a platform
_DMp3Play = dispinterface;
_DMp3PlayEvents = dispinterface;
Mp3Play = _DMp3Play;//这句报错
_DMp3Play = dispinterface
['{3B00B10B-6EF0-11D1-A6AA-0020AFE4DE54}']
property SelWaveDevice: Smallint dispid 1;
property Max44: WordBool dispid 2;
property FrameCount: Integer dispid 3;
property IsCopyrighted: WordBool dispid 4;
property IsOriginal: WordBool dispid 5;
property HasChecksums: WordBool dispid 6;
property Layer: Smallint dispid 7;
property SampleFrequency: Integer dispid 8;
property BitRate: Integer dispid 9;
property MPEGVersion: Smallint dispid 10;
property MPEGMode: Smallint dispid 11;
property FrameNotifyCount: Smallint dispid 12;
property Version: Smallint dispid 13;
property MsPerFrame: Single dispid 14;
property TotalTime: Integer dispid 15;
property ChannelMode: Smallint dispid 16;
function Open(const mp3file: WideString; const wavefile: WideString): Smallint; dispid 17;
function Play: Smallint; dispid 18;
function Pause: Smallint; dispid 19;
function Seek(Frame: Integer): Smallint; dispid 20;
function Stop: Smallint; dispid 21;
function Close: Smallint; dispid 22;
function Authorize(const Name: WideString; const Password:
WideString): Smallint; dispid 23;
function SetErrorMode(ErrorsOn: Smallint): Smallint; dispid 24;
function GetVolumeLeft: Integer; dispid 25;
function SetVolume(LeftVolume: Integer; RightVolume: Integer): Smallint; dispid 26;
function GetVolumeRight: Integer; dispid 27;
function SetVolumeP(LeftVolumeP: Smallint; RightVolumeP: Smallint): Smallint; dispid 28;
function GetVolumeRightP: Smallint; dispid 29;
function GetVolumeLeftP: Smallint; dispid 30;
function GetNumDevs: Smallint; dispid 31;
function GetDevName(iDev: Smallint): WideString; dispid 32;
function GetDevParam(iDev: Smallint): Integer; dispid 33;
function SetOutDevice(iDev: Smallint): Smallint; dispid 34;
function GetOutDevice: Smallint; dispid 35;
function PlayFromTo(FrameA: Integer; FrameB: Integer): Smallint; dispid 36;
function GetWaveLengthSecs: Single; dispid 37;
function PlayFromToS(Secx: Single; Secy: Single): Smallint; dispid 38;
function GetLeftSelVolumeP: Smallint; dispid 39;
function SetSpeed(Percent: Smallint): Smallint; dispid 40;
procedure AboutBox; dispid -552;
end;
_DMp3Play = dispinterface;
_DMp3PlayEvents = dispinterface;
Mp3Play = _DMp3Play;//这句报错
_DMp3Play = dispinterface
['{3B00B10B-6EF0-11D1-A6AA-0020AFE4DE54}']
property SelWaveDevice: Smallint dispid 1;
property Max44: WordBool dispid 2;
property FrameCount: Integer dispid 3;
property IsCopyrighted: WordBool dispid 4;
property IsOriginal: WordBool dispid 5;
property HasChecksums: WordBool dispid 6;
property Layer: Smallint dispid 7;
property SampleFrequency: Integer dispid 8;
property BitRate: Integer dispid 9;
property MPEGVersion: Smallint dispid 10;
property MPEGMode: Smallint dispid 11;
property FrameNotifyCount: Smallint dispid 12;
property Version: Smallint dispid 13;
property MsPerFrame: Single dispid 14;
property TotalTime: Integer dispid 15;
property ChannelMode: Smallint dispid 16;
function Open(const mp3file: WideString; const wavefile: WideString): Smallint; dispid 17;
function Play: Smallint; dispid 18;
function Pause: Smallint; dispid 19;
function Seek(Frame: Integer): Smallint; dispid 20;
function Stop: Smallint; dispid 21;
function Close: Smallint; dispid 22;
function Authorize(const Name: WideString; const Password:
WideString): Smallint; dispid 23;
function SetErrorMode(ErrorsOn: Smallint): Smallint; dispid 24;
function GetVolumeLeft: Integer; dispid 25;
function SetVolume(LeftVolume: Integer; RightVolume: Integer): Smallint; dispid 26;
function GetVolumeRight: Integer; dispid 27;
function SetVolumeP(LeftVolumeP: Smallint; RightVolumeP: Smallint): Smallint; dispid 28;
function GetVolumeRightP: Smallint; dispid 29;
function GetVolumeLeftP: Smallint; dispid 30;
function GetNumDevs: Smallint; dispid 31;
function GetDevName(iDev: Smallint): WideString; dispid 32;
function GetDevParam(iDev: Smallint): Integer; dispid 33;
function SetOutDevice(iDev: Smallint): Smallint; dispid 34;
function GetOutDevice: Smallint; dispid 35;
function PlayFromTo(FrameA: Integer; FrameB: Integer): Smallint; dispid 36;
function GetWaveLengthSecs: Single; dispid 37;
function PlayFromToS(Secx: Single; Secy: Single): Smallint; dispid 38;
function GetLeftSelVolumeP: Smallint; dispid 39;
function SetSpeed(Percent: Smallint): Smallint; dispid 40;
procedure AboutBox; dispid -552;
end;
解决方案 »
- 请问如何才能将一个TButton的控件放在TImage的控件上?
- delphi+word模版如何在指定的位置加入表格?
- 数组赋值
- 公司需要.转做delphi 需要一个关于delphi技术的群
- 关于"CommandText changes are not allowed."的问题
- 请问有办法把word应用程序嵌入到自己写的程序的某个窗体上吗
- quickreport中QRSubDetail的怎样换页
- 请问有谁知道Delphi5升级包和ADO升级包的序列号?
- 求助,一个关于数组的问题!!!
- 各位大虾下午好,请教这样一个问题:如何把dbgrid中的表打印出来呀?急!
- 动态创建StringGrid,如何使某一列居中。分多
- ado连接oracle的问题
改代码是否能播放一帧一帧的mp3数据?
这是源码,,请大家帮我试试