delphi fastreport 动态加载TfrxDBDataset

在动态 生成TfrxDBDataset并加载数据之后，再进行报表文件的加载，否则，数据集会找不到。

  frxrprt1.DataSets.Clear;  //清空数据集

//加载数据集
  frxrprt1.DataSets.Add(frxdbdtst_sfxxi);
  frxrprt1.DataSets.Add(frxdbdtst_BaseInfor);
  frxrprt1.DataSets.Add(frxdbdtst_LJxxi);
  frxrprt1.DataSets.Add(frxdbdtst_zcexxi);

//加载报表 文件。
  frxrprt1.LoadFromFile(apppath + 'report\GBjsdan.fr3');

//给报表指定的地方赋值。

TfrxMemoView(frxrprt1.FindObject('Memo62')).text := (CalcHJ(GB_yfqfx));

//变量赋值

frxReport1.Variables['MemoHosName'] := QuotedStr(sCoName);