问大家一个关于日期报警问题,请看看。 (30分)

  • 主题发起人 主题发起人 狼牙
  • 开始时间 开始时间

狼牙

Unregistered / Unconfirmed
GUEST, unregistred user!
一个数据表:序号,借用名称,借用人,经手人,借用日期,借用天数,备注
希望她在借用天数达到时,自动报警,请问各位大侠该如何有条理的处理这些
记录?
比分说我2002-03-03借了一个笔记本,借用3天,希望她在2002-03-06这天自动
弹出报警窗口,提示我,该如何写?
拜托。
 
难道都没有人知道怎么作吗?
 
你可以直接判断阿
query1.sql.add(select * from yourdatebase where overtime=date());
showmessage('有'+inttostr(query1.recordcount)+'物品到期需要归还了');
可能是我理解的问题,不过你还要做很多东西
 
定时查找喽..
 
每次启动程序时先做一下检索,符合条件的就弹出提示可以拉
 
开机时检查
 
每次启动程序时先做一下检索,符合条件的就弹出提示可以拉
然后做个标记、表示已经弹出过了,(或者干脆删除),同一天第二次运行就不弹出了
 
你可以想个办法让它在第三天执行日期查询,用什么办法查就看用户的要求了,用TIMER
定时查询还是做到菜单里点击查询都行,
 
同意开机检查好象图书管理的程序就是这样的
 
要么做另外一个后台运行并且开机时启动的程序来检查,将所有的到期的用户
生成一个列表,这样可以定制提示的方式。
启动程序时检查有一点就是如果不启动程序就不能处理,也许这个程序仅仅是登记借换情况的
没有必要一定要执行。所以还是另外一个检查程序,开机时启动比较好。
似乎还应该加上一点缓冲时间。
 
鼠标移动时就查找:
form.onmousemove()
query1.sql.add(select * from yourdatebase where overtime=date());
showmessage('有'+inttostr(query1.recordcount)+'物品到期需要归还了');

累死机器。
 
希望她在2002-03-06这天自动,弹出报警窗口,提示我,该如何写?
^^^^^^^^
不用难为情,对她直说就是了!不用写,哈哈。。。

 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
后退
顶部