كيفية عمل أسطوانة للقرآن الكريم

كيفية عمل أسطوانة للقرآن الكريم
(الجزء الأول من الشرح)


في هذا الجزء والذي يليه سنتعلم كيفية عمل أسطوانة للقرآن الكريم في صفحة واحدة من المشروع للشيخ الذي تفضل أن تستمع له

في بادئ الأمر نحمد الله عز وجل على هذه النعمة التي سخرت في خدمة الدين والقرآن وعلى هذا البرنامج، ولذلك نرجوا من الإخوة أستخدامه فيما يرضي الله عز وجل، وإنا لنتعجب من البعض الذين يجهدون أنفسهم في صنع أقراص وأسطوانات الغناء أو غير ذلك فيوزعها فيحمل وزرها ووزر من يستعملها، وتخيل عزيزي لو ان البرنامج يستعمل في صنع أسطوانات القرآن الكريم أو المحاضرات أو الدروس ، أليس تنفع صاحبها حتى بعد موته !!!.
وبدون إطالة نبدأ بكيفية صنع الأسطوانة

أولا: نقوم بإدراج 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 ثم نقوم بالمعاينة

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
كان هذا درس كيفية تشغيل الملفات عن طريق اللست بوكس خارج الأسطوانة وسنتعلم في الدرس القادم إن شاء الله كيفية تشغيل الصوتيات داخل الأسطوانة بدل المشغل الموجود في الجهاز

عمل أسطوانة للقرآن الكريم
(الجزء الثاني)

قبل أن نشرع في الجزء الثاني من الشرح لدي ملاحظة على الدرس السابق


وهي أنه يمكن تسمية الصوتيات في المجلد Audio باللغة العربية لكن يجب أن تكون الـ Data المقابل في سكريبت اللست بوكس باللغة العربية كذلك وقم بملاحظة الصورة التالية لفهم ذلك
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
هذا الذي أردت الإشارة إليه والآن نعود لأسطوانتنا

كان في الدرس السابق في العنصر الأول إدراج ListBox

ثانيا: إدراج MediaPlayer plugin داخل الأسطوانة

والهدف منه تشغيل السور الموجود في اللست بوكس داخل الأسطوانة

ولعمل ذلك نقوم بالضغط مرتين على صفحة العمل ونختار Plugins ثم MediaPayer

كما ترى في الصورة
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
قم بالتحكم في مكانه وطوله وعرضه
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
نعود الآن لـ ListBox ونضغط عليها بيمين الماوس ونختار خصائص
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
نذهب إلى سكريبت ثم OnDouble Click

نترك السطر الأول والثاني من السكريبت الذي تم شرحه في الدرس السابق

ونحذف الثالث ونستبدله بهذا
الرمز:
كود:
MediaPlayer.Load("media_player", "AutoPlay\\Audio\\"..result..".mp3");
وفي الأخير نحصل على هذا السكريبت
الرمز:
كود:
tbl_selected = ListBox.GetSelected("ListBox1");
result = ListBox.GetItemData("ListBox1", tbl_selected[1]);
MediaPlayer.Load("media_player", "AutoPlay\\Audio\\"..result..".mp3");
كما ترى في الصورة
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
نضغط Ok ونقوم بالمعاينة ونرى النتيجة
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
كانت هذه الخطوة الثانية من إعداد الأسطوانة
ويتبع الخطوة الثالثة إن شاء الله

كيفية عمل أسطوانة للقرآن الكريم
(الخطوة الثالثة)


كنا قد تناولنا في الدرسين السابقين كيفية عمل أسطوانة للقرآن الكريم واليوم إن شاء الله نكمل الخطوة الثالثة في تكوين الأسطوانة، حيث كان وضع جميع سور القرأن في عنصر ListBox كخطوة أولى ثم إدراج MediaPlayer plugin كخطوة ثانية أما الخطوة الثالثة فهي وضع مصحف على شكل صفحة ويب لكل سورة من صور القرآن الكريم.


فبدل أن المستمع يبقى يتفرج على التصميم رايح يستمع ويتابع من المصحف داخل الأسطوانة وبالتالي يكون أدعى للحفظ و تدبر هذا القرآن .


ونبدأ الخطوة الثالثة.


قبل أن نشرع في هذه الخطوة نحتاج صور لسور القرآن لكي نجعلها على شكل صفحات ويب.

وقد وجدت صور سور القرآن في الموسوعة القرآنية الشاملة بصوت خمس مقرئين وياريت لو واحد يملك هذه الأسطوانة يقوم برفع الصور الموجودة بداخلها حتى تعم الفائدة ويستفيد منها الجميع بإذن الله.

يمكن تحميل صور سور القرآن من هذا الرابط
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]rapidshare.comrapidshare.com Quran.zip

بعد تحميل الصور نبدأ في عمل صفحات الويب لكل سورة من القرآن.
نقوم بفتح فتح ملف وورد فارغ ونذهب إلى الأمرInsert ونختار Images
ثم نحدد الملف الموجود به صور سور القرآن الكريم كما في الصورة

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]

نختار السورة التي نريد جعلها على شكل صفحة ويب

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]

بعد إدراج السورة نقوم بحفظ الصفحة ونذهب إلى الأمر file ثم save as

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]

نقوم بإعطاء إسم للملف المراد حفظه ويجب تسميته بإسم السورة الملقابلة لها في المجلد Audioونضغط على حفظ

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
بعد إنشاء الصفحة نعود لبرنامجنا وللملف في الدرس السابق

نقوم بنسخ جميع سور القرآن التي تم إنشاؤها إلى المجلد Docs في ملف الأسطوانة

ونقوم بإدراج صفحة ويب بالضغط على الأيقونة المبينة في الصورة


[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]

تأتي الصورة الموالية ونقوم بحذف رابط الموقع ونختار صفحة مناسبة من الجهاز ويفضل أن تقوم بصنع صفحة ترحيبية للتعريف بمكونات الأسطوانة ووضع معلوماتك فيها وهي تظهر بمجرد تشغيل الأسطوانة وقبل الشروع في الأستماع

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
نقوم باختيار الصفحة الرتحيبية كما في الصورة وتجدها في الملف المرفق

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]

نضع الصفحة في المكان المناسب ونتحكم في طولها وارتفاعها كما ترى

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
نضغط مرتين على صفحة الويب ونسميها Web1 كما في الصورة

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
الآن نذهب إلى الـ ListBox ونضغط مرتين عليها ونختار سكريبت ثم On double Click

ونضيف هذا السكريبت لسكريبت الدرس السابق (السكريبت الخاص بالخطوة الثانية)

الرمز:
كود:
Web.LoadURL("Web1", "Autoplay\\Docs\\"..result..".mht");

تلاحظ إمتداد mht وأنت تقوم بوضع الإمتداد المناسب htm أو mht حسب امتداد الصفحة

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]
قم بالضغط على Ok ثم F5 للمعاينة وترى النتيجة
[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذه الصورة]