| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1645 人关注过本帖
标题:当表格中记录较少时,为什么表格中只显示最后一条记录?
只看楼主 加入收藏
亮亮贝
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2017-2-1
结帖率:100%
收藏
已结贴  问题点数:20 回复次数:9 
当表格中记录较少时,为什么表格中只显示最后一条记录?
当表格中记录较少时,如只5条记录,为什么表格中只显示最后一条记录,其它记录在上面隐藏着,我想表格刷新后显示所有记录,怎么办?
搜索更多相关主题的帖子: 记录 
2017-02-01 16:03
lljchi
Rank: 2
等 级:论坛游民
帖 子:172
专家分:95
注 册:2016-7-21
收藏
得分:7 
go top
2017-02-01 16:13
亮亮贝
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2017-2-1
收藏
得分:0 
可是用GO TOP后,当记录多时却把下面的记录隐藏了!
2017-02-01 16:33
亮亮贝
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2017-2-1
收藏
得分:0 
我是想记录少时显示所有记录,多时,显示后面十多条记录。最好是不变动记录号!
2017-02-01 16:34
亮亮贝
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2017-2-1
收藏
得分:0 
我是这样做的,但不理想:
在表格的REFRESH中写如下代码
if RECcount()<15
go top
else
go reccount()-10
endif
这样做改变了记录号!
2017-02-01 16:43
xinjie
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:19
帖 子:271
专家分:520
注 册:2007-8-11
收藏
得分:7 
你试一下:

程序代码:
Go top
Refresh
For m.i = 1 to Reccount() - 10
    Grid.DoScroll(1)
EndFor 


这个方法应该可以,如果要速度快,就翻页+滚动

[此贴子已经被作者于2017-2-1 18:09编辑过]

2017-02-01 18:07
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10538
专家分:42927
注 册:2014-5-20
收藏
得分:7 
        *表单自定义方法:_SetCell(nRow, nCol, nRecno)
        *功能:设定GRID的第nRow行显示第nRecno条记录,nCol决定nRow行的活动单元格。
    FUNCTION _SetCell(nRow, nCol, nRecno)
        IF nRow <= nRecno   
            GO nRecno
            this.grid1.SetFocus
            this.grid1.ActivateCell(nRow, nCol)
            DO WHILE RECNO() != nRecno
                this.grid1.DoScroll(IIF(RECNO() < nRecno, 1, 0))
                this.grid1.SetFocus
                this.grid1.ActivateCell(nRow, nCol)
            ENDDO
        ENDIF
    ENDFUNC

    假设GRID一屏显示10行
        *当我的dbf指针指向dbf的第15个记录时,我希望grid中第一行显示第6行记录,最后一行显示15号记录
        thisform._SetCell(10, 2, 15)
        *当我的dbf指针指向dbf的第5个记录时,我希望grid中第一行显示第1行记录,最后一行显示10号记录   
        thisform._SetCell(5, 1, 5)
 
2017-02-01 20:41
tlliqi
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:204
帖 子:15453
专家分:65956
注 册:2006-4-27
收藏
得分:0 
传上来 帮你看看
2017-02-01 23:21
亮亮贝
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2017-2-1
收藏
得分:0 
版主吹水佬的很全面!
2017-02-03 15:56
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9798
专家分:26886
注 册:2012-2-5
收藏
得分:0 
假如表格每页显示15条记录
if RECcount()<=15
    go top
else
    go reccount()-14
endif

坚守VFP最后的阵地
2017-02-14 09:31
快速回复:当表格中记录较少时,为什么表格中只显示最后一条记录?
数据加载中...
 
   



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

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