PDA

View Full Version : سوال: تشخیص برخورد دو کنترل



sagggad
پنج شنبه 07 آذر 1392, 18:58 عصر
سلام دوستان من با یه کدی دوتا پیکچر باکس رو حرکت میدم حالامی خوام وقتی دوتا پیکچرباکس باهم برخورد میکن یعنی در هنگام حرکت یه نقطه از یه پیکچرباکس با یه نقطه دیگه از پیکچرباکس دیگه یکی میشه MSgbox یه پیغامی رو نشون بده.آیا تابع خاصی یا کدی برای این موضوع هست؟؟؟ممنون میشم از راهنماییتون!:تشویق::تشویق::م تفکر:

sagggad
پنج شنبه 07 آذر 1392, 21:22 عصر
بابا تو رو خدا جواب بدین

aliagamon
پنج شنبه 07 آذر 1392, 22:08 عصر
خدمت شما:شما میتونید با ساختن دوتا rectangle و بررسی همپوشانیشون (intersecs) بفهمی نقطه ای روشون باهم تلاقی داره یا نه ....

Dim RectPicBox1 As New Rectangle(PictureBox1.Left, PictureBox1.Top, PictureBox1.Width, PictureBox1.Height)
Dim RectPicBox2 As New Rectangle(PictureBox2.Left, PictureBox2.Top, PictureBox2.Width, PictureBox2.Height)
If RectPicBox1.IntersectsWith(RectPicBox2) Then
MessageBox.Show("Intersects")
End If