+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : متتديات باسكال Pascal (https://delphi4arab.net/forum/forumdisplay.php?fid=7)
+--- قسم : Lazarus - Free Pascal - CrossKylix - Kylix - CrossVCL (https://delphi4arab.net/forum/forumdisplay.php?fid=34)
+--- الموضوع : قراءة ملف mp3 في Lazarus ؟؟ (/showthread.php?tid=2288)
قراءة ملف mp3 في Lazarus ؟؟ - Moha711 - 10-08-2010
السلام عليكم
اعمل على مشروع في Lazarus ووصلت الى 95 بالمئة
و لم اعثر على طريقة او مكون خارجي لقراءة ملفات ال mp3
جربت التحويل الى wav و استعمال الدالة PlaySound لكن حجم الملف الناتج كبييير
قراءة ملف mp3 في Lazarus ؟؟ - a.atalla - 10-08-2010
جرب هذا وأخبرنا ما حدث ACS
كود :
[url]http://wiki.lazarus.freepascal.org/ACS[/url]هناك بعض المناقشات عن ذلك في منتديات لازاروس
كود :
http://forum.lazarus.freepascal.org/index.php?action=search2ويندوز أم لينوكس ؟؟؟
قراءة ملف mp3 في Lazarus ؟؟ - Moha711 - 10-08-2010
جربت ACS قبل طرح السؤال لانني لم اجد ملف xxx.lpi الخاص بالمكون
إقتباس :ويندوز أم لينوكس ؟؟؟ويندوز
قراءة ملف mp3 في Lazarus ؟؟ - kachwahed - 11-08-2010
وعليكم السلام ورحمة الله
ابحث عن BASS لـ Lazarus
كود :
http://www.un4seen.com/forum/?topic=11479.0هناك غيره في المنتدى
بالتوفيق.
قراءة ملف mp3 في Lazarus ؟؟ - a.atalla - 11-08-2010
بالنسبة لـ ACS حمل المكون من هنا
كود :
http://bitbucket.org/a_atalla/general-uploads/downloads/acs.zipفك الضغط وانقل المجلد الناتج الي مجلد component في لازاروس
ثبت المكون كما بالصور
![[صورة: OxRLE.png]](http://i.imgur.com/OxRLE.png)
![[صورة: 1afrI.png]](http://i.imgur.com/1afrI.png)
![[صورة: oXQxa.png]](http://i.imgur.com/oXQxa.png)
أضغط install
وها هو المكون بعد التثبيت
![[صورة: QIhQJ.png]](http://i.imgur.com/QIhQJ.png)
موقع المكون
كود :
http://www.mtu-net.ru/aborovsky/acs/downloads.htmقراءة ملف mp3 في Lazarus ؟؟ - Moha711 - 11-08-2010
تم الحل
شكرا لكم كثيرا
قراءة ملف mp3 في Lazarus ؟؟ - a.atalla - 12-08-2010
هلا افدتنا بطريقة الحل مع مثال بسيط
قراءة ملف mp3 في Lazarus ؟؟ - Moha711 - 12-08-2010
PHP كود :
procedure TForm1.Button1Click(Sender: TObject);
begin
If OpenDialog1.Execute Then
Begin
ACSFileIn1.FileName:= OpenDialog1.FileName;
ACSAudioOut1.Input := ACSFileIn1 ;
ACSAudioOut1.Run;
end;
end;
تحتاج الى مكونين من Audio IO هما
لاصدار الصوت "تشغيل" ACSAudioOut1
ACSFileIn1 لتحديد الملف الخارجي
قراءة ملف mp3 في Lazarus ؟؟ - هشام زيتون - 11-10-2010
a.atalla كتب :بالنسبة لـ acs حمل المكون من هنا
كود :http://www.mtu-net.ru/aborovsky/acs/downloads.htm
عفو ياخى انا عضو جيد فى منتدى دلفى و لقد قمت بتجريب هدا الطريق من على نطام لينكس و لكن لم انجح ادا سحمت هل يوجد طريق اخر لتنريل اداة و يمكني العمل به على لينكس
وشكر لك
قراءة ملف mp3 في Lazarus ؟؟ - a.atalla - 14-11-2010
أصدار acs في svn يحتوي علي أصلاحات للينوكس
كود :
svn co https://lazarus-ccr.svn.sourceforge.net/svnroot/lazarus-ccr/components/acs![[صورة: sOuJj.png]](http://i.imgur.com/sOuJj.png)