有时候许多报表很可能大同小异,只是有个别地方显示的不同,如报表标题,一些控件标题等等。
这样我们只需要设计一次报表,在许多地方调用同一份报表,这时候,我们可能需要在显示一份报表前,稍微改变一下样式或内容(适用于fastreport3.0):
 
procedure TForm2.printReportButtonClick(Sender: TObject);
var
  s:tfrxMemoView;//申明一个fastreport的memo控件对象
begin
  frxreport1.PrepareReport();//检索报表对象前先准备报表,参数类型boolean,默认true,表示预先清掉上一次报表显示的内容
  s:=TFrxMemoView(frxreport1.FindObject('memo19'));//查找memo19对象并转换成一个tfrxmemoview类
  s.Text:=remarkstr;//改变该控件的显示文本的值
  s:=TFrxMemoView(frxreport1.FindObject('memo14'));
  s.Text:=areastr;
  s:=TFrxMemoView(frxreport1.FindObject('memo1'));
  s.text:=captionstr;
  frxreport1.ShowReport(true);//显示报表
end;

posted on 2012-01-05 19:14  del88  阅读(6)  评论(0编辑  收藏  举报