FastReport for .net

FastReport for .net 学习笔记

 

给报表赋数据源的两种方式

(一) 通过程序给报表注册数据源。
这种方式中，模板中不能有数据源，否则给报表注册数据源时会出错
这种方式中，用户不方便建模板，且不容易更改模板
这种方式中，程序可以很灵活的对数据源进行处理，然后再把处理过的数据源注册给报表

//获取数据集
string strConn = "data source=(Local);initial catalog=Hotel;user id=sa;pwd=;connect timeout=120";
string strSql = "select a.Rno,cast(a.BuildID as varchar(2))+'-'+c.BuildName as BuildName,a.Floorid+'-'+ b.FloorName as FloorName,a.Rtp+'-'+ d.cnm as RtpNam,a.RRT"+
" from rmst as a left join [floor] as b on a.floorid=b.floorid left join build as c on a.buildid=c.buildid left join stt as d on a.rtp=d.rtp";
SqlDataAdapter sda = new SqlDataAdapter(strSql, strConn);
DataSet ds = new DataSet();
sda.Fill(ds, "RoomInfo");

//加载报表
Report report = new Report();
report.Load(Application.StartupPath + "\\Report\\rptRoom.frx");

//给报表注册数据
report.RegisterData(ds.Tables["RoomInfo"], "RoomInfo");

//绑定数据到数据区域
DataBand band = report.FindObject("Data1") as DataBand;
band.DataSource = report.GetDataSource("RoomInfo");

this.previewControl1.BringToFront();

report.Preview = this.previewControl1;
if (report.Prepare())
report.ShowPrepared();

FastReport传送连接串的三种方式

(二) 建模板时，建立好数据源（可通过SQL语句等)，然后在程序中给模板传递参数
这种方式中，用户建模板，修改模板简单。但因为数据源是定的，因此不是特别灵活。（比如在一个已查询出的记录集中，想手工再往里面添加点东西就办不到）

给模板传递连接参数有以下三种方式

1.直接传送一个连接字符给报表的连接对象( 加载之后，运行之前)
report1.Load(...);
report1.Dictionary.Connections[0].ConnectionString = my_connection_string;
report1.Show();

2.通过报表参数传递
2.1 运行报表设计器
2.2 在数据窗口中，创建一个新的报表参数 如 ConnStr
2.3 在数据窗口中，选择连接对象,然后切换到属性窗口，设置 ConnectionStringExpression 属性中，选择刚才建设好的参数
2.4 在程序中给参数赋值

Report report = new Report();
report.Preview = this.previewControl1;
report.Load(Application.StartupPath + "\\Report\\rptRoom2.frx");
report.SetParameterValue("ConnStr", textBox1.Text.Trim()); //通过参数给报表的连接串赋值
this.previewControl1.BringToFront();
if (report.Prepare())
{
report.ShowPrepared();
}

3.利用EnvironmentSettings控件的DatabaseLogin事件(此事件每当报表连接数据库时都会发生)
3.1 在窗体中拖入一个EnvironmnetSettings控件
3.2 此事件是全局的，对所有模块内的报表都有效
3.3 此控件的DatabaseLogin事件如下

private void environmentSettings1_DatabaseLogin(object sender, DatabaseLoginEventArgs e)
{
e.ConnectionString = textBox1.Text.Trim();
}

 

附：

(一)给报表传送查询语句 (加载后，运行前操作)

using FastReport.Data;

report1.Load("报表路径");
TableDataSource table = report1.GetDataSource("MyTable") as TableDataSource; //MyTable 即模板中表的名字
table.SelectCommand = "new SQL text"; //如果报表中含有多张表时，可采用此方法，给多张表指定查询语句
report1.Show();

(二)查询并访问报表中的控件(报表对象引用)

if (this.previewControl1.Report != null)
{
Report report = this.previewControl1.Report;
TextObject txt = report.FindObject("TextTitle") as TextObject;
if (txt != null)
{
MessageBox.Show(txt.Text);
txt.Text = txt.Text + "写";
report.Show();
}
}

(三)从报表中获取数据(报表对象引用)

if (this.previewControl1.Report != null)
{
Report report = this.previewControl1.Report;

DataSourceBase ds = report.GetDataSource("Table");

if (ds != null)
{
MessageBox.Show(ds.RowCount.ToString());
}
}

(四)关于报表总页数显示

一定要在报表--选项--双通道打上勾。否则显示的总页数为0

(脚本相关)

<基础>

1报表对象房问(可直接把对象拖到脚本区，系统会自动生成此对象的脚本)

1.0>返回数据表 DataSourceBase ds = Report.GetDataSource("Products"); (参数为表名)
1.1>房问数据列 Report.GetColumnValue("Products.Name"); (参数为表名.列名)

2系统变量访问

2.0>DateTime date = (DateTime)Report.GetVariableValue("Date");(参数为数据窗口，系统变量下的各个变量)

3合计值的访问

3.0>float a= Report.GetTotalValue("Total") //因为只有数值才能有合计，所以这里不用转换

4变量的访问 (变量是可以嵌套定义的)

4.0>int myParam = (int)Report.GetParameterValue("MyParameter");

4.1>int myParam =(int)Report.GetParameterValue("ParentParameter.ChildParameter"); (对嵌套变量的访问，采用父参数名.字参数名方式)

4.2>Report.SetParameterValue("MyParameter", 10); (设置变量值)

<应用>

<1> 隔行变色效果 (用到数据栏的事件BeforePrint,获取系统变量方法GetVariableValue 系统变量Row#)
private void Data1_BeforePrint(object sender, EventArgs e)
{
if (((Int32)Report.GetVariableValue("Row#")) % 2 == 0)
Data1.FillColor = Color.Gainsboro;
}

<2> 根据某列的内容，更改此列的颜色样式或者其他列的显示
(Text9 为报表中的数据列控件.用到控件的BeforePrint事件,获取控件值的方法GetColumnValue(参数为表的列名))
private void Text9_BeforePrint(object sender, EventArgs e)
{
if (((Decimal)Report.GetColumnValue("Table.RRT")) > 200)
{
Text9.TextColor = Color.Red;
TextObject to=Report.FindObject("Text7") as TextObject;
to.Text=Report.GetColumnValue("Table.RtpNam").ToString()+"(有点贵)";
}
}

<3>数据过滤

private void Data1_BeforePrint(object sender, EventArgs e)
{
if (((Int32)Report.GetVariableValue("Row#")) % 2 == 0)
Data1.FillColor = Color.Gainsboro;
if (((Decimal)Report.GetColumnValue("Table.RRT"))<=200) //过滤
Data1.Visible=false;
}
————————————————