用拖放方式快速创建基于猫框类库的表格控件

作者：最初的心

本文适合初学者。

本文涉及C/S的前、后端编程环境是VFP + MSSQL2008。

本文主要探讨两个问题：

1、拖放方式自动创建表格控件

2、使表格控件继承自猫框类库

您直接从VFP项目管理器拖放猫框qiyu_grid_sort表格类到表单，自动创建的是如下图所示的表格控件，这不是本文要讨论的表格控件形式。

您也许需要创建的是带行列属性设置的表格控件，正如下图红框所示：

一、拖放方式自动创建表格控件

CursorAdapter的优点之一是与远程视图一样，您可以将CursorAdapter添加到表单或报表的数据环境中，并利用DE提供的可视化支持，拖放字段以自动创建控件。下面我删除掉上图红框所示的表格控件，利用CursorAdapter对象以拖放方式自动创建带行列属性设置的表格控件，并使其继承自猫框类库中的qiyu_grid_sort类。

1、在VFP编程环境，点击菜单【显示】下的【数据环境】项，打开表单的数据环境，关闭【添加表或视图】对话框

2、右键点击【数据环境设计器】空白处，在快捷菜单中选择【添加CursorAdapter】

3、右键点击刚才创建的CursorAdapter1对象，在快捷菜单中选择【生成器】

4、在CursorAdapter生成器对话框的【属性】页中，【别名】修改为“权限表”（决定后面创建的表格控件Name属性将设置为“grd权限表”），【数据类型】选ODBC，填写并【使用连接串】后，点击【测试连接】，使能够成功连接MSSQL2008数据源。

(加菲猫注：其实这里面可以选择已存在的句柄更简单 )

在命令窗口输入

 oDBSQLHelper=newobject("MSSQLHelper","MSSQLHelper.prg")

然后在使用已存在的连接句柄填入 oDBSQLHelper.Datasource 即可

在【数据访问】页中，点击右上角的【生成】按钮，通过弹出的“Select命令生成器”选择目标表和字段，并【确定】。

确定后，如下图所示已在“Select命令”和“Schema”编辑框中填充相应语句和字段内容，您只要点击右下角的【确定】按钮，即完成了CursorAdapter对象的创建。

5、至此，您就可以拖放数据环境设计器中的CursorAdapter对象到表单，自动创建带行列属性设置的表格控件，或者拖放CursorAdapter的字段对象创建对应字段的标签和文本框。

二、使表格控件继承自猫框类库

表单一旦被建立，就自动建立扩展名为SCX的表单文件。表单文件记录了该表单上所有对象的信息，事实上SCX文件以DBF文件格式存储。

从下图【属性】窗口的ClassLibrary属性值：（无）和Class属性值：Grid可知，一是CursorAdapter对象自动创建的带行列属性设置的表格控件没有继承自猫框类库，二是属性值为斜体，意思是不能修改。下面您可以这样做：

1、关闭表单，在命令窗口执行打开表操作。

USE r:\123\qiyurepairmanage\forms\frm权限设置_.scx

打开表后，执行查找表操作，查询条件“grd权限表”来自于创建CursorAdapter对象时的设置，见前述。

LOCATE FOR Objname = 'grd权限表'

2、修改上图当前行的Class（类）字段值为“qiyu_grid_sort”（即猫框qiyu单笔维护类库中的qiyu_grid_sort表格类名），再修改Classloc（类位置）字段值为“..\class\qiyu单笔维护.vcx”（须依据项目实际文件组织结构设置），然后在命令窗口执行关闭表操作。

USE

3、重新打开frm权限设置.scx表单，您会发现先前CursorAdapter对象自动创建的带行列属性设置的表格控件已经继承自猫框类库中的qiyu_grid_sort表格类了。

络达1562A方案真正把高端的苹果蓝牙耳机价格降为十分之一，音质一样样牛逼PLUS，外国网友普遍认为Made in PRC品质比Made in China 更好