怎样让表单有“记忆功能” - VFP论坛

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

编程论坛 → 数据库技术 → 『 VFP论坛』 → 怎样让表单有“记忆功能”

我的收件箱(0)

共有 1736 人关注过本帖

标题：怎样让表单有“记忆功能”

只看楼主加入收藏

qingfameng

等　级：贵宾
威　望：35
帖　子：964
专家分：3019
注　册：2010-2-6

第 11 楼

得分:0

使用内存文件 .mem 的方法，9楼方法可取。本法使用中需要注意一点，restore from 后，系统原来设置的参数、变量等，能被清空。所以要在合适的地方使用。（仅供参考）

2012-03-23 23:56

寂寞小丑鱼

等　级：新手上路
帖　子：5
专家分：0
注　册：2012-3-23

第 12 楼

得分:0

回复 9楼 sdta

public n1
n1=0
local n2
n2=
save to abcd
这段代码吗？

[ 本帖最后由寂寞小丑鱼于 2012-3-26 14:40 编辑 ]

2012-03-26 10:12

bccn201203

等　级：蜘蛛侠
威　望：3
帖　子：680
专家分：1140
注　册：2012-3-14

第 13 楼

得分:0

程序代码：

*----表单的LOAD事件
PUBLIC N1
N1=0
*----表单的INIT事件
RESTORE FROM ABCD
IF N1>0
   =N2
ENDIF
*----表单的DESTROY 事件
N1=N1+1
LOCAL N2
N2=SAVE TO ABCD

2012-03-26 11:02

寂寞小丑鱼

等　级：新手上路
帖　子：5
专家分：0
注　册：2012-3-23

第 14 楼

得分:0

回复 13楼 bccn201203

提示找不到变量N1，是怎么回事呢？

2012-03-26 14:36

bccn201203

等　级：蜘蛛侠
威　望：3
帖　子：680
专家分：1140
注　册：2012-3-14

第 15 楼

得分:10

回复 14楼寂寞小丑鱼

程序代码：

*----表单的LOAD事件
SET SAFETY OFF
PUBLIC N1
N1=0
*----表单的INIT事件
IF FILE("ABCD.MEM")
   RESTORE FROM ABCD &&保存在内存变量文件中的N1此时变为私有变量，所以提示N1找不到，在下面的代码中，重新定义N1为PUBLIC
   IF N1>0
      =N2
      RELEASE N1
      PUBLIC N1
      N1=0
   ENDIF
ENDIF
*----表单的DESTROY 事件
N1=N1+1
LOCAL N2
N2=SAVE TO ABCD
SET SAFETY ON

2012-03-26 15:14

快速回复：怎样让表单有“记忆功能”