AliRezaBeytari
چهارشنبه 02 اسفند 1391, 15:07 عصر
سلام دوستان.
اگر بازی های پازل رو دیده باشید وقتی که با موس یه عکس رو در جایی بر روی فرم رها می کند ؛ جای آن عکس به طور خود کار تنظیم میشود.
من برای حرکت اشیاء بر روی فرم از کد زیر استفاده می کنم:
Public Class Form1
Public x1, y1
Private Sub PictureBox1_MouseDown(sender As Object, e As MouseEventArgs) Handles PictureBox1.MouseDown
x1 = e.X
y1 = e.Y
End Sub
Private Sub PictureBox1_MouseMove(sender As Object, e As MouseEventArgs) Handles PictureBox1.MouseMove
If e.Button = Windows.Forms.MouseButtons.Left Then
Me.Left -= x1 - e.X
Me.Top -= y1 - e.Y
End If
End Sub
End Class
ولی نمیدونم چطوری مکان آن هار رو هنگام تغییر مکان تنظیم کنم؟؟
اگر بازی های پازل رو دیده باشید وقتی که با موس یه عکس رو در جایی بر روی فرم رها می کند ؛ جای آن عکس به طور خود کار تنظیم میشود.
من برای حرکت اشیاء بر روی فرم از کد زیر استفاده می کنم:
Public Class Form1
Public x1, y1
Private Sub PictureBox1_MouseDown(sender As Object, e As MouseEventArgs) Handles PictureBox1.MouseDown
x1 = e.X
y1 = e.Y
End Sub
Private Sub PictureBox1_MouseMove(sender As Object, e As MouseEventArgs) Handles PictureBox1.MouseMove
If e.Button = Windows.Forms.MouseButtons.Left Then
Me.Left -= x1 - e.X
Me.Top -= y1 - e.Y
End If
End Sub
End Class
ولی نمیدونم چطوری مکان آن هار رو هنگام تغییر مکان تنظیم کنم؟؟