PDA

View Full Version : نقاطی مشخص زوی تصویر



hamed_bostan
دوشنبه 14 آبان 1386, 08:53 صبح
با سلام خدمت دوستان خوب برنامه نویس
می خواستم ببینم ساده ترین روش برای اینکه روی یه نقشه یآ کلا یه عکس بتونم نقاطی رو داشته باشم که کاربر با کلید روی اونها یه سری اطلاعات خاص دریافت کنه چیه؟ نمونه برنامه ای یا چیز دیگه ای هم اگه موجود هست واسه ام لینکشو بذارین ممنون میشم . من در اصل می خوام کاربرم بتونه یه سری نقاط روی یه هکس مشخص کنه و در مورد اونها اطلاعات بده .
ممنون

amirsajjadi
دوشنبه 14 آبان 1386, 13:10 عصر
با سلام
فکر کنم با استفاده از رویداد MouseClick پیکچر باکس بشه


PublicClass Form1
Dim p() As Point = New Point() {New Point(10, 10), New Point(50, 60)}
Dim r AsNew Rectangle(10, 10, 130, 20)
PrivateSub PictureBox1_MouseClick(ByVal sender AsObject, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseClick
'به صورت نقطه ای
Dim pp As Point
ForEach pp In p
If Point.Equals(p, e.Location) = TrueThen
MsgBox(e.Location.ToString)
EndIf
Next
'به صورت ناحیه مستطیلی
If (e.X >= r.X AndAlso e.X <= r.X + r.Width) AndAlso ((e.Y >= r.Y AndAlso e.Y <= r.Y + r.Height)) Then
MsgBox(e.Location.ToString)
EndIf
EndSub
EndClass