简单问题,在线等待: 鼠标滚轮控制FORM的上下滚动...........解决后立即结帖!!! (50分)

  • 主题发起人 主题发起人 希望
  • 开始时间 开始时间

希望

Unregistered / Unconfirmed
GUEST, unregistred user!
一个FORM上的内容太多,只好使用FORM的VertScrollBar,但是运行时,使用鼠标滚轮页面不能自动滚动,请教各位大侠,如何解决?
在ONMOUSEWHEELUP 或ONMOUSEWHEELDOWN事件中应该设置VertScrollBar的什么属性?
 
大哥,请详细点,我是菜鸟...
 
在onMouseWheelDown里
VertScrollBar.Position := VertScrollBar.Position + VertScrollBar.Increment;
在onMouseWheelUp里
VertScrollBar.Position := VertScrollBar.Position - VertScrollBar.Increment;
就OK了
 
用如下的方法解决
down:
VertScrollBar.Position := VertScrollBar.Position + 10
up:
VertScrollBar.Position := VertScrollBar.Position - 10
谢谢两位!!!
 
后退
顶部