简介
使用象 Borland? Delphi 7? Studio 这样的工具和 IBM? DB2? Universal Database? 这样的数据库的优越性之一就在于,平台之间的迁移只需要进行少量更改和一次重新编译。在本系列文章的第一篇中,我用 Delphi 7 Studio 创建了一个连接到 IBM DB2 UDB 的应用程序,在我的第二篇文章中,我给这个应用程序添加了更多功能,如主从复合结构(master-detail)形式的报告,以使它更有趣和有用。既然我已经创建了一个可执行的应用程序,就让我们继续前进并且来个大跨越,使用 Borland Kylix? 3 将它从运行于 Microsoft? Windows? 上的 Delphi 7 应用程序转变为 Linux? 应用程序。
利用 Kylix 3 迁移到 Linux 相当容易,Borland Kylix 3 是一个用于 Linux 开发的快速应用程序环境。Kylix 使用 Delphi 7 Object Pascal(和 C++)作为开发语言,并且使用了用于 Linux 的为大家所熟悉的 RAD 环境。Borland 工具提供的最大优点之一在于,迁移一个应用程序与其说是“移植”项目,还不如说是重新编译 Windows/Delphi(或 Linux/Kylix)项目。
当利用 Kylix 重新编译应用程序,以将它从 Windows 和 Delphi 7 迁移到 Linux 时,有几点必须牢记。首先,Kylix 的所有版本都包含 TSQLClientDataSet 组件,Delphi 6 也有该组件,但是在 Delphi 7 中不鼓励使用它,并用 TSimpleDataSet 取代了它。尽管这看起来似乎不是大问题,但是一旦您意识到它是一个问题时,这就意味着只能使用 Delphi 7 编译 TSimpleClientDataSet,而只能用除 Delphi 7 以外的其它工具编译 TSQLClientDataSet.
将应用程序从 Windows 迁移到 Linux 涉及到获取源文件以及将它们从 Windows 传送到 Linux 文件系统。在 Linux 上,文件名(和单元名)是区分大小写的,因此,如果您添加了一些自己的单元,则必须要小心(Delphi 7 将确保所有单元和文件名都是在注意区分大小写的情况下命名的)。但是,您不必将所有项目文件都从 Delphi 转移到 Kylix.特别是包含特定于 Windows 选项的 .cfg 和 .dof 文件。Kylix 将把这些文件作为 .conf 和 .KOF 文件重新生成。简而言之,您只需将主项目文件(。dpr 和 .res)和单元文件(。pas 和 .xfm)从 Windows 传送到 Linux(本文使用的代码文件可在文章的结尾获得)。
Linux 上的 DB2
除了在 Linux 上使用 Kylix 之外,我们还必须连接到 Linux 上的一个 DB2 版本(当然,您也可以始终与其它平台上的 DB2 数据库连接)。一点提示:我已尝试了使用 DB2 通用数据库 Personal Edition v7.x,但是遇到一个错误消息:SQL Error: Error mapping failed.其他一些使用过 dbEXPress 和 Kylix 的人已经报告了这个消息,在这种情况下,只要确保在 Linux 上使用最新的 DB2 版本(即 v8.1 beta 测试版,可从 IBM 网站下载)就可解决这个问题。
少量的源代码更改
将源文件从 Windows 迁移到 Linux 后,在 Kylix 中打开项目(请参阅图 1)。当打开项目并在 Object Inspector 中查看 SQLConnection 特性时,您会看到两个特定于 Win32 而无法在 Linux 上使用的特性值:LibraryName(设置为 DBEXPDB2.DLL)和 VendorLib(设置为 db2cli.dll)。Linux 没有 DLL;它使用 .so 文件来代替。要更改这些值,您必须先为 ConnectionName 特性选择另一个值,然后再重新选择 DB2Connection 作为 ConnectionName.这将把 LibraryName 设置为 libsqldb2.so.1,并把 VendorLib 设置为 db2cli.dll.
好消息是当您将项目从 Windows 上的 Delphi 迁移到 Linux 上的 Kylix 时,只需更改这两个特性。坏消息是必须手工完成。每当某个平台上进行了新的更改时就必须手工执行上述更改,这不是您希望做的。又一个好消息是,通过在窗体的 OnCreate 事件处理程序中编写一些代码,并将正确的值赋给 LibraryName 和 VendorLib(以及主窗体的 Caption),我们可以解决这个问题,如下所示:
procedure TForm1.FormCreate(Sender: TObject); begin {$IFDEF MSWINDOWS} Caption := 'Delphi 7 talking to DB2 using dbExpress'; SQLCOnnection1.LibraryName := 'DBEXPDB2.DLL'; SQLCOnnection1.VendorLib := 'db2cli.dll'; {$ENDIF} {$IFDEF LINUX} Caption := 'Kylix 3 talking to DB2 using dbExpress'; SQLCOnnection1.LibraryName := 'libsqldb2.so.1'; SQLCOnnection1.VendorLib := 'libdb2.so'; {$ENDIF} cdsEMPLOYEE.Open; cdsEMP_ACT.Open; cdsEMP_PHOTO.Open; cdsEMP_RESUME.Open end;
注:我们不能简单地在第一个 {$IFDEF} 之后添加 {$ELSE},因为 Linux 不再是 MSWINDOWS 的唯一替代平台,现在,Delphi 7 Studio(在用于 .NET 的预览版命令行编译器中)还支持 CLR 作为平台。
另一个您必须检查的特性是 TSQLMonitor 组件的 FileName 特性,例如,它不应当使用 / 或 \ 字符,而应指向一个文件名。最后还应说明,MidasLib、dbExpDB2 和 CrtL 单元在 Linux 上不可用,因此您必须利用 Midas.so 和 dbexpdb2.so 库来部署可执行文件。
当您 Windows 和 Linux 上拥有了单一源项目后,您可以在 Delphi 或 Kylix 中进行工作(这会导致项目源代码进行复杂合并),或者在一个环境中工作而只在另一个环境中重新编译。就个人而言,我一直都在 Windows 上使用 Delphi IDE 设计我的应用程序,然后把它传送到 Linux 上并用 Kylix 重新编译。这样,我可以让 SQLConnection 组件指向 DB2 的 Windows DLL(而不是 Linux .so 库)。
结束语
有了 Delphi 7 或 Kylix 3 和 DB2,在构建 Linux 应用程序时,您就不必因为工具或数据库的可用性而受困于某一个平台,或者牺牲 RAD 环境。在我的下一篇文章中,我将结合 dbExpress 数据访问层来使用 Delphi WebSnap 组件,以构建带有 DB2 后端的 Web 服务器应用程。
(出处:http://www.sheup.com)