VFP 8 我们总是梦想的非可视方面.doc

VFP 8: 我们总是梦想的非可视方面 作者 Claudio Lassala 译者 RMH Claudio Lassala --我的用户不能看到该材料, 但我可以, 而且我喜欢它 正如通常发生在新版本的 Visual FoxPro 上的情况一样, 我们得到了许多新的 非可视 增强. 这些增强不会被我们的最终用户注意到, 但我们真正地喜欢它们: 新的类, 命令, 函数, 和其它可以让我们的开发者生活更轻松的东西, 更高的生产力, 以及可以给我们的工作带来一系列新的主意的东西. 在本文中, 我将向你展示在 VFP 8 Beta 中的这种类型的新功能. 当然, 不可能在一篇文章中向你展示所有的内容. 因此我选择了那些我最喜欢, 而且我认为你也喜欢的东西. 让我们开始 (准备好了吗?! )! 新的 CursorAdapter 类 新的 CursorAdapter 类给我们新的时机来扩展我们的数据游标, 它帮助我们处理本地的和远程的数据, 从本地的 VFP 数据到 ODBC, ADO 和 XML. 它的使用是相当直接了当的. 注意一下下面的示例. 我们以定义一个基于 CursorAdapter 基类的新类开始: Define CLASS CustomersData as CursorAdapter *-- 让我们定义 DataSourceType 为 本地的 (VFP 数据) DataSourceType=Native *-- 让我们定义我们将创建的别名的名字. Alias=curCustomers *-- 让我们定义将产生填充游标的数据的命令. SelectCmd = select * from Customer Procedure Init *-- 一但对象被创建, 让我们填充游标. this.CursorFill() EndProc EndDefine CursorFill() 方法是该新的基类的 PEMs 的一部分. 每次被调用时, 它将用 SelectCmd 属性来获取数据并填充游标. 我们将象下面一样来使用上面定义的类: oCustomersData = CreateObject(CustomersData) Browse 记住: 一但对象被创建, 将有一个 curCustomers 游标以浏览方式打开. 你还需要多一点功能? 好吧, 让我们看看下面的例子: Define CLASS CustomersData as CursorAdapter *-- 现在, 我们想定义数据源的类型为 ODBC DataSourceType=ODBC Alias=curCustomers *-- 我们可以定义一个 Cursor Schema CursorSchema = ; customerid c(5),companyname c(30),contactname c(30),+; contacttitle c(30), address c(30), city c(30), country+; c(30) SelectCmd = ; select customerid, companyname, contactname, +; contacttitle, address, city, country from Customers *-- 还记得 CursorSetProp() 函数吗? :) Tables = Customers KeyFieldList = customerid UpdatableFieldList = companyname UpdateNameList = companyname panyname Procedure Init *-- 在运行时添加一个保存连接句柄的属性. This.AddProperty(Connection,; SQLSTRINGCONNECT(; Driver=SQL Server;Server=(local);+; Description=Northwind, Int Security;+;