منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
من المنتدى القديم - تحريك الفورم من اي مكان ( للاخ omar2205 ) - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم مقالات VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=184)
+--- الموضوع : من المنتدى القديم - تحريك الفورم من اي مكان ( للاخ omar2205 ) (/showthread.php?tid=7042)



من المنتدى القديم - تحريك الفورم من اي مكان ( للاخ omar2205 ) - المبرمج علي نوري - 19-11-12


[COLOR="#FF0000"]السلام عليكم

من المنتدى القديم - تحريك الفورم من اي مكان ( للاخ omar2205 )
[/COLOR]

-----------------------------------------

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

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

الكود بسيط جداً وممكن يستخدم لتحريك اي اداة

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

كود :
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


وادناه كود لتحريك panal

[HTML] 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[/HTML]



الكود يجبان يوضع في الحدث MouseDown في اي اداة او فورم

وهذا الكود بدون ان يضاف لاي اداة

كود :
CType(sender, Control).Capture = False
        WndProc(Message.Create(CType(sender, Control).Handle, 161, 2, 2))



من المنتدى القديم - تحريك الفورم من اي مكان ( للاخ omar2205 ) - badis - 22-11-12

بارك الله فيك.


RE: من المنتدى القديم - تحريك الفورم من اي مكان ( للاخ omar2205 ) - otman_bel - 16-08-15

السلام عليكم و رحمة الله
لك الشكر أخي