12-12-17, 07:22 PM
(آخر تعديل لهذه المشاركة : 12-12-17, 08:28 PM {2} بواسطة طالب برمجة.)
هذه طريقة أخرى ما رأيك؟
اعمل مشروع جديد وضع Form1 فيه 3 buttons
وأضف Form2 لاستخدامه بدل ال panel مع تحديد حجم مناسب له مثل (150x100) مع جعل الاطار None وتفعيل TopMost مع Opacity 80% وخلفية صفراء (كاقتراح)
والفكرة قابلة للتطوير
اعمل مشروع جديد وضع 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

