使用FastReport 3.0及以上版本创建动态报表的几个技巧

1.已经生成的报表保存到流中，再从流中取出
  TfrxReport.PreviewPages.SaveToStream(TStream);
  TfrxReport.PreviewPages.LoadFromStream(TStream);

2.把变量添加到报表中
  with frxReport1 do
  begin
    with Variables do
    begin
      Category:=Add;
      Category.Name := ' ' + '自定义变量1';      //注意！！第一个' '内是一个空格！！如果没有空格，不能正确添加分类
      with Add do Name := ' ' + '自定义变量2';   //更简化的格式
      AddVariable('自定义变量1', '变量11', QuotedStr('大写金额'));
      AddVariable('自定义变量1', '变量12', QuotedStr('大写金额'));
      AddVariable('自定义变量1', '变量13', QuotedStr('大写金额'));
      AddVariable('自定义变量2', '变量21', 1880);
      AddVariable('自定义变量2', '变量22', QuotedStr('大写金额'));
      AddVariable('自定义变量2', '变量23', QuotedStr('大写金额'));
    end;
  end;

3.动态添加数据集，要注意！！！！！
在取报表格式之前，应该先把数据集对象放好，这样才能保证在报表控件在取格式文件后，
安置报表对象时，可以拿到数据对象，如果操作顺序搞反了，则报表对象就无法
拿到数据对象，在预览数据时，就会产生“没有数据集”的错误了！！
var
  tmpDataSet: T数据集;
  DataSource: TDataSource;
  frxDBDataSet: TfrxDBDataset;
begin
  tmpDataSet:=T数据集.Create(Self);
  DataSource:=TDataSource.Create(Self);
  frxDBDataSet:=TfrxDBDataset.Create(Self);

  DataSource.DataSet:=tmpDataSet;
  frxDBDataSet.DataSource:=DataSource;
  //frxDBDataSet.DataSet:=tmpDataSet;    //这条语句与上一条都可用，我也不知道区别在哪
  frxDBDataSet.UserName:='数据项名称';    //好用在于可以用中文名
  frxReport1.DataSets.Add(frxDBDataSet);
-------------注意：在把报表格式LoadFromFile或LoadFromStream之前，必须完成上面这几条语句的程序！！！！

 4.将报表设置数据保存到流中，只要设置TfrxDesigner.OnSaveReport就可以了，但不知道这东西怎么和Report联接起来的，只需要在界面上放一个控件就OK了，怪怪的，不过挺爽
 
5.自定义预览窗口
  通过引用frxPreview来建立继承类TfrxPreview，然后在继承的类中加入自己的特性，这样是最省事的了

6.处理顺序的信条（真理）：假设报表模板是保存在数据库中的
 a.必须在把报表模板提取出来前，把表对象注入数据中，否则在预览时就知错
 b.必须在在把报表模板提取出来后，再把动态变量加到报表中，否则看不到变量存在
这两个顺序必须当信条来理解，至于什么原因，偶还没空看FastReport的源程序咧，嘿嘿~~，这两个处理机制可是偶经过了N多失败之后才发现的哦

7.添加自定义函数
 a.建立自己的函数，可以是类的成员函数（要注意实例化类哟），也可以是全局函数
 b.用TfrxReport.AddFunction把函数加到注册项中，注意，必须是函数的完整定义，比如，你的函数是：
   function MyFunction(Para0: Float): string;
　那么AddFunction格式应该这样：
   frxReport1.AddFunction('function MyFunction(Para0: Float): string','自定义函数','');
 c.必须在TfrxReport.OnUserFunction中对函数的返回值进行处理，否则在报表中即使写的格式正确，也没有返回值，这是必须注意的

8.在自定义函数中使用报表中的对象
 a.建立自定义函数

function TForm1.GetCrossObject(CrossObj: TfrxCustomCrossView): string;
begin
  // 取数据对象
  Result:='行数:'+IntToStr(CrossObj.Matrix.RowCount);
end;

 b.注册函数，可以在Form1.Create时注册哦

  with frxReport1 do
  begin
    AddFunction('function GetCrossObject(CrossObj: TfrxCustomCrossView): String',
      '扩展函数', '');
  end;

c.必须在TfrxReport.OnUserFunction中对函数的返回值进行处理

function TForm1.frxReport1UserFunction(const MethodName: String;
  var Params: Variant): Variant;
begin
  if UpperCase(MethodName)=UpperCase('GetCrossObject') then
    Result:=GetCrossObject(TfrxCustomCrossView(Integer(Params[0])));  //类型转换才能编译通过哦 
end;