تعلم كيف تصنع برنامج ويندوز ميديا بلاير بالفجيوال بايسك 2008/2010 والشرح بالصور...

[tomjerry741]

المشاركة الأصلية كتبت بواسطة مدرس بالاجر

بسم الله الرحمن الرحيم معكم اخيكم فى الله : احمد --- قدمت سابقا عدة شروحات لكيفية تصميم بعض البرامج المهمة واعذرونى لتأخرى فى استكمال شرح " انتى فيرس" الذى بدأته سابقا -- لكثير انشغالى بمتاعب الحياة

المشاركة الأصلية كتبت بواسطة مدرس بالاجر

----------------------
دعونى اقدم لكم اليوم الطريقى المثلى والسهلة لتصميم windows media player عن طريق البرمجة بالفجيوال بايسك
---------------------------
اقدم لكم مثل هذى الشروحات اضافة الى الموضوعات العقيمة بكتاب المدرسة كى تزداد معرفة بمشقات الحياة العصرية --- فلو اعتمدت على الكتاب المدرسى فسوف تصبح اجهل من ابى جهل وافلس من ابن دانيال
------------------
مثالنا اليوم سيكون بهذا الشكل

-- ==============================
قم اولا بفتح برنامج الفجيوال بايسك قم بانشاء مشروع تطبيق ابليكشن جديد وليكن اسمه مثلا : windows media player Test
--------------------------------
نبدأ بحمد الله ..... اللهم لا سهل الا ما جعلته سهلا وانت تجعل الحزن ان شئت سهلا ومشروعنا الذى اقدمه لك الان يا عزيزى ليس احترافيا بقدر ما اهدف اليه وهو استخدام صندوق الادوات الاستخدام الامثل وكيفية برمجة الفورم بالاكواد البسيطة

1-
قم بفتح برنامج الفجيوال بايسك لديك
سواء كان على سطح المكتب او فى قائمة ستارت
-
ابدأ فتح مشروع جديد واكتب عنوان مناسب لأسم مشروعك كما يروق لك


----------------------------------------------

كما تعلم فنحن نريد انشاء مشروع بسيط لعرض ملفات الصوت والفيديو مثل برنامج الويندوز ميديا بلاير
نبحث عنه فى صندوق الادوات لكى نقوم بادراجه فى الفورم
!!!!!!!!!
تقولون انكم بحثتم فلم تجدوه ؟؟!!
اذن ما الحل
تابع الصورة التالية لمعرفة المزيد -- واضغط الصورة لتراها بالحجم العائلى الكبير

2-1

2-2

فى صندوق الادوات toolbox

نضغط كليك يمين على المجموعة الاولى - او اى مجموعة اخرى تريدها -
من القائمة نختار العنصر choose Items
ستظهر لما صفحة متوسطة كما بالصورة التالية --
نضغط على التبويب com components ونبحث عن "windows media player"
وسنجدها بالاسفل ضمن كلمات الحرف w
ضع علامة صح بجوارها واضغط انتر
على فكرة يمكنك اختيار عشرات العناصر الاخرى من هذا التبويب او من غيره
فلنرى الصورة التالية وتابع الخطوات كما هى بالارقام مرتبة
ادعس اعلى الصورة للتكبير



نقوم الان بتغيير حجم الفورم ونجعل قيمتة الى 980; 740 كما سترى بالصورة التالية
ونقوم بسحب عنصر windows media player من صندوق الادوات ونسحبة الى الفورم



والان نقوم بضبط اعدادت العنصر الجديد الذى اضفناة من خلال نافذة الخصائص اللى على ايدك الشمال
نضغط مرة واحدة على عنصر ويندوز ميديا ونغير الخاصية dock ونجعل قيمتها fill يعنى بكامل حجم الفورم نفسه =====
نضغط كليك يمين على عنصر ويندوز ميديا بلاير داخل الفورم ونختار properaties
ونضع علامة صح امام stretch to fill حتى يكون عرض ملف الفيديو اللى هيشتغل مناسب لحجم " ليس اكبر وليس اصغر " ونقوم بتغيير علامة الصوت الى الحد الاقصى -- كما يناسبك

كما سترى بالصور التالية


------------------------

نقوم الان بادراج منيوستريب Menu-strip كما بالصورة التالية
سنجد خانة واحدة فقط مكتوب عليها type-here نقوم الان بكتابة المطلوب
فى الخانة الاولى نكتب فتح
وفى الخانة التالية : تشغيل
وفى الخانة الثالثة : ايقاف - او ستوب او Pause
ونغير خاصية اللون من باك جراوند لكل كلمة كتبتها الى اى لون يعجبك
وبالنسبة لتغيير الخط وحجمة فلديك الخاصية Font اختر منها ما شئت
اذا لم ترد تغيير لون الخلفية او نوع الخط وحجمه -- فلك اختيارك الخاص
واليك الصورة -- اتبعها بالارقام
اخبط الشريط الاصفر اعلى الصورة عشان تشوفها بالحجم الكبيييييييير


-------------------------


وحتى يتمكن مستخدم برنامج من تحديد مكان ملف الصوت او ملف الفيديو الذى يريد تشغيله
فعليك بتوفير الاداة المناسبة التى تمكنه من ذلك
اذن علينا ادراج الاداة openfiledialog من قائمة الادوات
نقوم بسحبها الى الفورم وسنجد انها تتخذ مكانها بالاسفل بجوار menustrip
اتبع الارقام بالصورة واضغط الشريط الاصفر اعلى الصورة لترى بالحجم الضخم


-----------------------
انتهينا من مرحلة ادراج الادوات
وقبل ان ابدأ مرحلة البرمجة بالاكواد لكل عنصر
لدى اضافة مميزة خاصة على شكل الفورم نفسة
حتى لا يستطيع مستخدم برنامج من تكبيرة او تصغيرة -- والميزة هنا
انه لو قام بتكبيرة فان الحجم العام للفورم سيصبح سيئا وغبيا لذا علينا
اعداد الخصائص الخاصة بالفورم
نضغط مرة واحدة على اعلى الفورم -- وهو الشريط الازرق الذى ترى به علامة التكبير والتصغير وعلامة الاغلاق
ونغير قيمة الخصائص التالية
كما قلنا اجعل حجم الفورم بالقيمة التالية
size = 980 * 740
startposiation=CenterScreen
text= windows media player

قم بعدم تفعيل خاصية التكبير او التصغير ماكس مايز واجعل قيمتها false
maxmizbox= false
غير خاصية فورم بوردر ستايل -
الخاصة نوع حد الفورم الى القيمة التالية =فكسد سنجل
formborderstyle=fixedsingle
غير autosizemode الى
grew and shrink



حتى لا يستطيع المستخدم من تكبير الفورم بالسحب والافلات
واخيرا قم بتحديد المكان المناسب لبدء برنامجك وهو وسط الصفحة -- يعنى اول ما حد يدور على برنامجك يظهر فى منتصف الشاشة تماما -- مش فوق ولا تحت ولا يمين ولا شمال
من خلال تغيير خاصية ستارت بوزريشن الى سنتر سكرين
startposiation=CenterScreen

-------- ولا تنسى ان تغير اسم الفورم نفسة من الخاصية تكست الى الاسم الذى تريده



عقب كل تغيير لا تنسى الضغط على زر اف 5 ==== F5 ------ او دوس على حفظ من قائمة فايل اعلى برنامج الفجيوال بايسك

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

**************************
قبل ان انسى هناك خطوة واضافة اخرى مهمة
قم بادراج lable وضعة على المنيو ستريب بجوار stop كما سترى بالصورة واحذف اسمة من الخاصية تكست -- يعنى فى الخاصية تكست شيل كلمة ليبل وخليها فاضية عشان اسم الليبل يختفى
بعد كدا اضغط مرة واحدة على openfiledialog
وفى الخاصية فلتر اكتب الاتى
All Media|*.*
الواقع انه لابد لك ان تشاهد الصورة حتى تتمكن جيدا من كتابة الامر كتابة صحيحة
يمكنك كتابة all media|*.mp3
او
all media|*.rm
يعنى بعد علامة النجمة اكتب اسم الصيغة التى تريد لبرنامج ان يعرضها لك حين تفتح صندوق الاختيار الذى منه سوف تختار الملف المراد تشغيلة
بالنسبة للرمز | فكل ما ستفعله هو ان تضغط على زر شفت ثم الرمز \ بجوار حرف = فى لوحة المفاتيح
فتكون نتيجة الضغط عليهما هو الرمز ( | )
اتمنى ان يكونى كلامى واضحا

والان تبدأ المرحلة الشاقة وهى برمجة الفورد وادواته بالاكواد
نضغط Double Click الان على الحدث open
يعنى بالعربى ندوس مرتين على كلمة اوبن اللى كتبناها لما ادرجنا الاداه menustrip
وفى الحدث البرمجى الخاص بها نكتب الكود التالى يدويا
وانا انصح كل متابعينى بأن يكتبوا الاكواد كما بالصورة الموضحة
وتحسبا لحذفها من اساسا فسوف اقوم بنسخ الكود هنا
Private Sub OpenToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OpenToolStripMenuItem.Click
اسفل السطر السابق نقوم بكتابة
OpenFileDialog1.ShowDialog()
AxWindowsMediaPlayer1.URL = (OpenFileDialog1.FileName)
Label1.Text = OpenFileDialog1.SafeFileName

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



---------------------------------------
نعود مرة اخرى الى الفورم
ونغط دبل كليك على الحدث Play الموجود فى قائمة منيوستريب
ونقوم بكتابة الكود التالى
Private Sub PlayToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PlayToolStripMenuItem.Click
اسفل السطر السابق نقوم بكتابة هذا السطر فقط

AxWindowsMediaPlayer1.URL = (OpenFileDialog1.FileName)

End Sub
حيث ان AxWindowsMediaPlayer1 هو اسم الاداة windows media player والتى ادرجناها كأول عنصر فى الفورم
عليك بمتابعة الصورة التالية وكتابة الكود يدويا




**-------------------------
والان نقوم ببرمجة الزر الثالث والاخير
والذى اصطلحنا على تسميته مثلا
pause او Stop
ايهما يروق لك
Private Sub PauseToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PauseToolStripMenuItem.Click
اسفل السطر السابق نقوم بكتابة الكود التالى
AxWindowsMediaPlayer1.Ctlcontrols.pause()

End Sub

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

عقب كل تغيير لا تنسى الضغط على زر اف 5 ==== F5 ------ او دوس على حفظ من قائمة فايل اعلى برنامج الفجيوال بايسك


----------------------------
والان نقوم بالتجربة


والام ما الذى استفدته من الدرس السابق
--------
1- هذا المشروع لا يلبى مطالب الجميع -- لانه يعمل تحت منصفة الدوت نت فرام ويرك4 فقط
ولكن بقليل من الخطوات يمكننى جعله يعمل على اى جهاز ليس به النت فرام ويرك -- بل -- والعمل تحت اى CPU لاى جهاز متخلف حضاريا عن عام 2012
2- يمكن تحويل المشروع الى ملف سيت اب بكامل الملفات المساعدة " وهى ملفات الدل Dll"
3- يمكن اضافة ملف صوتى يعمل تلقائيا بمجرد تشغيل البرنامج كما تلاحظ الحال فى ال****
4- اذا اردت اى مشروع اخر فاكتب لى ردا بطلبك وسأحاول ان اقدمة لك اذا كنت اعرف طريقة تصميمه
5- الانسان غير مسؤل عن كامل تصرفاته الخبيثة فى الحياة -- ولا عن احلامة او كوابيسه
6- كلنا الى زوال يا اخوانى فى البشرية -- فلن العب دور مصلح اجتماعى كحصان عجوز لأقول لك اننا فى دولة ديموقراطية ودعونا نحب بعضنا الى حد الجنون
7- كما بدأت كلامة --- اختمة الان بعبارة
" اللهم لا سهل الا ما جعلته سهلا وانت تجعل الحزن ان شئت سهلا "

والسلام عليكم ورحمة الله وبركاتة