مكتبة *.V2m (موسيقى جيدة & حجم صغير) لبرامجكم !

[محمد عبد العزيز]

السلام عليكم

يمكنك استخدام المكتبة dll

كود :

http://magic.shabgard.org/V2mPlayer-VB-Delphi.zip

كود :

procedure V2mPlayFile(FName:Pchar; AuRepeat:Bool); stdcall; external 'MagicV2mEngine.dll' name 'V2mPlayFile'; procedure V2mPlayStream(VData:Pchar; AuRepeat:Bool); stdcall; external 'MagicV2mEngine.dll' name 'V2mPlayStream'; procedure V2mPlayResource(hInst:Longint; ResName, ResType:Pchar; AuRepeat:Bool); stdcall; external 'MagicV2mEngine.dll' name 'V2mPlayResource'; procedure V2mStop; stdcall; external 'MagicV2mEngine.dll' name 'V2mStop'; procedure V2mSetAutoRepeat(AuRepeat:Bool); stdcall; external 'MagicV2mEngine.dll' name 'V2mSetAutoRepeat'; function V2mGetTime:Longint; stdcall; external 'MagicV2mEngine.dll' name 'V2mGetTime'; function V2mTotalTime:Longint; stdcall; external 'MagicV2mEngine.dll' name 'V2mTotalTime'; function V2mIsPlay:Bool; stdcall; external 'MagicV2mEngine.dll' name 'V2mIsPlay';

أمثلة

كود :

V2mPlayResource("WindowsApplication1", "test.v2m", true); V2mPlayFile("test.v2m", true);