当前位置：文档之家 › 用Delphi中FastReport设计数据库报表

用Delphi中FastReport设计数据库报表

  • 格式：pdf
  • 大小：379.47 KB
  • 文档页数：4
方 ｌ法 。 １ 据 字 典 用 法 ）数 图 ５ 表 达 式 编 辑 器
①定义系统变量
打开报表设计器 ，在文件菜单栏下点击数据字典 即可定义
系统 变量 （ 图 ４所示 ）。 如
图 ４ 定义 系统变量
②程序 中变量赋值 在 ｆ ｅ ｏｔ ｒ ｐｒ对象 的 Ｏ Ｇ ｔａｕ （事 件中完成变量 的赋值 ， Ｒ ｎ ｅ ｌｅ ） Ｖ 代码如下 ： ｐｏｅ ｕｅＴ ｅＪｓ＿ ｐｒ ｆ ｅ ｏｔＧ ｔ ａ ｅ ｒｃ ｄ ｒ ｓ ！ｉ ｒ ｆ ｒ ｐ ｒ ｅＶ ｌ ｌ ｔ ｅ ｍ． Ｒ １ ｕ
当前 日期和报表页 弓 町以通过表达式编辑器插入系统变量
和系统函数。
４ ７ ０瞌 ３ １ 电２０，砖与 一 … ■ 藿 巧 臻 、 一拄 护－
…
维普资讯
ｅ ｄ ｎ；
③报表引用系统变量
双 击页面上 操作员矩 形对 象 （ ｆ ｅ ｏ ｉ Ｔｒ ｍ Ｖｅ Ｍ ｗ），打开 文本 编辑器 ，通过表达式编辑器 （ 如图 ５ 所示 ）来 引用 已定 义的销 售 明细表 中操作员和单位名称变量 。这样在 打印预览或打印中
（ ｏ ｓ ａＮａ ｃ ｎ ｔＰ ｒ ｍｅ：ｏｗ。ｏ． ０ ｅＶ （Ｉｔｉ ｆ ｉｆｐｌｎ Ｔ ｍｅ ｒ 每 ｒ 咚 Ｒｒ ｌ Ｆ ｅ １ 时ｎ ｌ － ｅ ｜ ｇ ｉ ｌ
一
、
概 述
实际的数据库 Ｊ用 系统 开发中 ，经常遇到用户报表设 计” 、
发 的任 务。住 Ｄ ｌｈ 中用 户报表设 汁中， 用 Ｑ ｉ ｅｏｔ ｅ ｉ ｐ 利 ｕｃ Ｒ ｐ ｒ、 ｋ
Ｒ ｖ ｅｏ ｓ ａｔｅｏｔ 可视 化报 表 设 计工 具 ，就 可以在 ａｅＲ ｐｔ 、Ｆ ｓ ｐｒ 等 Ｒ Ｄ ｌｈ 开发环境 中使 用这 组件来设计数据库报表 了。下面通 ｅ ｉ ｐ
维普资讯
’
＿
＿
Ｉ
一
‘
’
、
…
！
实用第一 智慧密集
… … … … ． … ． ． ， ． … ． ， ． ． ． ． … … … … ，
．
…
．
用Ｄ ｌ ｉ Ｆｓ ｅｏ 设计数据库报 表 ｅ ｈ 中 ａ Ｒ ｐｒ ｐ ｔ ｔ
对 象 （ ｆ ｍｏ ｉｗ 、插入 ｂｎ Ｔｒ Ｍｅ Ｖｅ ） ａｄ对 象 （ｆ ａｄ ｉ ） ｒ ｎＶｅ 、划线对 ￣Ｂ ｗ 象 等 报 表 Ｉ 示的各种文本数据项都 足有 Ｔｒ ｅ ｏ ｉ 显 ｆ ｍ Ｖｅ Ｍ ｗ来定 义的，双 文本刘。 打开文本编辑器 ，完 成文本表达式 和数 象 据字段编辑 。如何从销售 明细表 中取得 客户编号 、销售时 『 、 日 Ｊ 金额等 ，町以利用文本编辑器的插入数据字段来完成对应字段
就可 以显示变量 的值了。
图 ３ 文体 编辑 器
（ ）数据字舆及变量传递 ３ 初次使用 Ｆｓ ｅｏｔ ａｔ ｐｒ开发报表 ，经常要在报 表的页面上显 Ｒ 示单位名称 、操作员 、报表 日期 （ 年报 、月报 、期报 ）等 ，如
何来完成程序 问变量和报表文件 的传递 ？下面介绍两种常用 的
任 伟
摘
要
介绍 了Ｄ ｌｈ 中 Ｆｓ ｅｏ 报表设计器的使用，并讲解 了明细报表和定制报表的 ｅ ｉ ａｔ ｐｒ ｐ Ｒ ｔ
设计 、制 作及 程序 实现 过程 。
关键词 报表设计器，Ｔｒｅｏ ，Ｔ Ｄ Ｄ ｔ ｅ，Ｔ Ｄ ｓ ｎｒ ｆ ｐｒ ｆ Ｂ ａ Ｓ ｔ ｆ ｅ ｇｅ，报表调入 Ｒ ｔ ａ ｒ ｉ
Ｔ Ｄ Ｑｅ Ａ Ｏ ｕ￣
组件属性设置 ：
ｆＲｅ ｏ ｔ ． ｔ ｓ ｔ ｆＤＢＤａａ ｔ ： ｒ ｐ ｒ１ Ｄａａ ｅ ：＝ ｒ ｔＳｅ １
ｆＤＢＤａａ ｅ １ Ｄ ｔｓ ｔ：＝ ｄ ｓ ｌ ｉｔ ： ｒ ｔＳ ｔ ． ａ ａ ｅ ａ ｑ ｅｌ ｓ Ｊ
ａ ｑ ｅｌｉ ． ｏ ｎ ｃｉｎ：＝ ～ Ｄ Ｗ ． Ｄ Ｓ ｒｅ ； ｄｓｌ ｓ Ｃ ｎｅｔ Ｊ ｔ ｏ ＭＳ Ａ Ｃ ｅｖ ｒ
图 ２ Ｆｓ Ｒ ｐｒ报 表 设 计 器 ａｌ ｅ ｏ ｔ
ａ ｑ ｅｌｉ ． ｑ ｔｘ ：＝ ｓ ｌ ｔ ｆ ｍ ｓ ｌｉ ｄ ｓ ｌ ｓ ｓ １ ｅ ｔ ｅｅ ｒ ｅｌｓ 。 Ｊ ｔ ． ｃ ｏ ｔ ｔ ／ 查 询 销 售 明 细表 ／
ａ ｑ ｐ ｒ ｓ １ｔ ｘ ｄ ｏ ｅ ． ｑ ． ｅ ｔ：＝ ｓ ｌ ｃ ｅ ｅ ｔ￥ ｆＯ ｏ ｅ ａ ｏ ： ｒ ｍ ｐ ｒ ｔ ｒ
记 录 的 提 取 （ 同 ３所 ， ） 。 如 Ｊ ：
／ 查询操作员表 ／ 查 询统 计 界 面 见 图 １ 。 （ ）报表版面设计 ２ 操作界面设计 好后 ，双击 Ｔｒｅｏｔ ｆ ｐｒ组件 ，打开 Ｆ ｓ ｅｏ Ｒ ａｔ ｐ ｒ Ｒ ｔ 的报表设计器 （ 图 ２所示 ），没计销售 明细表 。 如 报表组件对象见 图 ２红色下划线部分 ，常用的有插入矩形
过实例详细地介绍 Ｆ ｓ ｅ ｏ 的用法和使用技巧。 ａｔ ｐｒ Ｒ ｔ
二 、明细报表
通常所说 的用 户报表 输 出主要足 指用 按 条件杏询 业务
表 ，并将 结果集输 出到指定 的报表文件 的过程 ，由用户打印预
览或 打 印输 出 。 图 １ 查 询 统 计 界 面
１ ．销售明细表预览及打印 通过 …个销售 明细表设计 ，可 以掌握简单报表制作方法 。
设计 要求 是按时间和操作员进行 口报 、月报 、年报和期报的杏
询统 计功能 ；查询对象是客户销售 明细表 。 （ ） 查询 界而设计 １ 在 Ｄ ｌｈ ７环境 中新建 查洵统计 界面 ，并放 ｆ ａｔｅｏｌ ｅｐｉ Ｆｓ ｐｒ Ｒ
报 表 设 汁组 件 Ｔｒ ｅｏｔ ｆ Ｂ ａ Ｓｔ 查 询 数 据 集 组 件 两 个 ｆ｛ｐ ｒ、Ｔｒ Ｄ ｔ ｅ 及 ｌ Ｄ ａ

合集下载

DELPHI控件FastReport中文Memo显示问题的完美解决方案.

DELPHI控件FastReport中文Memo显示问题的完美解决方案.

DELPHI控件FastReport中文Memo显示问题的完美解决方案.本文转自，因为我用的FastReport版本还要高，所以没有用到作者提到的第三种解决方案。

问题描述，正如rainee所说：程序设计时Memo中的中文显示正常，预览也正常。

程序运行时Memo中的中文只能显示前几个汉字，有时甚至不能显示。

再次打开程序源码，会发现Memo中的中文没保存下来或保存不完全。

如果用Memo显示字段或变量的值，其中的中文显示正常。

除了文章提到的方法外，FastReport4.7.91的TfrxReport有StoreInDFM属性，将其设为false, 在运行时动态加载报表文件，语句如下frxrprtPrintCheck.LoadFromFile('a.fr3');然后预览打印都没有问题。

担心原文作者文章地址有变动，特转载如下：FastReport3.15以上版本（包括最新的3.23.9）都存在一个问题：程序设计时Memo中的中文显示正常，预览也正常。

程序运行时Memo中的中文只能显示前几个汉字，有时甚至不能显示。

再次打开程序源码，会发现Memo中的中文没保存下来或保存不完全。

如果用Memo显示字段或变量的值，其中的中文显示正常。

网上能找到的解决方法主要有两种：一、在FastReport中添加变量，设置Memo的内容为变量的值，在报表的GetValue事件中给变量赋值。

如果你的报表中有许多Memo的值相同，用这种方法最方便。

procedure TForm1.frxReport1GetValue(VarName: String; var Value: Variant);beginif CompareText(VarName, 'MyVar1') = 0 thenValue := 'Hello.';end二、设计时Memo内容为空，在Show报表前给Memo控件赋值。

Delphi2010下安装FastReport4.9.31

Delphi2010下安装FastReport4.9.31

Delphi2010下安装FastReport4.9.31Delphi2010下安装FastReport 4.9.312010-09-20 12:48一，准备工作。

1.1安装Delphi2010。

1.2获得FastReport 4.9.31。

二，FastReport文件夹下LibD14目录添加到Delphi中的Library Path步骤：1，打开Delphi2010，打开菜单Tools->Options。

2，左侧点击Delphi Options的+号，点击Library-win32。

3，在右侧框中找到Library Path，将FastReport->LibD14路径粘贴至该文本框的末尾，粘贴之前输入分号(;)。

三，生成FastReport汉化文件步骤：1，运行"recompile.exe"文件，设置相应选项，我的设置如下：1，Select the compiler 设置为Embarcadero Rad Studio 2010(Delphi，C++)。

2，Select the FastReport Version 设置为 Enterprise。

3，Select the TeeChart version 设置为 TeeChartStd。

4，What you want to do 下的 Change language To: 设置为Chinese 。

四，编译运行时包。

步骤：1，在Delphi中打开(File->Open)菜单。

2，编译，打开如下DPK后，在Delphi中的IDE右侧Project Manager选中该Project右键单击，然后点击Compile。

- FastReport\LibD14\fqb140.dpk- FastReport\LibD14\fs14.dpk- FastReport\LibD14\fsDB14.dpk- FastReport\LibD14\fsBDE14.dpk- FastReport\LibD14\fsADO14.dpk- FastReport\LibD14\fsIBX14.dpk- FastReport\LibD14\frx14.dpk- FastReport\LibD14\frxDB14.dpk- FastReport\LibD14\frxADO14.dpk- FastReport\LibD14\frxBDE14.dpk- FastReport\LibD14\frxIBX14.dpk- FastReport\LibD14\frxDBX14.dpk- FastReport\LibD14\frxe14.dpk- FastReport\LibD14\frxcs14.dpk 这个是FastReport的Client/Server，如不需要则不需编译此文件。

Fastreport使用经验(转)在Delphi程序中访问报表对象

Fastreport使用经验(转)在Delphi程序中访问报表对象


文字错位，而且表格会打印得很小。而且原文中打印坐标的确定，必须靠反复的试验才能达到比较满意的效果。
针对原目标，笔者设计了一段程序。首先在窗体上添加一个DBGrid来显示我们所要打印的数据，在这里，DBGrid不只是起到显示数据的作
用，而且用户对DBGrid作的调整，例如改变了各字段的排列顺序，各字段的显示宽度等，都将直接反映到打印结果中去，也就是说，我们实际
******共用TFrxreport及TfrxDBDataSet
一个程序中，不管多么大的程序，只要打印或预览时是模式的，则完全可以共用一个TFrxreport变量及几个TfrxDBDataSet。只不过，要注意完
成一个报表程序的步骤，主要是下面几步
1)清除报表，得到一个全新的报表内容。
Frxreport1.clear。
可能需要传递很多参数，效率低下。
2)把不同报表的控制放到脚本中，可以实现报表的模块化，程序只是简单的设置数据集的关系，并加载硬盘上的报表文件，不同报表的不同实
现方式，显示方式，均放到报表文件中，程序简洁，易维护，易升级。
当然，这样的缺点就是程序中加载报表时的数据集别名必须与设计报表时的别名一致。
TopBlank=1;
BottomBlank=1;
var
PointX,PointY:integer;
PointScale,PrintStep:integer;
function PelsTomm(Pels:Extended):Extended;
begin
Result:=Pels/Screen.PixelsPerInch*25.4;
end;
procedure PrintSerial(Frx:TFrxReport;SequencePage:Byte=0);
delphi使用QuickReoprt生成报表

delphi使用QuickReoprt生成报表

delphi使⽤QuickReoprt⽣成报表1.添加报表控件1>点击菜单命令‘’Componet/Install Packages‘’2>在弹出的对话框，点击Add3>在delphi⽂件夹下-bin⽬录-选择dclqrt70.dpl⽂件，点击添加安装好之后，在控件⾯板上可以找到Qreport ⾯板。

2.添加QuickRep控件创建⼀个 QuickRep1 对象。

TQuickRep控件是设置报表的核⼼控件，相当于打印范围，是其他控件的⽗级。

3.添加Adoquery1 对象1>将 QuickRep1的 DataSet 属性设置为 Adoquery1。

2>在 Adoquery1 的 SQL 属性⾥添加SQL语句。

3>设置ADOQuery1的connectstring属性为，根据实际数据库进⾏更改：Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=DB;Data Source=.4>设置ACtive属性为True。

4.添加标题栏，数据栏，统计信息栏1>在 QuickRep1 上添加 3 个对象：QRBand1、QRBand2 和 QRBand32>QRBand1 主要是作为表头来显⽰头部信息。

属性：BandType 设置为：rbPageHeader3>QRBand2 主要⽤来显⽰数据记录信息。

属性： BandType 设置为：rbDetail4>QRBand3 主要⽤来存放统计信息。

BandType 设置为：rbSummary5.在数据栏中添加QRDBText1（⽂本控件）⽤来显⽰数据库信息1>DataSet 属性设置为：ADOQuery1。

2>DataField属性设置为：所需要显⽰的数据库字段.6.在统计信息栏添加统计信息属性：Data 设置为：qrsDetailCount7.添加事件在对应的按钮事件中添加如下代码：Form1.QuickRep1.Preview ;。