ورود

View Full Version : استفاده از Wheel موس براي Scroll كردن فرم


mojtaba_z
دوشنبه 26 مهر 1389, 09:45 صبح
سلام
چطوري با استفاده از Wheel موس ميشه توي يك فرم عمل Scroll رو انجام داد؟
MohsenB
دوشنبه 26 مهر 1389, 10:47 صبح
سلام

یکی از رویدادهای فرم همین چیزیه که شما میخواید

ولی برا هر شیئی نداره

ولی بعضی کامپوننت های سایر شرکت ها برا اشیائشون جداگونه دارن

البته می تونید برا یک شئی این روبداد رو تعریف کنید .
nilidelphi
دوشنبه 26 مهر 1389, 12:31 عصر
رویداد :

OnMouseWheelDown
&
OnMouseWheelUp

رو می تونید هندل کنید.
Felony
دوشنبه 26 مهر 1389, 13:03 عصر
کد زیر رو در رویداد OnMouseWheel فرم مورد نظر بنویس :

if WheelDelta< 0 then
Self.VertScrollBar.Position:= (Self.VertScrollBar.Position+10)
else
Self.VertScrollBar.Position:= (Self.VertScrollBar.Position-10);