mehrnoosh_al62
شنبه 25 مهر 1388, 09:07 صبح
سلام دوستان
من تو برنامم دو تا PictureBox دارم:BackPic و SeccondPic که PictureBox دوم به صورت Transparent روی اولی قرار میگیره:
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
SeccondPic.BackColor = Color.Transparent
SeccondPic.SizeMode = PictureBoxSizeMode.StretchImage
BackPic.Controls.Add(SeccondPic)
End Sub
و با کد زیر PictureBox دوم رو حرکت میدم:
Private Sub SeccondPic_MouseDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles SeccondPic.MouseDown
Offset = New Point(-e.X, -e.Y)
End Sub
Private Sub SeccondPic_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles SeccondPic.MouseMove
If e.Button = Windows.Forms.MouseButtons.Left Then
Dim Pos As Point = Me.PointToClient(MousePosition)
Pos.Offset(Offset.X, Offset.Y)
SeccondPic.Location = Pos
End If
End Sub
حالا مشکل اینجاست که موقع حرکت PictureBox دوم در لایه Transparent یه لرزشی ایجاد میشه که میخوام این لرزش رو حذف کنم...
ممنون میشم راهنماییم کنید:خجالت:
من تو برنامم دو تا PictureBox دارم:BackPic و SeccondPic که PictureBox دوم به صورت Transparent روی اولی قرار میگیره:
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
SeccondPic.BackColor = Color.Transparent
SeccondPic.SizeMode = PictureBoxSizeMode.StretchImage
BackPic.Controls.Add(SeccondPic)
End Sub
و با کد زیر PictureBox دوم رو حرکت میدم:
Private Sub SeccondPic_MouseDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles SeccondPic.MouseDown
Offset = New Point(-e.X, -e.Y)
End Sub
Private Sub SeccondPic_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles SeccondPic.MouseMove
If e.Button = Windows.Forms.MouseButtons.Left Then
Dim Pos As Point = Me.PointToClient(MousePosition)
Pos.Offset(Offset.X, Offset.Y)
SeccondPic.Location = Pos
End If
End Sub
حالا مشکل اینجاست که موقع حرکت PictureBox دوم در لایه Transparent یه لرزشی ایجاد میشه که میخوام این لرزش رو حذف کنم...
ممنون میشم راهنماییم کنید:خجالت: