Прередача второй таблицы в отчет

[ProFan]

Здраствуйте всем.
Попал в ситуацию, надо разбираться с генератором методом тыка.
есть готовый отчет. необходимо предать внего вторую таблицу данных.
пока удалось откомпилировать следующий код:
ds.DataSetName = "DataSet"
ds.Tables(0).TableName = "Table"
dt1 = dsL1.Tables(0).Clone
dt1.TableName = "Table2"
ds.Tables.Add(dt1)
Dim rep As New Stimulsoft.Report.StiReport
rep.Load("Reports\narad112.mrt")
rep.RegData(ds)
rep.Compile()

Но в словате отчета не могу описать вторую таблицу .
удается добавить только новый источник данных.
тогда вопрос как в него передавать данные из кода, когда метод rep.RegData принимает только 1 DataSet
С почтением....

[Jan]

Здравствуйте,

тогда вопрос как в него передавать данные из кода, когда метод rep.RegData принимает только 1 DataSet

Вы можете вызвать метод RegData для отчета более одного раза. Например:

Код: Выделить всё

report.RegData(myDataSet1);
report.RegData(myDataSet2);
report.RegData(myDataSet3);

Чтобы не возиться с описанием источников данных в отчете можно воспользоваться методом Synchronize после регистрации данных:

Код: Выделить всё

report.RegData(myDataSet1);
report.Dictionary.Synchronize();

или вызвать дизайнер отчетов:

Код: Выделить всё

report.RegData(myDataSet1);
report.Design();

Спасибо.

[ProFan]

Jan, Очень спасибо.
Письмо натолкнуло на новые варианты и показало, куда можно ходить.
у меня сработал такой вариант.
ds.DataSetName = "DataSet"
ds.Tables(0).TableName = "Table"
dt1 = dsL3.Tables(0).Copy
s = dt1.Rows(0).Item("nameRab")
dt1.TableName = "Table2"
ds.Tables.Add(dt1)
ds.Tables(1).TableName = "Table2"
s = ds.Tables("table2").Rows(0).Item("NameRab")
Dim rep As New Stimulsoft.Report.StiReport
rep.Load("Reports\narad112.mrt")
rep.RegData(ds)
rep.Compile()


И еще раз о родимых пятнах Си : DataSet dataSet

[Jan]

Здравствуйте,

Я рад что проблема решилась.

Спасибо.