| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1049 人关注过本帖
标题:表单内容过多,我想实现上下滚动条录入资料。请教怎么实现?
只看楼主 加入收藏
sam_jiang
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:14
帖 子:806
专家分:1231
注 册:2021-10-13
收藏
得分:0 
回复 3楼 weiyisc
form有个scollbars属性,就是用来显示窗口上显示不下的控件或内容的。
container没有这个属性,我记差了,呵呵。但是可以自己写个模拟鼠标或键盘操作,然后给container里所有的控件的top属性增加或减少某个值就可以实现。。。
2023-07-01 12:12
shenlancwz
Rank: 2
等 级:论坛游民
威 望:3
帖 子:52
专家分:70
注 册:2018-11-7
收藏
得分:3 
回复 11楼 sam_jiang
这个点子也不错,按这个思路做了测试,好用。
*Thisform.MouseWhell

LPARAMETERS nDirection, nShift, nXCoord, nYCoord
IF nDirection>0  &&向上滚动
    FOR nCount = 1 TO  This.ControlCount
        cControlName = This.Controls[nCount].name
        This.&cControlName..top=This.&cControlName..top+10
    ENDFOR
ELSE      &&向下滚动
    FOR nCount = 1 TO  This.ControlCount
        cControlName = This.Controls[nCount].name
        This.&cControlName..top=This.&cControlName..top-10
    ENDFOR
ENDIF


[此贴子已经被作者于2023-7-1 15:43编辑过]

收到的鲜花
  • sam_jiang2023-07-01 19:32 送鲜花  1朵  
2023-07-01 14:40
sam_jiang
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:14
帖 子:806
专家分:1231
注 册:2021-10-13
收藏
得分:0 
回复 12楼 shenlancwz
可以记录container里所有控件的top属性,以便当你离开这个控件,再重新返回这个控件后,可以快速定位。
2023-07-01 19:35
shizi0
Rank: 6Rank: 6
等 级:侠之大者
威 望:4
帖 子:142
专家分:411
注 册:2012-10-2
收藏
得分:3 
滚动操作,总感觉不太舒服。内容太多的话,也许页框归类更贴合使用习惯。
2023-07-02 16:07
laowan001
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:66
帖 子:1094
专家分:2693
注 册:2015-12-30
收藏
得分:3 
grid.view = 3
这样可以吗?
2023-07-02 21:11
快速回复:表单内容过多,我想实现上下滚动条录入资料。请教怎么实现?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.155083 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved