برنامج تصميم برامج مع شرح

+
----
-
قبل البدأ الرجاء قول التالى" أقسم بالله العظيم ان لا استخدم هذا الشرح لتصميم برنامج فيه ما يعصى الله من موسيقى وغيرها " ****لمكن لا تظهر له الصور يمكنه تحميل الشرح من هناhttp://www.4shared.com/file/92314550/96007290/sharh_i-k.html****مقدمة :* اولاً عندما تتقن لغة الفيجوال بيسك حاول ان تتعلم لغة اخرى و خاصتاً ( ++C ) .* الويندوز xp تم تصميمه 100 % عبر برنامج ( ++C ) . بسم الله نبدأتحتاج الى برنامج فيجوال بيسك 6 اذا لم تكن تملك البرنامج الرجاء تحميله من الرابط التالى : [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] تحميل البرنامج قم بفتح البرنامج ****أولا : تصميم الصفحة الرئيسيةبعد فتح البرنامج سوف تقابلك هذه الصفحةقم بإختيار Standard EXE ثم Open****بعد ذالك سوف تحد فورم فارغ ( فورم = صفحة او نموذج ) صفحة فارغة ****نستطيع تغير الأسم الموجود فى الأعلى من "Form1" الى " برنامج إبن الخطاب " عن طريق تغير Caption تجدها فى المربع يمين الشاشة النتيجة****الأن نقوم بإضافة الأزرار عبر الأختيار من صندوق الأدوات نختار الأداة Command Buttonبعد الضغط على Command Button نقوم بلصقها فى الفورم****ثم نقوم تغير الأسم من "Command1" الى اى شيء و ليكن "القرأن الكريم" عن طريق Captionبعد التغيرو يكون شكل الزر كأتيوبعد ذلك نستمر فى اضافة الأزرار الى ان يصبح بالشكل التالى****و الأن نقوم بإضافة فورم جديدثم نثوم بالضغط على Add Form مباشرةطريقه أخرى / بعد الضغط على السهم بالقرب من Add Form قم بإختيار Form طريقه اخرى طريقة أخرى / نقوم باضغط على Project ثم Add Form بعد فتح صفحة جديده سوف تكون كأتى ثم قم بالربط بين الصفحة الرئيسة و الصفحة الجديدهعند الضغط على احد الأزرار و ليكن " القرأن الكريم " سوف ننتقل الى صفحة أخرى و هى صفحة لوضع الشفرات البرمجيةويكون كتوب فيهاPrivate Sub Command1_Click()End Subعلماً بأن Command1 هو إسم الزر و يمكن تغيره من Captionس / ما هى الشفره ؟جـ / هى الأمر الذى ستطلب من الحاسب الألى تنفيذه .وسوف نقوم بإضافة الشفره داخله بالشكل التالىForm2.Show Unload Me علماً بأن الصفحة الجديده اسمها Form2 و يكمن تغيره من الجدول نغيرها الى " quran " مثلاً وبعد ذلك سوف تكون الشفره كاتىPrivate Sub Command1_Click() quran.Show Unload Me End Sub البعض قد يتسائل ما الفائده من Unload Me وقد يظن انها بلا فائده و يحذفها و لاكن سوف تكون هناك مشكله صغيره وقتها و هى انه عندما تقوم بإستخدام البرنامج سوف تتراكم الصفحات و ستبطأ عمل الكمبيوتر و هذه المشكله موجوده فى الأصدار الأول و الثاني من البرنامج بعد ذلك يمكنك ان تجرب عمل البرنامج بالضغط على زر F 5 و التأكد من عمل البرنامج بشك جيد****ثانيا : القرأن الكريمقم بتسمية الصفحة الجديده " القرأن الكريم " عبر خاصية Caption ثم قم بإضافة الأزرار التي تحمل اسماء القراء الى ان تصبح بهذا الشكل البعض قد يتسائل كيف تمكنت من جعل الصفحة بحجم الشاشة ؟ الأمر سهل !إذهب الى الجدول و غير خاصية height من 3600 الى 11520 و غير خاصية width من 4800 الى 15360 ****بعد ذلك اذهب الى اقصى اليمين فى أسفل الشاشة سوف تجد هذا الشكلقم بسحب المربع الأبيض الى ان يصبح فى وسط المربع الأسود بالضبط حتى لا يكون انحراف فى الصفحة****بعد ذالك قم بفتح فورم جديد و قم بتسميته " إبراهيم الأخضر " على سبيل المثالبعد تكبير الشاشة و تطبيق الخطوات السابقة إبدأ بوضع الأزراربعد الأنتهاءس / كيف أضيف مشغل الميديا بلير الى النموذج ؟الطريقة الأولى : إضغط كليك باليمين ( إضغط الزر الأيمن فى الفأره ) فى صندوق الأدواتثم قم بإختيار Components الطريقه الثانيه : نضغط على كنترول و حرف " ف "و ستكون نفس النتيجه ( Ctrl + T ) قم بالنزول الى اسفل القائمه قم بأختيار Windows Media Player تأكد من وضع صح على المربع الذى بجانبه ثم اضغط على ok ثم قم بالضغط على مشغل الميديا بلير و قم بلصقه فى النموذج بعد ذلك قم بوضعها بالحجم الذى تريده س / طيب كيف اقوم بتشغيله ؟جـ / فم بالضغط على احد الأزرار و ليكن Command1 عندما تظهر صفحة الشفرات قم بوضع الشفره التاليه WindowsMediaPlayer1.Controls.Stop WindowsMediaPlayer1.URL = "" انتبه WindowsMediaPlayer1 هو متغير و هو الأسم الموجود عند الجدول فى خانة nameأولا قم بالضغط على الميديا بلير ثم انتقل الى الجدول كما تلاحظ فى اخر الشفره توجد علامات اقتباس "" هنا سوف نقوم بوضع الرابطس / طيب من اين نجد الرابط ؟ هناك مواقع كثيره تقدم لك خدمة الأستماع الى القرأن الكريم مثل [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] و [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] وسوف نقوم بتطبيق على الأثنين اولاً : نذهب الى [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] ثم بعد اختيار القارء اختر السوره و اضغط على " اضغط هنا الأستماع " بعد الضغط سوف تظهر لك صفحة كتالى قم بالضغط على الزر الأيمن من الفأره ثم قم بإختيار خصائص سوف تظهر لك هذه الصفحة تجد الرابط فى خانة "موقع" انسخ الرابط و قم بلصقه بين علامتي الأقتباس فيصبح بهذا الشكلPrivate Sub Command1_Click() WindowsMediaPlayer1.Controls.Stop WindowsMediaPlayer1.URL = "http://server3.mp3quran.net/akdr/001.mp3" End Sub ثانياً : قم بزيارة [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] بعد اختيار القارء قم بالضغط على ايقونة الأستماع بتقنية mp3 كما فى الصوره بعد ذلك سوف تجد هذه الصفحة بعد ذلك قم بالضغط على الزر الأيمن فى الفأره و بعد ذلك خصائص و النتاتج يكون ثم قو بوضعه بين علامات الأقتباس تنبيه / احياناً تكون الروابط معطوبه فلذلك يجب الحذر س / كيف أعرف أذا كانت الروابط معطوبه او لا ؟جـ / اذا كانت غير معطوبه فسوف تكون هنار رساله مكتوب فيها " يتم الأن فتح الوسائط " ثم " يتم الأن الأتصال الوسائط " ثم " تخزين مؤقت "و يمكن معرفة ذلك من هنابعد ذلك يمكنك الأستماع الى الصوت و تصهر هناك رساله مثل هذهاما إذا كان الرابط معطوب فلن يعمل و سوف تجد رساله مكتوب بها " يتم الأن الأتصال الوسائط " ثم " جاهز "ملاحظه / عند ظهور "جاهز" الأول مره جرب مره أخرى التأكد فأحياناً تعمل بعد ان تجرب مره ثانيه فتأكد انها لن تعملثالثاً : الأذاعةقم بإنشاء فورم جديد وبعد تسميته و تطبيق الخطوات السابقه قم بإضافة 13 زر1 - إذاعة القرأن الكريم من سوريا2 - إذاعة الشبكة الأسلامية للقرأن الكريم3 - إذاعة القرأن الكريم من الكويت4 - المكتبة الصوتية للقرأن الكريم5 - إذاعة القرأن الكريم من إذاعة الشمال - فلسطين6 - إذاعة القرأن الكريم من تونس7 - إذاعة القرأن الكريم من نابلس - فلسطين8 - إذاعة القرأن الكريم من قطر9 - إذاعة القرأن الكريم من المغرب10 - إذاعة القرأن الكريم من إيران11 - إذاعة نور دبي12 - إمارات اف ام13 - المجد للحديث النبوي - البث الأذاعيسوف يصبح بها بهذا الشكل وبعد إضافة ملف الميديا بلير و بعد ذلك تقوم بالضغط على الأزرار الأضافة الشفرات بعد الضغط على الزر و الأنتقال الى صفحة الشفرات قم بلصق هذه الشفرهWindowsMediaPlayer1.Controls.Stop WindowsMediaPlayer1.URL = "" س / طيب من فين مو هذى نفس الشفره الى قبل شوي ؟جـ / نعم , هذه الشفره تستخدم لفتح الميديا بلير ولاكن انت تحدد ماذا سوف تعرض فيهاس / طيب من فين اجيب روابط الأذاعات ؟جـ / هذه هى هديتي إليك تفضل1 - إذاعة القرأن الكريم من سورياmms://90.153.255.248/quran—-2 - إذاعة الشبكة الأسلامية للقرأن الكريم ([ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] —-3 - إذاعة القرأن الكريم من الكويتmms://62.215.162.163:6666 —-4 - المكتبة الصوتية للقرأن الكريم([ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] - إذاعة القرأن الكريم من إذاعة الشمال - فلسطين [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] - إذاعة القرأن الكريم من تونس [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] - إذاعة القرأن الكريم من نابلس - فلسطين [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] - إذاعة القرأن الكريم من قطر [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] - إذاعة القرأن الكريم من المغرب [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] - إذاعة القرأن الكريم من إيران [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] - إذاعة نور دبي [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] - إمارات اف ام [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] - المجد للحديث النبوي - البث الأذاعي [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] س / طيب كيف ارجع الى الصفحة السابقه ؟جـ / بعد وضع الزر قم بوضع الشفره التاليهForm1.ShowUnload Meيعني نفس الشفره الى انتقل منها من نموضج الى اخر و لاكن Form1 هو اسم الصفحة السابقه وهى على حسب تسميتك لها****رابعا : التلفزيون الأسلامي قم بإنشاء فورم جديد و أضف 6 ازرار و مشغل الميديا بليرقم بإضافة هذه الشفرات1 - Huda [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] - تفسير القرأن الكريم - انجليزيhttp://www.fomny.com/Video/Arabic/02/Tafseer-Quran-Tv/video.asx—-3 - Peace TV [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] - حنينhttp://www.fomny.com/Video/Arabic/Honain/video.asx—-5 - قناة المجدmms://88.191.93.90/majd-0101—-6 - فناة المجد للقرأن الكريمhttp://www.fomny.com/Video/Arabic/Almajd-Hadeeth/video.asxالنتيجهس / طيب كيف اضيف قنوات إضافيه ؟جـ / هناك مواقع كثيره تقدم لك خدمة المشاهده المباشره ( البث المباشر ) مثل هذه الصفحةhttp://www.muslimvideo.com/live****خامساً : الخروجس / ما هي الشفرة للخروج من البرنامج جـ / قم بلصق End او Unload Me فى صفحة الشفرات ( لا يهم اى واحده الأن الأثنين ستقومان بنفس الشيء )Private Sub Command8_Click() Unload Me End Sub****سادساً : عن البرنامجقم بإضافة فورم جديد ثم قم بكتابة ما تريده****سابعاً : المصحف الألترونيبعد إضافة فورم جديد قم بإضافة ادوات جديده ( كنترول و حرف ف ) ثم ضع صح على Microsoft Internet Controls بعد ذلك قم بإختياره من صندوق الأدوات و ألصقه فى النموذج بعد ذلك اقوم بوضع الشفره ولاكن هذه المره ليس فى الأزرار الأنه ليس هناك ازرار بل اقوك بالضغط مرتين على النموذج نفسه و بعد ذلك سوف يضهر لدي هذه الشفرهPrivate Sub Form_Load() WebBrowser1.Navigate "" End Subعلماً بأن WebBrowser1 هو متغيرس / لماذا اقوم بوضع الشفره فى النموذج و ليس فى الزر ؟جـ / الأنك اذا وضعتها فى الزر عليه ان يضغط على الزر حتى يفتح الموقع ام اذا فى النموذج فسوف يفتح الموقع بمجرد دخوله على الصفحةبعد ذلك اقوم بوضع الموقع الذى اريده ان يضهر فى الفورم و فى هذه الحاله هذا هو رابط الموقعhttp://www.quranexplorer.com/quran/ و بالتالى الشفره سوف تكونPrivate Sub Form_Load() WebBrowser1.Navigate "http://www.quranexplorer.com/quran" End Sub**** ثامناً : الأنتقال الى صفحة التحميلس / كيف امكن المستخدمين من الذهاب الى صفحة التحميل ؟جـ / طيب على سبيل المثال لو تبقى تنتقل الى صفحة القارء " محمد أيوب " انتبه معاىانشئ فورم جديد و اضف متصفح الأنترنت بعد ذلك اضغط على الفورم و الصق الشفره التاليهPrivate Sub Form_Load() WebBrowser1.Navigate "http://www.mp3quran.net/ayyub.html" و إذا كنت تريد اى قارء اخر ادخل الى موقع [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] مثلاً تم عند الدخوال الى القارء الذى تريده قم بنسخ الرابط و إستبداله بالرابط السابقالتاسع : دليل المواقع الأسلاميةقم بإضافة فورم وبعد ذلك متصفح الأنترنت و ( Combo Box )س / من اين اضيف ( Combo Box ) انتقل الى صندوق الأدواة بعد ذلك قم بلصقه على النموذج و قم بإجراء اختبار بسيطس / كيف احذف كلمة "Combo1" ؟جـ/ بعد ذلك انتقل الى الجدول اذهب الى خانة Text وامسح كلمة "Combo1" بعد ذلك انتقل الى خانة List و قم بإضافة التالىبرنامج إبن الخطاب , طريق الأسلام , المكتبه الصوتيه , الجرافيك الأسلاميبعد ذلك قم بالضغط على Combo لتنتقل الى صفحة الشفرات و قم بوضع الشفره التاليه Private Sub Combo3_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then WebBrowser1.Navigate Combo3.Text If Combo3 = "برنامج ابن الخطاب" Then WebBrowser1.Navigate ("http://i-k.maktoobblog.com") If Combo3 = "طريق الأسلام" Then WebBrowser1.Navigate ("http://www.islamway.com") If Combo3 = "مكتبة الصوتيه" Then WebBrowser1.Navigate ("http://www.mp3quran.net") If Combo3 = "الجرافيك الاسلامي" Then WebBrowser1.Navigate ("http://www.islamcg.com/vb") End Sub بمعنى اذا تم اختيار "برنامج ابن الخطاب" انتقل الى موقع [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] لاحظ انه فى اول سطر KeyPress(KeyAscii As Integer) وليس Click يعني بعد اختيارك قم بالضغط على انتر "Enter" لكي ينفذ الأمر س / طيب أين أجد دليل للمواقع الأسلامية ؟هناك الكثير من المواقع التى تقدم لك خدمة الدليل للمواقع الأسلاميةأما الذى تم استخدامه فى برنامج ابن الخطاب فهو موقع المنطلق الأسلامي ([ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] ما عليك فعله هو تطبيق الخطوات السابقه و فى النهايه سوف يتكون لديك مثل هذه الصفحة ****العاشر : تحويل النموذج الى ملف تنفيذي ( EXE )س / كيف اجعل نموذجي ينفذ كأي برنامج أخر ؟جـ / قم بالضغظ على Fileثم Make Project1.exeثم اختر مكان الحفظ و اضغط على okسوف تأخذ العملية ثواني او دقائق معدوده ثم يكون الملف بهذا الشكلبعد التشغيل ****الحادي عشر : التحزيم (setup)فى البدايه حمل برنامج SetUp Factory V. 8.0 من الرابط التالى [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] تخص الملف : حجم الملف : 31.38 MB صيغة الملف : [RaR] كلمة المرور [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] التحميلبعد الأنتقال الى رابط التحميل اضغط على Request Download Ticket تجدها فى اعلى الصفحةبعدها سوف تتحول الىثم الىعندها قم بالضغط على Download ليبدأ التحمبل****شرح البرنامجhttp://www.moondil.com/vb/showthread.php?t=25487**** كيف تجعل البرنامج كأنه برنامج إحترافي :1 - ساعة :اختر Label من صندوق الأدواتثم قم بلصقه مرتين فى النموذج ولتكون الأسماء Label1 و Label2ثم اختر المؤقت ( Timer ) من صندوق الأدواتبعد اللصق سيكون الشكل كأتىثم قم بالضغط على ( Timer ) مرتين و أكتب الشفره التاليهPrivate Sub Timer1_Timer() Label1.Caption = Time Label2.Caption = Date End Subوبعد الضغظ على F5 سيكون الشكل كتالى****2 - ايقونه :قد تتسائل كيف اغير شكل أيقونة البرنامج من الى اولا اذهب الى الجدول عند خاصية Iconثم قم بالبحث عن صور من نوع icoس / عندي صوره و لاكن ليسة بأمتداد ico فمذا افعل ؟جـ / قم بتحميل برنامج اسمه Right Click Image Converterتحميل ربنامج Right Click Image [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] لتحميل البرنامج مع الكراك و الشرحhttp://majdah.maktoob.com/vb/majdah4106———————–بعد تحميل و تنصيب البرنامج يمكنك تغير الأمتداد عن طريق الضغط باليمين على الصوره ثم اضغظ على Right Click Image Converter ثم Convert to .Ico**** 3 - تغير شكل البرنامج :اولا تحتاج الى برنامج اكتف سكان ( ActiveSkin 4.3 )تحميل البرنامجhttp://ifile.it/thnb2kgمعلومات تخص الملف :حجم الملف : 2.33 MBصيغة الملف : [RaR]كلمة المرور [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] التنصيب اضغط على كنترول و حرف الفاء ( Ctrl + T )ثم قم بإختيار ActiveSkin 4.3 Type Library ثم okثم قم بلصقها فى الفورم بعد ذلك قم بالضغط مرتين على الفورم و اكتب الشفره التاليهPrivate Sub Form_Load() Skin1.ApplySkin hWnd End Sub بعدين اضغط على اكتف سكن باليمين و أختار Load Skinبعد ذلك اختار الملف الى تريد إضافته تجده العاده فى الرابطC:\Program Files\ActiveSkin 4.3\Skinsبعض التطبيقات مع امكانية تصميم skin خاصه بكإبدأ => كل البرامج => ActiveSkin 4.3 => ثم Skin Builder