reportmachine中的问题(50分)

  • 主题发起人 主题发起人 tk0171
  • 开始时间 开始时间
T

tk0171

Unregistered / Unconfirmed
GUEST, unregistred user!
我现在专门负责报表的设计工作,用的是ReportMachine,有如下问题不知如何解决
从别人的模块传入到我的过程中的DATASET,我想在程序中动态的赋值给报表中的BAND,
但是没次运行程序行后提示‘UNABLE OPEN THE RMDBDATASET’,不知如何解决?
 
贴点程序看看
 
procedure Tform1.ShowForm1(ModalName: string;DetailDataSet: TDataSet);
var
f: TForm1;
begin
publicDataSet := TRMDataset(DetailDataSet);
f := TForm1.Create(nil);

f.WPath := ExtractFilePath(ParamStr(0));
f.Report := RMRep_Public;
f.Report.LoadFromFile(f.WPath + 'RM' + ModalName +'.rmf');

form1.RMRep_Public.Dataset := DetailDataSet;
f.Report.ShowReport;
f.Free;
end;
 
procedure Tform1.ShowForm1(ModalName: string;DetailDataSet: TDataSet);
var
f: TForm1;
begin
f := TForm1.Create(nil);

f.WPath := ExtractFilePath(ParamStr(0));
f.Report := RMRep_Public;
f.Report.LoadFromFile(f.WPath + 'RM' + ModalName +'.rmf');

form1.RMRep_Public.Dataset := TRMDataset(DetailDataSet);
f.Report.ShowReport;
f.Free;
end;
 
后退
顶部