delphi FastReport快速入门

Posted 2021-06-22 癫狂编程

界面及连接关系

 

 

frxDBDataset1连接datasource

 

双击frxReport1控件进入设计界面,选择报表->数据,弹出窗口选择要显示数据的frxdbdataset,frxdbdataset可以有多个

 

打印按钮事件

 

 

//载入报表文件并打印

procedure TForm1.Button2Click(Sender: TObject);

begin

  frxReport1.Clear;

  frxReport1.LoadFromFile(\'test.fr3\');

  frxReport1.ShowReport();

end;

 

//根据数据源筛选数据只打印部分内容

procedure TForm1.Button1Click(Sender: TObject);

var

  sqlStr: string;

begin

  sqlStr := \'SELECT * FROM Employees where city=\'\'\' + Edit1.Text + \'\'\'\';

  with ADOQuery1 do

  begin

    close;

    sql.Clear;

    sql.Add(sqlStr);

    open;

  end;

end;

 

报表设计时如何显示汉字而不是字段名