认识VF－－Visual FoxPro 漫谈

核心提示： 微软在2004年岁末发布最新版Visual Foxpro 9.0，这则消息让我们回想起曾经风光无限的Foxpro，认识VF－－Visual FoxPro 漫谈(7)，现在它已经被Java、Delphi、VB等众多明星遮掩了光芒，有人认为如果不是诞生在豪门微软，你应该把它改成符合需要的值，它的值与REPORT 命令的O

微软在2004年岁末发布最新版Visual Foxpro 9.0，这则消息让我们回想起曾经风光无限的Foxpro，现在它已经被Java、Delphi、VB等众多明星遮掩了光芒，有人认为如果不是诞生在豪门微软，它肯定已经消失。但了解Visual Foxpro的都知道，Visual Foxpro的卓越性能是无法代替的。新版Visual Foxpro 9.0在Foxpro社区引起了轰动，新版中将包含一个更快的本地数据引擎，支持更多的数据类型，SQL语句执行中有更大的一致性，一个完全重新设计的可扩展报表编写器，以及一系列效率和功能增强特性。

　　在Visual FoxPro 9.0的报表系统出现了难以置信的改进。在本文中，我只讨论几个新增功能中的一个——扩展运行时报表引擎（runtime reporting engine）的能力。

　　Visual FoxPro小组在处理运行时改进工作时一直紧记着几个目标，包括：

• 处理打印和预览之外的多种报表输出
• 使用GDI+进行报表输出。这会带来很多显著的改进，例如精确地显示、图像和字体的平滑调整，以及一些附加的能力（例如文本旋转）
• 提供一个更加灵活和可扩展的报表系统

　　你可以同时访问旧的和新的报表引擎，因此你可以根据需要选择在哪种引擎下运行报表。但是一旦你看到新的报表引擎的优点，你就再也不希望使用旧式报表了。

　　报表系统的架构

　　Visual FoxPro 9以前版本中的报表系统类似于单片电路：它处理所有细节信息，只有少量的例外（用户定义的函数、报表带条的OnEntry和OnExit表达式等等），在报表运行的时候，你是不能与它交互操作的。

　　新的报表引擎把报表的功能分成了两部分：现在的报表引擎只处理数据和对象定位；一种新对象（报表监听器）处理显示和输出的事务。由于报表监听器是类（class），因此我们现在可以使用以前梦寐以求的方式与报表进程交互操作。

　　新的报表语法

　　Visual FoxPro 9支持使用旧的报表引擎运行报表；你可以像以前一样使用REPORT命令（尽管你可以使用新命令重载REPORT的行为）。为了得到新式的报表行为，必须使用REPORT命令的OBJECT子句。OBJECT子句支持两种使用方法：指定报表监听器和指定报表样式。微软把它归纳为对象辅助（object-assisted）报表。

　　报表监听器是提供新式报表行为的对象。报表监听器是基于Visual FoxPro 9的新的基础类ReportListener的。为了让Visual FoxPro 9使用报表指定的监听器，需要实例化监听器类，并在REPORT命令的OBJECT子句中指出该对象的名称。下面是一个例子：

loListener = createobject('MyReportListener') report form MyReport object loListener

　　如果不希望手动实例化监听器，可以通过指定报表类型让Visual FoxPro自动为你完成实例化过程，例如：

report form MyReport object type 1

　　已经定义好的类型有：

• 0——从打印机输出
• 1——预览
• 2——某个时刻的页面信息模式，但不会输出到打印机
• 3——所有页面模式，但不会调用预览窗口
• 4——xml(标准化越来越近了)输出
• 5——HTML输出

　　当然我们还可以使用其它的用户自定义类型。

　　使用这种方式运行报表的时候，将调用新的_REPORTOUTPUT系统变量（默认情况下它位于Visual FoxPro主目录的ReportOutput.APP中）中指定的应用程序来决定指定该类型使用哪种监听器类来实例化。它是通过查看APP中内建的监听器注册表（尽管你可以指定它使用一个外部表）中的监听器类型来实现的。如果它找到了需要的类，它就实例化该类并传递该监听器对象的一个引用到报表引擎中。因此，在REPORT命令中使用OBJECT TYPE 某种类型的效果与下面的代码的效果是相同的：

loListener = .NULL. do (_ReportOutput) with SomeType, loListener report form MyReport object loListener

　　报表监听器

　　在报表运行的过程中，伴随着报表事件的发生，Visual FoxPro把这些事件暴露给基于ReportListener基类的对象。Visual FoxPro帮助文件记录了ReportListener的属性、事件和方法（PEMs），但是在本文中我只讨论其中最有用的一些。

　　表1列举了ReportListener类的最常使用的一些属性。

　　表1：ReportListener类的一些有用属性

属性	描述
CurrentDataSession	报表数据的数据对话ID
FRXDataSession	FRX游标的数据对话ID
GDIPlusGraphics	用于显示的GDI+绘图对象句柄
ListenerType	监听器生成的报表输出类型。默认值是-1（无输出），你应该把它改成符合需要的值。它的值与REPORT 命令的OBJECT TYPE 子句中规定的值是相同的。
OutputPageCount	被显示的页面的数量
QuietMode	如果它的值为.T. (默认值是 .F.) 就支持进度信息

　　表2显示了经常使用的ReportListener的事件和方法。

　　表2：ReportListener的一些有用的事件和方法

事件/方法	描述
LoadReport	在FRX被载入和打印机假脱机操作被打开前调用
UnloadReport	在报表运行之后调用
BeforeReport	在FRX被载入但是报表运行前调用
AfterReport	报表运行后调用
BeforeBand	处理某个报表条带前调用
AfterBand	处理某个报表条带后调用
EvaluateContents	显示某个字段前调用
Render	显示对象的时候调用
OutputPage	向特定的设备输出指定显示的页面