معادل رویداد MouseMove در دلفی چیست

[fazelhacker1234]

معادل رویداد MouseMove در دلفی چیست
لطفا" یک کتاب آموزش دلفی برای مبتدی ها معرفی کنید تشکر

 

[saalek110]

http://www.parsiforums.com/delphi-f71.html
تالار بالا آموزش دلفی است.
ولی مخابرات بسته. سایتی برای عبور برایتان با پیام خصوصی می فرستم. البته برای استفاده از این سایت سرعت اینترنت بالا می خواهد. اگر با این سایت نتوانستید کار کنید خودتان وسیله دیگری پیدا کنید.

 

[saalek110]

در مورد سئوالتان به این سایت مراجعه کنید:
http://delphi.about.com/od/vclusing/a/mouseevents.htm

راهنمایی:
با رفتن به قسمت رویدادها در پنجره Object Inspector رویداد OnMouseMove را فعال کنید. و کد زیر را:

      if ssShift in Shift then
   Canvas.Ellipse(x-20,y-20,x+20,y+20)
  else if ssCtrl in Shift then
   Canvas.Rectangle(x-20,y-20,x+20,y+20) ;

در آن درج کنید.

حالا برنامه را اجرا کنید. با نگه داشتن شیفت و حرکت دادن ماوس دایره هایی روی فرم رسم شود و با نگه داشتن کنترل...