标题:在grid中用命令按钮如何实现记录的上移和下移
只看楼主
songyuyu
Rank: 8Rank: 8
等 级:贵宾
威 望:47
帖 子:6090
专家分:25
注 册:2007-1-17
得分:0 
.我上面的再修改一下就可以达到你要的功能了

你自己试改一下

我喝水只喝纯净水,牛奶只喝纯牛奶,所以我很单纯……
2007-05-17 16:34
thisform
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2007-5-4
得分:0 
谢谢,我自己先试下.
2007-05-17 16:36
songyuyu
Rank: 8Rank: 8
等 级:贵宾
威 望:47
帖 子:6090
专家分:25
注 册:2007-1-17
得分:0 
功能都是差不多的
先获取当前记录的RECNO号

要向下移,就在RECNO+2那插入,然后删了当前RECNO()


我喝水只喝纯净水,牛奶只喝纯牛奶,所以我很单纯……
2007-05-17 16:38
songyuyu
Rank: 8Rank: 8
等 级:贵宾
威 望:47
帖 子:6090
专家分:25
注 册:2007-1-17
得分:0 
下班了,你自己试吧

我喝水只喝纯净水,牛奶只喝纯牛奶,所以我很单纯……
2007-05-17 16:38
thisform
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2007-5-4
得分:0 
用什么命令在当前记录后插入recno()-1的记录呀,append from只能在最后插入记录呀.
2007-05-17 17:04
wzxc
Rank: 9Rank: 9Rank: 9
来 自:齐鲁大地
等 级:贵宾
威 望:39
帖 子:985
专家分:1296
注 册:2006-4-25
得分:0 
grid控件与a table绑定后,就会按照一定的顺序(物理顺序或者索引顺序)逐行显示表中的记录。
楼主的意思,不能有索引,或者关掉索引。
可以这样搞,试试看
上移
scatter memvar
insert blank before
Gather Memvar
skip
delete
pack
thisform.grid1.refresh
下移
scatter memvar
insert blank
Gather Memvar
skip -1
delete
pack
thisform.grid1.refresh
未经验证,请自己调试。

认真看书学习,弄通Fox主义。
2007-05-17 17:56
thisform
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2007-5-4
得分:0 
这样好像有点别扭,首先pack就不好用,grid的数据源要设计好。
2007-05-17 20:21
wzxc
Rank: 9Rank: 9Rank: 9
来 自:齐鲁大地
等 级:贵宾
威 望:39
帖 子:985
专家分:1296
注 册:2006-4-25
得分:0 
哦,对了,一旦pack了,就空白了。
可以设置一下set delete on
退出时
set delete off
pack
你的这种要求就特别扭!

认真看书学习,弄通Fox主义。
2007-05-17 21:05



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-140163-1-1.html




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

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