سعود كتب :اخي الشاكي ممكن ايضاح الفرق بين الكود الذي اضفته وبين كود

كود :

[color=blue]my[/color].computer.screen.workingarea

إقتباس :gets the working area of the display. The working area is the desktop area of the display, excluding taskbars, docked windows, and docked tool bars.

إقتباس :جلب منطقة العمل في الشاشة ، منطقة العمل هي منطقة سطح المكتب ، ماعدا شريط المهام , النوافذ المركبة , وشريط الادوات

سعود كتب :بارك الله فيك .. لقد اوضحت شيء مهم بالنسبة لي ..
هل الكود التالي يعمل بكل الشاشات
ضمن حدث 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