例01-例04主要讲了ORM操作相关的基本知识,例05说的是报表,我们写东西最终的目的是要展示,从例05的名字就可以看出来,本例是要为我们展示报表,暂且把它翻译成源码级的报表吧(用代码创建报表).这个例子有3个工程文件,SynPdfFormCanvas\SynPdfLayers\TestSQLite3Pages,逐个学习.
1.SynPdfFormCanvas
这个只有工程源码,我们先运行一下,然后在工程目录会生成SynPdfFormCanvas.pdf文件,打开看看:
源码直接生成pdf文档,对生成的过程源码,继续用备注进行说明:
program SynPdfFormCanvas;
{$APPTYPE CONSOLE}
uses
{$I SynDprUses.inc} // use FastMM4 on older Delphi, or set FPC threads
SysUtils,
Math,
DateUtils,
SynCommons,
SynPDF;
const
// 此单精度浮点数定义的应该PDF的缩放因子,源码约28倍,
// 我们改成14看看有什么变化,再改成7看看其变化
// 其变化是从左下到右上
PDFFactor: Single = 72.0 / 2.54;
// PDFFactor: Single = 14;
var
// PDF引擎的主类,负责处理整个PDF文档
obPDF: TPdfDocument;