اضافة البسملة لتطبيقك عند التشغيل

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

سالني احد الاصدقاء
قال: لدي مشروع واريـده ان يقرأ "بسم الله الرحمن الرحيم" عند تنفيذه
قلت له: وما المشكل، استعمل ملف Wave به البسملة
قال: مشروعي ملف تنفيذي واحد دون ارفاق ملفات اخرى
قلت: ولماذا وضعو الرسورس اذن! ضعه في الرسورس Resource
قال: كيف ؟

اولا الملف Besm.wav ملف صوتي به "بسم الله الرحمن الرحيم"

نضعه في الرسورس res كا الاتي:
1- ننشئ ملف نصي نسمية res.RC ونكتب به التالي

كود :

1 WAVE "Besm.wav"

2- في سطر الاوامر اين وضعهنا الملف نكتب السطر التالي

كود :

BRCC32 res.rc

يصبح لدينا ملف res.res وهو ملف الرسورس الذي سنظيف لمشروعنا Project1.DPR مباشرة بعد {R *.RES} بكتابة

كود :

{$R res.res}

الان بقي ان نستدعي ملفنا الصوتي باستخدام PlaySound المظمنه بMMSystem هكذا

كود :

playSound(PChar(1), hInstance, SND_ASYNC or SND_RESOURCE);

فقط، انتهينا!
ولا ننسى اظافة MMSystem للمشروع تحت Uses

المثال مرفق و السلام عليكم ورحمة الله