رویداد ماوس

[سونامی]

چگونه می توان برنامه ای نوشت که هر جایی کلیک کردیم دایرهای رنگی(در هر محیط فقط یک رتگ) رسم کند در ضمن محیط فرم را به چهار قسمت تقسیم کند ؟

 

[saalek110]

http://www.majidonline.com/forum/showthread.php?t=33717&page=12
پستهای این صفحه را ببین.
فکر کنم کمک کند.

 

[سونامی]

میشه کمک بیشتر بکنی(ثواب داره)

 

[saalek110]

در آدرسی که دادم با رویدادهای مختلفی کار شده. مثل MouseMove و MouseDown .
ولی برای کار شما فکر کنم همان MouseDown مناسب است.
در پنجره کد ابتدا فرم را انتخاب و سپس رویداد MouseDown را انتخاب کنید.
چنین کدی اتوماتیک ساخته می شود:

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

End Sub

که همان روال پاسخ به رویداد پایین بودن ماوس است. چند پارامتر در اختیار ماست که ما با X و Y کار می کنیم.
می دانید هر کدی در این رویداد بنویسیم با وقوع این رویداد یعنی پایین رفتن ماوس اجرا می شود.
من کد زیر را اضافه می کنم:

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Circle (X, Y), 100
End Sub

که باعث می شود که دایره هایی در محل کلیک ماوس رسم شود.

 

[saalek110]

http://msdn.microsoft.com/en-us/library/aa716268(VS.60).aspx

حالا شما به آدرس بالا بروید و سعی کنید تمرین خود را حل کنید. در آدرس بالا سینتکس کاملتری ارائه شده. مثل رنگ .
و همچنین با طول و عرض فرم کار شده.