كيفية عمل أسطوانة للقرآن الكريم
(الجزء الأول من الشرح)
في هذا الجزء والذي يليه سنتعلم كيفية عمل أسطوانة للقرآن الكريم في صفحة واحدة من المشروع للشيخ الذي تفضل أن تستمع له
في
بادئ الأمر نحمد الله عز وجل على هذه النعمة التي سخرت في خدمة الدين
والقرآن وعلى هذا البرنامج، ولذلك نرجوا من الإخوة أستخدامه فيما يرضي الله
عز وجل، وإنا لنتعجب من البعض الذين يجهدون أنفسهم في صنع أقراص وأسطوانات
الغناء أو غير ذلك فيوزعها فيحمل وزرها ووزر من يستعملها، وتخيل عزيزي لو
ان البرنامج يستعمل في صنع أسطوانات القرآن الكريم أو المحاضرات أو الدروس ،
أليس تنفع صاحبها حتى بعد موته !!!.
وبدون إطالة نبدأ بكيفية صنع الأسطوانة
أولا: نقوم بإدراج ListBox نحتاجها لوضع سور القرآن
بعد إدراج اللسب بوكس نضغط عليه مرتين ونقوم بإدراج جميع سور القرآن في الجهة اليسرى
وإسم
السورة الموجود في المجلد Audio في مجلد الأسطوانة والمقابلة للسورة
المراد تشغيلها ويفضل إستعمال السور بإمتداد mp3 لصغر حجمه
وإننا نحتاجه فيما بعد لأننا سنشغله على الميديا بلاير فيما بعد
هذه صورة الـ ListBox بعد إدراج جميع السور
الآن نقوم بالضغط على الـ ListBox مرتين ونختار سكريبت ثم On Double-Click ثم Add Action
ونختار لست بوكس ثم listBox.GetListBox كما في الصورة
نختار اللست بوكس 1 ثم نكتب هذه النتيجة tbl_selected
ثم نضيف هذا السكريبت للسكريبت السابق
كود:result = ListBox.GetItemData("ListBox1", tbl_selected[1]);
والآن نقوم بإضافة هذا السكريبت المؤقت لأننا سنتخلى عنه فيما، أي أننا نقوم بتشغيل الصوتيات خارج الأسطوانة لحد الآن
كود:File.Open("AutoPlay\\Audio\"..result..".mp3", "", SW_SHOWNORMAL);
وفي الأخير نحصل على هذا السكريبت كما في الصورة
الآن نقوم بالضغط على ok ثم نقوم بالمعاينة
كان
هذا درس كيفية تشغيل الملفات عن طريق اللست بوكس خارج الأسطوانة وسنتعلم
في الدرس القادم إن شاء الله كيفية تشغيل الصوتيات داخل الأسطوانة بدل
المشغل الموجود في الجهاز