收集的fastreport问题处理,加者有分: ( 积分: 50 )

1----纸张格式少?不能使用自定义纸张:
可以。
先选择虚拟打印机(File-Report Options-Virtual printer)
然后选择自定义纸张(File-Page Options-Paper-Custom)
//Custom为下拉框最后一项

对adotable:
----------------
AdoTable.IndexFieldNames := 'Id';
AdoTable.IndexFieldNames := 'Age';
還可以：
adotable1.Sort:='quan';
//后面為字段名字符
此方法應在Adotable1已打開的狀態下使用。
如:CDS_Client.Sort:='仓库ID';
排序
CDS_Client.Sort:='';
恢复原来

[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