var a,b:tdatetiem;
begin
a:=query1.fildbyname('datetime').asdatetime;
b:=now;
if datetoint(b-a)>120 then
...
...
..
end;
end
这么写不对是吗?为什么啊?应该怎么写啊?谢谢大哥!!!
begin
a:=query1.fildbyname('datetime').asdatetime;
b:=now;
if datetoint(b-a)>120 then
...
...
..
end;
end
这么写不对是吗?为什么啊?应该怎么写啊?谢谢大哥!!!
解决方案 »
- delphi中的mrok,Idok和数字1之间的关系
- 急需HIS 开发文档,高分相求!!
- [面对对象请教]虚函数可否被调用,谢谢!
- 在DFW问了两天,在本站问了四天,,没有最终答案...我苦阿,,500+200分求助
- 请问c语言中“return ((((bits) + 31)>>5)<<2); ”是什么意思?
- 怎样保存浏览过的IE网页?
- 在RichEdit上追加字符的问题。
- 坑爹,二点半了,倒底是DLL有问题还是我写的方法有问题,求教。
- 请问我这样为什么不能清空Favorites文件夹? 急!!!!!
- 那里有下载《李维Delphi5实战》
- 怎么运行一个外部程序?
- 怎么打印出ListView中的内容
trunc(b-a)>120
因为Tdatetime的本质是double类型。