我用的是delphi7和sql server2000
我想要将数据库中的string型的字段(cost)转化为float型进行计算,该如何转换?另外,数据库中datetime型的数据(borrowdate)怎么进行减法运算。数据格式为YYYY-MM-DD
我想要将数据库中的string型的字段(cost)转化为float型进行计算,该如何转换?另外,数据库中datetime型的数据(borrowdate)怎么进行减法运算。数据格式为YYYY-MM-DD
解决方案 »
- 如何获取别的程序里显示的文字?
- delphi+oracle问题~
- 如何判断是否按下Ctrl键或Shift键
- 请问Devexpress quntaumgrid 3.22 for d5控件哪里有下载?
- 请教一个DLL的问题
- 在线等待,COMBOBOX的控件里的每一个ITEM前面加一个图标
- 问各位回答菜题~!~
- 我初学delphi,请问我如何在窗体中加入不在表中的控件呢,请详细说明,谢谢
- 请问在dephi5+sql2000中,如何建一个临时表?
- 请教---在delphi中怎么使串口保持高电平?
- ★★★★★第二十一期:CSDN论坛秀-Delphi版-本期作秀:kiboisme (发发-蓝色光芒)
- 关于打印的问题?
datediff函数
我要对他们进行m+m*n的运算,该怎样写日期的问题已经解决了
var i,m:float; //278
var v1,v2:TDateTime; l:=DM.q_3.FieldValues['borrowdate']; //借书日期
n:=DatetoStr(now); //机器当前时间
v2:=StrToDate(l);
v1:=StrToDate(n);
i:=IntToStr(Trunc(v2-v1)); //计算借书天数
m:=DM.q_3.FieldValues['cost'].AsFloat; //该书每天费用
edit14.text:=Quotedstr(m+m*i); //计算借书费用 288这是我的程序,编译的时候出现下列错误:
[Error] U_1.pas(278): Undeclared identifier: 'Float'
[Error] U_1.pas(288): Incompatible types: 'String' and 'Integer'能帮我把上边的程序改对吗?
var i,m:double; //278
var v1,v2:TDateTime; l:=DM.q_3.FieldValues['borrowdate']; //借书日期
n:=DatetoStr(now); //机器当前时间
v2:=StrToDate(l);
v1:=StrToDate(n);
i:=IntToStr(Trunc(v2-v1)); //计算借书天数
m:=DM.q_3.FieldValues['cost'].AsFloat; //该书每天费用
edit14.text:=Quotedstr(Format('%.2f',[(m+m*i)]); //计算借书费用 288