我从Oracle数据库中查出一个时间值,与DateTimePicker控间(Name=DTDate)所选日期值比较计算两者相差天数, StrSql:='Select Min(B_Time) B_TIME from LC_PRJRECORD Where GCCODE='+StrGCCODE;
DM.ADOQryPublic.SQL.Clear;
DM.ADOQryPublic.SQL.Add(StrSql);
DM.ADOQryPublic.Open;
if DM.ADOQryPublic.Eof then exit;
OldDate:=DM.ADOQryPublic.FieldByName('B_TIME').AsDateTime;
NewDate:=DTDate.Date;
** IntDays:=OldDate-NewDate;
编译时,**一句报错:
Incompatible types:'Integer' and 'Extended'
请问如何解决?
DM.ADOQryPublic.SQL.Clear;
DM.ADOQryPublic.SQL.Add(StrSql);
DM.ADOQryPublic.Open;
if DM.ADOQryPublic.Eof then exit;
OldDate:=DM.ADOQryPublic.FieldByName('B_TIME').AsDateTime;
NewDate:=DTDate.Date;
** IntDays:=OldDate-NewDate;
编译时,**一句报错:
Incompatible types:'Integer' and 'Extended'
请问如何解决?
解决方案 »
- 如何分别提取字符串中的所有数字、汉字首字母、字符? ?
- 主程序application.title 传递到 dll里后怎么变了/?
- 如何将这段代码变成通用过程
- 50分:哪 有Thypergrid 下载的地方
- DLL中使用IDTcpClient的问题
- 求救(100分):如何窃取一端时间内,显示器上的变化,并把他保存为多媒体文件或电影文件
- 急问,我的程序为什么编译不了成exe文件
- 在一个delphi程序里启动另一个程序,怎么办?
- 关于RICHEDIT!!!!简单问题!快来拿分!
- 该死的DELPHI还是该死的书???
- 关于网络组件TNMFTP、TNMHTTP、TNMUDP、TNMPOP3、TNMSTMP的一个问题。
- 怎么把cxGrid最上面的column header去掉!
请问如何把Extended转为最接近的Integer?
Floor向下取整,返回整形
Ceil向上取整,返回整形
Round四舍五入,返回实型
单元
Math
trunc
直接取整数部分