2009年10月30日
FastReport分页和空行填充
摘要： 0.在FastReport 4.X版本通过。1.添加两个Band 一个是主数据和CHild（与主数据一样的空白带格子）。2.生成Page事件。3.添加代码。var aa:Integer; maxRow:Integer; procedure Page1OnManualBuild(Sender: TfrxComponent); var DataSet: TfrxDataSet; begin aa:=1... 阅读全文
posted @ 2009-10-30 10:16 MaxIE 阅读(5010) 评论(0) 推荐(0)
FastReport人民币大写转换
摘要： function MoneyToCharacter(Money:real):string; //数字转换为中文大写var temp:string; resu:string; i,j:integer; len:integer; Num:array[0..9] of string; A:array[0..13] of string;begin Num[0]:='零'; num[1]:='壹'; Num... 阅读全文
posted @ 2009-10-30 10:16 MaxIE 阅读(4266) 评论(0) 推荐(0)