سعود كتب :بارك الله فيك .. لقد اوضحت شيء مهم بالنسبة لي ..
هل الكود التالي يعمل بكل الشاشات
ضمن حدث Move للفورم المراد تحريكه
كود :
Dim TaskBarHeight As Integer = Screen.PrimaryScreen.Bounds.Height - Screen.PrimaryScreen.WorkingArea.Height
If Me.Top <= Screen.PrimaryScreen.Bounds.Height - Me.Height - TaskBarHeight Then
Form1.btnup.Enabled = False
Form1.btndown.Enabled = True
Form1.Timer1.Stop()
ElseIf Me.Top >= Screen.PrimaryScreen.Bounds.Height Then
Form1.btnup.Enabled = True
Form1.btndown.Enabled = False
Form1.Timer2.Stop()
End If
الخاصية PrimaryScreen تعني "الشاشة الرئيسية"
مثلا لو قمت انا بتوصيل الجهاز بشاشة حجمها 5030 * 3020
لما قمت بطلب الخاصية PrimaryScreenPrimaryScreen.Bounds.Width
مارح بطلع ليي عرض الشاشة الموصلة (5030)
بل سيظهر لي حجم شاشة الجهاز الرئيسي مثلا عندي في جهازي عرض شاشتي (730)
هناك خاصية تسمى AllScreen تقوم بجلب جميع الشاشات الموصلة بالجهاز
ولمعرفة ذلك قم بالذهاب الى المسار التالي :
Control Panel\Appearance and Personalization\Display\Screen Resolution
وستعرف كم شاشة موصلة في جهازك وايضا شاشتك الرئيسية
في الحقيقة allscreen يستخدمها اولائك الذين يوصلون الكثير من الشاشات بجهاز واحد مثل محلات بيع الشاشات
ملاحظة : كل الي ذكرته من جيبي فأنا لم اجرب هذه الامور

