Dataset "" is not exists
Если создавать два датасета (мастер и деталь) в рантайме, возникает ошибка: Dataset "" is not exists.
Создаю так:
od1:=Toracledataset.create(ReportBuildForm);
od1.name := 'ds1';
od1.session:=OraSess;
od1.open;
frxDS1 := TfrxDBDataset.Create(ReportBuildForm);
frxDS1.Name := 'frxD1';
frxDS1.UserName := 'frxD1';
frxDS1.DataSet := od1;
frReport.DataSets.Add(frxDS1);
od2:=Toracledataset.create(ReportBuildForm);
od2.name := 'ds2';
od2.session:=OraSess;
od2.Master:= od1;
od2.MasterFields:= 'id_task';
od2.DetailFields:= 'id_task';
od2.DeclareVariable('id_task',otFloat);
frxDS2 := TfrxDBDataset.Create(ReportBuildForm);
frxDS2.Name := 'frxD2';
frxDS2.UserName := 'frxD2';
frxDS2.DataSet := od2;
frReport.DataSets.Add(frxDS2);
frReport.ShowReport;
Создаю так:
od1:=Toracledataset.create(ReportBuildForm);
od1.name := 'ds1';
od1.session:=OraSess;
od1.open;
frxDS1 := TfrxDBDataset.Create(ReportBuildForm);
frxDS1.Name := 'frxD1';
frxDS1.UserName := 'frxD1';
frxDS1.DataSet := od1;
frReport.DataSets.Add(frxDS1);
od2:=Toracledataset.create(ReportBuildForm);
od2.name := 'ds2';
od2.session:=OraSess;
od2.Master:= od1;
od2.MasterFields:= 'id_task';
od2.DetailFields:= 'id_task';
od2.DeclareVariable('id_task',otFloat);
frxDS2 := TfrxDBDataset.Create(ReportBuildForm);
frxDS2.Name := 'frxD2';
frxDS2.UserName := 'frxD2';
frxDS2.DataSet := od2;
frReport.DataSets.Add(frxDS2);
frReport.ShowReport;