منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
استفسار بالنسبة للحدث MouseLeave والحدث MouseMove - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : استفسار بالنسبة للحدث MouseLeave والحدث MouseMove (/showthread.php?tid=8921)

الصفحات: 1 2 3


استفسار بالنسبة للحدث MouseLeave والحدث MouseMove - ali.alfoly - 17-05-13

السلام عليكم
هذه الاحداث انا عامل UserControl
وفى هذه الاحداث الخاصه به عند دخول الموس عليه يتغير لونه وعند ابتعاد الموس عنه يتغير لونه

المشكله هى
انى وضعت Label وعند دخول الموس على Label يعتبر انك خرجت بالموس من على UserControl
اريد الحدث لا يتغير طالما انك داخل UserControl سواء وقفت على Label او لا


استفسار بالنسبة للحدث MouseLeave والحدث MouseMove - Abu Ehab - 17-05-13

السلام عليكم
اولا أنا مش فاهم : هو انت عايز تطور Label ولاااااا عايز تصنع Label ? ..... خلي بالك :. في فرق كبير بينهــــــــا طبعـــــــــــا .
المهم :
أنت عندما تستخدم UserControl أنت عمليــــــــا بتتاعمل معاها لأنها حاضنة أداوات فقط ,,, وكل الخصائص متعلقه بها وطبيعي لما تخرج من أطار اليبل سينتقل التركيز للكنترول نفسه
مع أني دائما بانصح تستخدم Widows Forms Control Library وكل المطلوب منك تعمل Delete للـ UserControl وتضيف Class جديد وتعمل Inherits .... بس خلاااص

لا تسألنى
Wink .. لأني هربت من النظام الذي بشتغل عليه .. وقلت أدخل أساعدكم لمدة ساعتين فقط .
موضوع الاداوات سهل وانا عملت 5 أمثلة في المنتدى .... راجعها





استفسار بالنسبة للحدث MouseLeave والحدث MouseMove - ali.alfoly - 17-05-13

ليس هذا ما اقصده على الاطلاق
انا اقصد ركز معى
مثلا عند دخول الموس الى Form1 يتولد حدث Form1.MouseMove عند ابتعاد الموس عن Form1 يتولد جدث Form1.MouseLeave
عند مرور الموس فوق اى عنصر موجود على Form1 يتم حدوث Form1.MouseLeave
وهذا ما لا اريده
ما اريده هو
عند اقتراب الموس من الفورم يتغير لون الفورم وعند ابتعاد الموس من على الفورم يتم تغير اللون مره اخرى
عند مرور الموس فوق اى عنصر على الفورم مثل ليبل يعتبر انك خرجت من على الفورم ويتغير لونه وهذا وا لا اريده اريد طالما الموس داخل الفورم يثبت على لون معين سواء الموس على ليبل او على ليست بوكس او على الفورم مباشر فهو يعتر على الفورم
وجزاك الله خير


استفسار بالنسبة للحدث MouseLeave والحدث MouseMove - سعود - 17-05-13

طيب ايش رايك تجرب حدث
Form1_MouseEnter


استفسار بالنسبة للحدث MouseLeave والحدث MouseMove - ali.alfoly - 18-05-13

نفس المشكلة اخى سعود
مرفق ملف لفهم المشكلة


استفسار بالنسبة للحدث MouseLeave والحدث MouseMove - learning.net - 18-05-13

اخى
انا لا اعرف الحل
ولكن هناك طريقه يمكن ان تنفعك
يمكنك اضافة ال controls الموجوده على الفورم الى الحدث الذى تريده
يعنى مثلا فى مثالك انت واضع هذا الكود

PHP كود :
Private Sub Form1_MouseMove(ByVal sender As System.ObjectByVal e As System.Windows.Forms.MouseEventArgsHandles MyBase.MouseMove
        Me
.Opacity 1
    End Sub 

يمكنك ان تضيف ال controls الموجوده على الفورم الى الحدث كالأتى
PHP كود :
Private Sub Form1_MouseMove(ByVal sender As System.ObjectByVal e As System.Windows.Forms.MouseEventArgsHandles MyBase.MouseMoveButton1.MouseMove
        Me
.Opacity 1
    End Sub 

طبعا اضافة الكائنات الى الاحداث قد شرحها مشكورا اخى sooriaty03 فى هذه المشاركه
http://vb4arb.com/vb/showthread.php?5322-كفية-جلب-اسم-الزرار-عند-الضغط-عليه

ارجو ان تفيدك الطريقه
وبالتوفيق ان شاء الله


استفسار بالنسبة للحدث MouseLeave والحدث MouseMove - ali.alfoly - 18-05-13

جزاك الله خير اخى [b]learning.net[/b]
جعله الله تعالى فى موازين حسناتك يوم تلقاه
ارجو من الاخوة التعاون معى لوجود حل نهائى لهذه المشكلة


استفسار بالنسبة للحدث MouseLeave والحدث MouseMove - ali.alfoly - 18-05-13

up up up up


استفسار بالنسبة للحدث MouseLeave والحدث MouseMove - سعود - 19-05-13

طيب ممكن تشوف الحدث اللي قلت لك عليه من غير حدث leav فقط enter


استفسار بالنسبة للحدث MouseLeave والحدث MouseMove - سعود - 19-05-13

كود :
Private Sub Form1_Activated(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Activated        Me.BackColor = Color.GreenYellow
    End Sub


    Private Sub Form1_Deactivate(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Deactivate
        Me.BackColor = Color.BurlyWood


    End Sub