+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] كود لعدم خروج الفورم من الشاشة (/showthread.php?tid=14467)
كود لعدم خروج الفورم من الشاشة - محمد اسماعيل - 21-01-16
اريد كود لجعل البرنامج الفورم لايدخل في حواف الشاشة من اليمين او اليسار او اسفل بالتاسك بار
يعني حدود البرنامج حدود الشاشة الظاهرة مهما كان نوع الويندوز او اختلاف حجم الشاشة اثناء التشغيل
RE: كود لعدم خروج الفورم من الشاشة - silverlight - 21-01-16
يمكنك استخدام الروتين التالي
او يمكنك التعديل ف الكود بما يناسبك
عموما الكود سوف يعطيك فكرة جيدة عن كيفية تحجيم حركة الفورم علي شاشة الكمبيوتر
PHP كود :
Private Sub LimitMovementOnScreen(currentForm As Form)
Dim virtual As Rectangle = SystemInformation.VirtualScreen
Dim rect As Rectangle = currentForm.Bounds
Dim formLeft As Integer = rect.Left
Dim formTop As Integer = rect.Top
If formLeft + rect.Width > virtual.Width Then
formLeft = virtual.Width - rect.Width
End If
If formTop + rect.Height > virtual.Height Then
formTop = virtual.Height - rect.Height
End If
If formLeft < virtual.X Then
formLeft = virtual.X
End If
If formTop < virtual.Y Then
formTop = virtual.Y
End If
currentForm.Bounds = New Rectangle(formLeft, formTop, rect.Width, rect.Height)
End Sub
حاول تستخدمه في االحدث الخاص ب حركة الفورم مثل FormMove
و يتم استخدام الكود كالتالي
PHP كود :
LimitMovementOnScreen(Me)