الدرس الثاني عن المحاكاة ( محاكة الفأرة ) شرح كامل

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

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

الرمز PHP:
MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

ينفذ هذا الحدث فور الضغط على الأداة لتجربه هذا الحدث افتح برنامج فيجوال بيسك واكتب الكود الأتي
الرمز PHP:
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
MsgBox "Your Text"
End Sub

جرب تشغيل البرنامج بالنقر على زر F5 بالكيبورد وبعد ذلك اضغط إي زر من الأزرار على واجهة الفورم لتلاحظ تنفيذ الحدث مباشرة وتنفيذ الكود الذي كتبنه الذي يعرض الرسالة بالحال حسنا ألان نود إن نتعرف على المتغيرات الموجودة داخل هذا الحدث وما وظيفة كل متغير وما عمله أولا المتغير Button يعمل هذا المتغير وضيفه المتغيران KeyCode و KeyAscii في إحداث الكيبورد فهو يقوم بخزن رمز معين للزر الذي تم ضغطه بالفائر وإما بالنسبة للمتغير Shift فهو يقوم بخزن قيمة ما لتعلمنا إذا ما كان المستخدم ضاغط زر Shift إثناء الضغط بالفائر أم لا وبالنسبة للمتغيران X و Y فهما متغيران لخزن موقع الفائرة فالمتغير X يقوم بخزن الموقع الأفقي للمكان الموجودة فيه الفائرة وبالنسبة للمتغير Y فهو يخزن الموقع ألعامودي التي توجد فيه الفائرة ألان كيفية نستطيع معرفة رمز كل زر من أزرار الفائرة الجواب سهل نستخدم نفس الطريقة في الشرح السابق نقوم بكتابة أمر لعرض رسالة لنا بقيمة المتغير Button الذي يحمل رمز الزر المضغوط وبهذه الطريقة نقوم قد حصلنا على رمز كل زر نبدأ بكتابة الكود كآلاتي
الرمز PHP:
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single(
MsgBox Button
End Sub

جرب تشغيل البرنامج وأضغط زر ألأيمن وبعدها الأيسر ولاحظ القيم كيف نستطيع استخدامها بعد أن عرفنا رمز كل زر سوف نستطيع أن ننفذ أجراء معين حسب الزر الذي قد يضغطه المستخدم فمثلا لو أردنا إن يقوم البرنامج بعرض رسالة فقط لو قام المستخدم بضغط الزر الأيمن نقوم بالأتي أولا نتحقق من رمز زر الفائرة الأيمن الذي هو = 2 وبعد ذلك نبدأ بكتابة جملة ألاف إذا كان المتغير Button الذي يحمل قيمة وهي رمز المفتاح المضغوط بالفائرة = 2 فقم بالاتي يكون الكود هكذا
الرمز PHP:
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single(
If Button = 2 Then
MsgBox "Ahmed Feras "
End If
End Sub

وجرب تشغيل البرنامج لتلاحظ أن الرسالة لا تظهر ألا في حالة كان الزر هو زر الفائرة الأيمن ألان انتهينا من شرح المتغير ألأول وعرفنا كيفية استخدامه بالإضافة إلى تنفيذ حدث حسب الزر الذي ضغطه ألان ننتقل للمتغير التالي المتغير Shift كما ذكرت هو يقوم بحمل قيمة رقمية تمثل فيما أذا كان المستخدم قد ضغط زر Shift أثناء ضغطه لزر بالفائرة أم لم يقم لمعرفة القيم في حال قام والقيمة في حال لم يقم نتبع الطريقة السابقة التي تقوم بعرض رسالة لقيمة المتغير نكتب الكود ألأتي
الرمز PHP:
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single(
MsgBox Shift
End Sub

نجرب في المرة الأولى ضغط الزر من دون ضغط زر Shift بالكيبورد معه لنلاحظ أن القيمة تكون صفر دائما بغض النظر عن الزر المضغوط بعد ذلك نضغط زر Shift سواء الأيمن أو الأيسر في الكيبورد مع استمرار الضغط وبعدها نضغط أي زر من أزرار الفائرة على الفورم لنلاحظ ظهور رسالة تخبرنا بان القيمة قد تغيرت وأصبحت = 1 وهذه ميزة يمكن استخدامها لبرنامجك ويمكنك كتابة الكود بنفس الصور السابقة إليك مثال بسيط
الرمز PHP:
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single(
If Shift = 1 Then
MsgBox "You Click Shift Button"
Else
MsgBox "You Did not Click Shift Button"
End If
End Sub

الفكرة كالسابق أذا كانت قيمة المتغير = كذا قم ببالاتي وإذا لم تكن كذا قم بالاتي ألان انتهينا من أول متغيران وهما Button و ألــ Shift ألان بقى المتغيران البسيطان X وألــ Y اللذان يعطيان موقع الفائرة لن أشرح عنهما لأنهما بغاية البساطة كل ما فيهما أنهما يعطيان قيم تمثل موقع الفائرة داخل الفورم ( واجهة البرنامج ) جرب الكود ألأتي وسوف تفهم بإذن الله
الرمز PHP:
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single(
MsgBox X
MsgBox Y
End Sub

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

الرمز PHP:
MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

يتم تفجير هذا الحدث فور تحرك الفائرة فوق الفورم والمتغيرات التي فيه نفس السابقة وبنفس ألاستعمال

الحدث الأخير الحدث :

الرمز PHP:
MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)

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

» تعليم بي اتش بي PHP الدرس الاول
» للايت سي عبارة هذ الرابط الثاني وهو عباره عن ورده