تحريك الفورم من اى مكان فيها -) - نسخة قابلة للطباعة

كاتب الموضوع : omar2205

بسم الله الرحمن الرحيم

تحريك اى فورم بدون اى مشاكل انشاء الله

الكود بسيط اوى وممكن يستخدم لتحريك اى اداه

لتحريك الفورم

كود :

Private Sub Form1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseDown

CType(sender, Control).Capture = False

WndProc(Message.Create(CType(sender, Control).Handle, 161, 2, 2))

End Sub

وده مثال لتحريك Panel

كود :

Private Sub Panel1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Panel1.MouseDown

CType(sender, Control).Capture = False

WndProc(Message.Create(CType(sender, Control).Handle, 161, 2, 2))

End Sub

الكود لازم يتحط فى الحدث MouseDown فى اى اداه او فورم

وده الكود بدون ان يضاف لاى اداه

كود :

CType(sender, Control).Capture = False

WndProc(Message.Create(CType(sender, Control).Handle, 161, 2, 2))

وكده تحريك الفورم بقى سهل اوى كود مكون من سطرين

سلام