[Rabeea Qbaha]

مرحبا شباب 

عندي from يحتوي عى عدد من ال buttons تمثل التخطيط الواقعي لعده محلات تجاريه على الواقع، كل button فيها رقم المحل 

ما اريده هو ان أضع panel في ال form و هذا ال panel  يتغير موقعه حسب موقع ال buttons  ليظهر بيانات المحل،

الموضوع هنا سهل الى الأن وهو بتغير الموقع الخاص بال panel  حسب الموقع الخاص بال buttons  

المشكله هي عند ال buttons  التي في الاعلى و التي في الاطراف سوف يخرج ال panel  خارج نطاق ال from 

كيف استطيع التحكم به بطريقه سهله وشكرا 

و اذا كان عند احدكم فكره اسهل من ال panel لتظهر البيانات عند دذول مؤشر الفارة لل button ساكون مسرور 

مع العلم اني لا اريد عمل هذا الموصوع لكل button  منفردة اريد عمل الشيء لجميع ال buttons في كود واحد وشكرا

[طالب برمجة]

لم تبين في الصورم شكل ظهور ال panel

---

احسب مكان ظهور الpanel حسب حجم الفورم بحيث لا يتجاوز حدود الفورم

---

ضع كود إظهار الpanel

---

استخدم ToolTip

[Rabeea Qbaha]

شكرا على الرد، 

ToolTip حجمها و شكلها لا يناسب ما اريد.


احسب مكان ظهور الpanel حسب حجم الفورم بحيث لا يتجاوز حدود الفورم.


هل لديك الطريقه ؟؟

[طالب برمجة]

هذه طريقة أخرى ما رأيك؟
اعمل مشروع جديد وضع Form1 فيه 3 buttons
وأضف Form2 لاستخدامه بدل ال panel مع تحديد حجم مناسب له مثل (150x100) مع جعل الاطار None وتفعيل TopMost مع Opacity 80% وخلفية صفراء (كاقتراح)

PHP كود :

Public Class Form1

    Private Sub Button_MouseLeave(ByVal sender As Object, ByVal e As EventArgs) _
    Handles Button1.MouseLeave, Button2.MouseLeave, Button3.MouseLeave
        Form2.Hide()
    End Sub

    Private Sub Button_MouseMove(ByVal sender As Object, ByVal e As MouseEventArgs) _
    Handles Button1.MouseMove, Button2.MouseMove, Button3.MouseMove
        ShowDetails(sender)
    End Sub

    Sub ShowDetails(ByVal btn As Button)
        Dim pnt As New Point(MousePosition.X + 5, MousePosition.Y + 5)
        If pnt.X + Form2.Width > Screen.PrimaryScreen.WorkingArea.Width Then pnt.X = MousePosition.X - Form2.Width - 5
        If pnt.Y + Form2.Height > Screen.PrimaryScreen.WorkingArea.Height Then pnt.Y = MousePosition.Y - Form2.Height - 5
        Form2.TopMost = True
        Form2.Location = pnt
        Form2.Show()
    End Sub

End Class 


والفكرة قابلة للتطوير

[Rabeea Qbaha]

شكرا صديقي طالب البرمجة قمت بأستخدام customtooltip 
وهي جيدة نوعا ما، شكرا لك للتفاعل.