网上文摘 最近更新 下载排行 资源分类 下载指南
经典编程资源 精彩不容错过
设为首页
加入收藏
联系我们
当前位置:Delphi园地技巧文章编程心得 → FastReport技巧
FastReport技巧
日期:2005-02-06 作者:vfphome 人气: 查看:[大字体 中字体 小字体]
[FORMATDATETIME(‘mm-dd‘, [IBqryShipDate."CLOSEDATE"])]
[FORMATDATETIME(‘mm/dd/yy‘, [IbqryOrderForm."ORDERDATE"])]
金额总计:[FORMATFLOAT(‘#########0.00‘, [TotalAmount])]
订单数量:[COUNT(band1)]
数量合计:[SUM([IBqryShipDate."QUANTITY"])]
婚否:[IF([IbqryPersonal."ISMARRIAGED"]=1, ‘是‘, ‘否‘)]
[IF([qryData."CLOSEDATE"]=0,‘‘,[FORMATDATETIME(‘mm-dd-yy‘, [qryData."CLOSEDATE"])])]

[IF([qryPrint."CURDATE"]=0,‘‘,[FORMATDATETIME(‘mm-dd‘,[qryPrint."CURDATE"])])]
[IF([qryPrint."STYPE"]=‘0‘, [Ban], [Huo])]

if Length(Trim([MainADOQuery."工序名称"])) mod 35 =0 then
begin
bMData.height := 20 * INT(Length(Trim([MainADOQuery."工序名称"]))/35);
Memo39.Height := 20 * INT(LENGTH(TRIM([MainADOQuery."工序名称"]))/35);
end
else begin
bMData.height := 20 * (INT(Length(Trim([MainADOQuery."工序名称"]))/35)+1);
Memo39.Height := 20 * (INT(LENGTH(TRIM([MainADOQuery."工序名称"]))/35)+1);
end

(出处:http://www.delphibbs.com/keylife/iblog_show.asp?xid=12425)

相关文章:
·FastReport问题集
·让Fastreport3.x支持中文PDF的输出
·Fastreport 3.07 专业版的安装及中文化
·Fastreport3.14的中文PDF输出
·StringGrid打印报表(FastReport)
·FastReport 3.23.12 创建"人民币大小写转换"自定义函数
·FastReport 3.X 在 Win9X 下的中文折行乱码问题
·FastReport 3.18版For Delphi7安装笔记
·FastReport 程序员手册
·Delphi7中手动安装FastReport v4的方法
 → 特别推荐
 → 热点TOP10
关于我们 | 广告服务 | 发布资源 | 联系站长 Copyright 2001-2012 Delphi园地 All Rights Reserved