代码如下:
//我是从人民币价格,根据汇率表计算台币、美元价格
with datamd.ADOCalculateTemp do
begin
close;
sql.Clear;
sql.Text := 'update t_productCost t1,t_exchangeRate t2 set FTotalCostNTD=FTotalCostRMB*FNTDtoRMB,FTotalCostUSD=FTotalCostRMB\FUSDtoRMB ';
//美元价格计算出来后全只保留整数位,各币种价格数据类型都是双精度,小数位数是6
sql.Text := sql.Text + ' where t1.fyear = t2.fyear and t1.fperiod = t2.fperiod '; showmessage(sql.text);
execSql;
end;
--价格表:
--RMB NTD USD
--0.374706 ? ?
--汇率表:
NTDtoRMB=4.5
USDtoRMB=6.5请教:为什么双精度除以双精度,结果会变成整数?
如果想得到双精度数的话,该怎么写呢?
//我是从人民币价格,根据汇率表计算台币、美元价格
with datamd.ADOCalculateTemp do
begin
close;
sql.Clear;
sql.Text := 'update t_productCost t1,t_exchangeRate t2 set FTotalCostNTD=FTotalCostRMB*FNTDtoRMB,FTotalCostUSD=FTotalCostRMB\FUSDtoRMB ';
//美元价格计算出来后全只保留整数位,各币种价格数据类型都是双精度,小数位数是6
sql.Text := sql.Text + ' where t1.fyear = t2.fyear and t1.fperiod = t2.fperiod '; showmessage(sql.text);
execSql;
end;
--价格表:
--RMB NTD USD
--0.374706 ? ?
--汇率表:
NTDtoRMB=4.5
USDtoRMB=6.5请教:为什么双精度除以双精度,结果会变成整数?
如果想得到双精度数的话,该怎么写呢?
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货