[RaggiTech]

كاتب الموضوع : أحمد جمال

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

أمثلة أحداث الماوس :

أولاً لمعرفة الزر المضغوط من الماوس ، سنذهب إلى الحدث MouseDown من Properties

ومن ثم نكتب الكود التالي :
C#:

كود :

[FONT=Tahoma] if (e.Button == MouseButtons.Left)
MessageBox.Show("Left click");
if (e.Button == MouseButtons.Right)
MessageBox.Show("Right click");
if (e.Button == MouseButtons.Middle)
MessageBox.Show("Middle click");[/FONT]

vb.net:

كود :

[FONT=Tahoma]If e.Button = MouseButtons.Left Then
MessageBox.Show("Left click")
End If
If e.Button = MouseButtons.Right Then
MessageBox.Show("Right click")
End If
If e.Button = MouseButtons.Middle Then
MessageBox.Show("Middle click")
End If [/FONT]

ولمعرفة النقطة التي يمر عليها الماوس مثلاً في حدث MouseMove :
C#:

كود :

[FONT=Tahoma]this.Text = "X: " + e.X + ", Y:" + e.Y;[/FONT]

vb.net:

كود :

[FONT=Tahoma]Me.Text = "X: " + e.X + ", Y:" + e.Y [/FONT]

[RaggiTech]

أحداث الكيبورد :

لقراءة الحدث الخاص بالزر المضغوط نكتب الأمر التالي مثلاً في حدث key_up :
C#:

كود :

this.Text="key: " + e.KeyCode.ToString();

vb.net:

كود :

Me.Text = "key: " + e.KeyCode.ToString()

ولكن لمعرفة ما إذا كان هناك زر آخر مضغوط مثلاً مع الزر الحالي ، سنضع الزر الأول في key والثاني في Modifier بالشكل التالي :
C#:

كود :

[FONT=Tahoma]this.Text = string.Format("Key: {0} Modifier: {1}",e.KeyCode.ToString(), e.Modifiers.ToString());[/FONT]

vb.net:

كود :

[FONT=Tahoma]Me.Text = String.Format("Key: {0} Modifier: {1}", e.KeyCode.ToString(), e.Modifiers.ToString()) [/FONT]

طبعاً لا داعي لاخبارك ان بامكانك قراءة الأحداث باستخدام IF وتنفيذ بعض العمليات بناء عليها ...

إلى هنا نكون قد انتهينا من هذا الدرس السريع ، في الدرس القادم سنبدأ بالتعرف على GDI+ .

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