المشاركات : 3,703
المواضيع 101
:
: 579
الإنتساب : Feb 2008
إقتباس :في الوحدة الرئيسية في الحدث formcreate
procedure TForm1.FormCreate(Sender: TObject);
begin
soundplayer.Create;
end;
احذف ما فوق
لست بحاجة لتعريف واو انشاء SoundPlayer لانه سبق ذلك، افتح ملف المكون fpsound.pas تجد به
كود :
var
SoundPlayer: TSoundDocument;
...
initialization
SoundPlayer := TSoundDocument.Create;
finalization
SoundPlayer.Free;
المشاركات : 39
المواضيع 9
:
: 0
الإنتساب : Mar 2011
سأعيد المحاولة
شكرا على الرد
المشاركات : 39
المواضيع 9
:
: 0
الإنتساب : Mar 2011
تمكنت من تنفيذ التطبيق ولكن يتم تشغيل الملف مرة واحدة وعند الضغط على مفتاح play مرة أخرى لا يتم تشغيل الملف الصوتي فما سبب ذلك ؟ وهل هناك طريقة للتغلب على هذة المشكلة؟
شكرا
المشاركات : 3,703
المواضيع 101
:
: 579
الإنتساب : Feb 2008
fpsound لايزال ببدايته...
لا تستخدم Stop وغيرها بPause
المشاركات : 39
المواضيع 9
:
: 0
الإنتساب : Mar 2011
عندما طبقت المثال الخاص ب fpsound على لينكس لم يتم تشغيل الملف التنفيذي وتشغيل الصوت الا بعد
اضافة مسار مكتبة libopenAL باستخدام LD_LIBRARY_PATH قبل تنفيذ التطبيق
فهل fpsound يعتمد على مكتبة openAL
المشاركات : 3,703
المواضيع 101
:
: 579
الإنتساب : Feb 2008
إقتباس :فهل fpsound يعتمد على مكتبة openAL
نعم، ألم تلاحظ ملفات OpenAL موجودة ضمن ملفات fpsound
حاليا fpsound يستخدم OpenAL فقط وربما مستقبلا يعتمد على غيره ايضا
المشاركات : 39
المواضيع 9
:
: 0
الإنتساب : Mar 2011
شكرا أخ B.M.AbdelAziz
على التفاعل البناء جزاك الله خيرا استفدنا كثيرا من مشاركاتك
نتمنى أن يتحسن FPSound ليستغني عن المكتبات الخارجية ويعتمد على كود بسكال فقط
