TfrxReportClass report = new TfrxReportClass();
Db4SQL db = new Db4SQL();
string Djbh;
if (dataGridView1.Rows.Count < 1)
{
return;
}
Djbh = dataGridView1.CurrentRow.Cells[0].Value.ToString().Trim();
FrxDataTable datatable = new FrxDataTable("gddjb");
FillTable(datatable, Djbh);
report.ClearReport();
report.LoadReportFromFile("..//..//reports//Print.fr3");
datatable.AssignToReport(true, report);
datatable.AssignToDataBand("MasterData1", report);
report.ShowReport();
Db4SQL db = new Db4SQL();
string Djbh;
if (dataGridView1.Rows.Count < 1)
{
return;
}
Djbh = dataGridView1.CurrentRow.Cells[0].Value.ToString().Trim();
FrxDataTable datatable = new FrxDataTable("gddjb");
FillTable(datatable, Djbh);
report.ClearReport();
report.LoadReportFromFile("..//..//reports//Print.fr3");
datatable.AssignToReport(true, report);
datatable.AssignToDataBand("MasterData1", report);
report.ShowReport();
在delphi中使用的方法通常是:
你这个是动态创建报表,但没有看到释放的语句。
在delphi中我们通常在form中摆上一个FR报表控件及一个FR数据控件,做好关联。
使用时:
self.frxReport1.LoadFromFile('reports\统计明细表.fr3');
self.frxReport1.ShowReport;
楼主可参考一下DEMO。
Djbh = dataGridView1.CurrentRow.Cells[0].Value.ToString().Trim();
你调试下啊.
DEMO里面也没有释放的语句啊