Topic: MouseWheel event
Hi,How to use MouseWheel envent to scroll the form?
Thank you!
My Visual Database → General → MouseWheel event
Hi,How to use MouseWheel envent to scroll the form?
Thank you!
Hello.
Please download latest version, I have added event OnMouseWheel for form
https://www.dropbox.com/s/f3j4kfpnttm1o … b.zip?dl=0
Example project:
It does make the button to move, not the entire content of the form to scroll. How to you make the form scrolling with your method?
It does make the button to move, not the entire content of the form to scroll. How to you make the form scrolling with your method?
Change this line
if WheelDelta > 0 then Form1.Button1.Top := Form1.Button1.Top - 4 else Form1.Button1.Top := Form1.Button1.Top + 4;
to
if WheelDelta > 0 then Form1.VertScrollBar.Position := Form1.VertScrollBar.Position - 4 else Form1.VertScrollBar.Position := Form1.VertScrollBar.Position + 4;
My Visual Database → General → MouseWheel event
Powered by PunBB, supported by Informer Technologies, Inc.
Theme Hydrogen by Kushi