R
redcoffee
Unregistered / Unconfirmed
GUEST, unregistred user!
FastReport报表,没有使用可视的报表设计器,用代码,用frprntTbl控件,打印时想在最后生成一条记录,此记录为各字段记录的合计,部分代码如下:
with frPrntTbldo
begin
PageMargins.Left:=15;
PageMargins.Right:=10;
Title.Text := EdtZbt.Text + #13#10#13#10;
PageHeader.Text := '日期:[date] ' + EdtFbt.Text;
PageFooter.Text := ' 第[page#]页(共[totalpages + 1]页)';
BuildReport;
ShowReport;
end;
请高手们帮帮忙啊,我是新手。如果可以把代码填给我。[]
with frPrntTbldo
begin
PageMargins.Left:=15;
PageMargins.Right:=10;
Title.Text := EdtZbt.Text + #13#10#13#10;
PageHeader.Text := '日期:[date] ' + EdtFbt.Text;
PageFooter.Text := ' 第[page#]页(共[totalpages + 1]页)';
BuildReport;
ShowReport;
end;
请高手们帮帮忙啊,我是新手。如果可以把代码填给我。[]
代码: