主题：怎样让应用程序退出时记下本次使用时期
yjgzs
[专家分：10] 发布于 2009-01-08 11:47:00
问题见标题
回复列表 （共18个回复）
沙发
hw2007name [专家分：4790] 发布于 2009-01-08 13:44:00
你退出时写一个日期数据到一个表中，下次运行时如果要显示上次使用时间就可以读取此表中的信息不就可以了。
板凳
qjbzjp [专家分：8830] 发布于 2009-01-08 16:45:00
也可以将日期时间放到内存变量中，退出系统时将其保存到一个文件中：
mydate=DATE()
mytime=time()
SAVE to timebak all like my*
下次系统启动后，将其读取进来：
REST FROM timebak ADDI
3 楼
yjgzs [专家分：10] 发布于 2009-01-09 10:57:00
1楼，2楼的做法我都知道，可是这些代码应该放在哪里。这是我问的问题
4 楼
cbl518 [专家分：57140] 发布于 2009-01-09 13:02:00
放在表单的 unload 事件中！
5 楼
cbl518 [专家分：57140] 发布于 2009-01-09 13:03:00
或者
主程序的
CLEAR EVENTS
语句后面！
6 楼
yjgzs [专家分：10] 发布于 2009-01-10 11:28:00
我试看
7 楼
yjgzs [专家分：10] 发布于 2009-01-10 11:46:00
所有回答都不得分，都没说清楚把代码放在哪里。5楼老师回答无效。
8 楼
cbl518 [专家分：57140] 发布于 2009-01-10 12:21:00
好厉害的考官啊！
可是我没回答错啊！
你问的是：
[quote]1楼，2楼的做法我都知道，可是这些代码应该放在哪里。这是我问的问题[/quote]
我的回答：
[quote]
放在表单的 unload 事件中！
或者
主程序的
CLEAR EVENTS
语句后面！[/quote]
请教！老师 我错在哪了？
9 楼
qjbzjp [专家分：8830] 发布于 2009-01-10 21:57:00
mydate=DATE()
mytime=time()
SAVE to timebak all like my*
以上代码放在表单的 unload 事件中。
如果有主程序，以下代码放在主程序的开头。如果直接运行表单，放在LOAD事件中，总之系统启动前，将保存的变量读取进来就行：
REST FROM timebak ADDI
10 楼
foxdb [专家分：1830] 发布于 2009-01-10 22:13:00
我的试用版软件是这样让应用程序退出时记下本次使用“时间或日期或次数”的：
步骤：
１、先编译好应用程序比如： 进销存.exe
２、再修改 “进销存”原程序 用 FOPEN() FSEEK() FWRITE() FCLOS() 这几个函数对“进销存.exe”文件头进行修改，将“本次使用时间或日期”数据写入文件头的某些地址，实现对数据的“读出或修改”
３、再重新编译覆盖“进销存.exe”文件。
好处：只要你运行“进销存.exe”“本次使用时间或日期”都会自动记录到程序本身和任何其他文件无关。要是用户将时间日期往回拨，程序就自动报错或停止。
最后要做的就是要让用户按“合法日期时间”安装时运行一次“进销存.exe”即可！
注意！难点是要解决程序对自身的修改！
如果我的方法楼主感兴趣，我将进一步给出“示范”程序给你参考！
我来回复
您所在位置：社区首页 — Visual Foxpro讨论区 — 怎样让应用程序退出时记下本次使用时期