以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  鼠标滚轮问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=82356)

--  作者:jialihaha
--  发布时间:2016/3/16 14:06:00
--  鼠标滚轮问题
如何实现,在某个窗口中,鼠标滚轮滚动时,可以控制某个表上下换行?
--  作者:大红袍
--  发布时间:2016/3/16 14:20:00
--  

绑定事件,然后想写什么都可以

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=41235&skin=0

 


--  作者:大红袍
--  发布时间:2016/3/16 14:21:00
--  

控制table显示位置代码参考

 

Dim t As Table = e.form.controls("table1").Table
If t.BottomVisibleRow = t.Rows.Count - 1 Then
    t.TopVisibleRow = 0
Else
    t.TopVisibleRow += 1
End If


--  作者:jialihaha
--  发布时间:2016/3/16 14:24:00
--  
我试用版过期了,打开不了,有没有开发版的?或者告诉我怎么绑定事件
[此贴子已经被作者于2016/3/16 14:24:43编辑过]

--  作者:大红袍
--  发布时间:2016/3/16 15:38:00
--  
以下是引用jialihaha在2016/3/16 14:24:00的发言:
我试用版过期了,打开不了,有没有开发版的?或者告诉我怎么绑定事件
[此贴子已经被作者于2016/3/16 14:24:43编辑过]

 

下载一个商业版安装,你就可以打开.table的项目啊。在下载开发版的地方下载。


--  作者:jialihaha
--  发布时间:2016/3/16 16:16:00
--  
我用了,在内部函数写了,再到窗口afterload写了代码,可是确定保存报错:未声明名称“MyMouseWheel”,怎么解决呢
--  作者:大红袍
--  发布时间:2016/3/16 17:10:00
--  

你去看看人家全局代码写了什么?

 

http://www.foxtable.com/help/topics/1842.htm