Gridfooter控件使用指南

一、控件功能。

该控件从原来的根据表中既有数据自动统计，修改为适用在表格中输入数据时动态统计合计数。当然，如果要实现自动统计，可以在表格数据加载后，调用控件的CalcTotal方法即可。

二、Gridfooter控件原有自定义属性。

cColWithLabel 放置“合计”标签的列名称。

cFoolterBackColor 设置Gridfooter控件的背景色。

cFoolterForeColor 设置Gridfooter控件的前景色。

cRecordSourceCursor 用途不详。

cSourceGridAlias 源Grid绑定的数据源属性RecordeSource的值。

cSourceGrid 源Grid控件的名称。

cSumColumns 设置需要计算合计值的源Grid的列名。多列用逗号区隔。

CtotalLabelExpression 如果此属性值不为空，则在cColWithLabel属性设置的列中显示此字符串。

lIsAttached 合计行是否绑缚在源Grid底部的标识，默认为.F.。

nDecimalAccurrace 设置保留小数位。

oSourceGrid 源Grid控件被引用的对象名称。

*******以下是修改后新增的自定义属性

cSumFieldList 源Grid控件数据源表中需要合计的字段名列表，用逗号区隔。

cSql 执行合计的命令语句。保护属性，不可修改。

aTotal[1] 存放合计数的数组。

Msg 存放错误信息。

三、Gridfooter控件自定义方法。

AttachToGrig 将Gridfooter控件与源Grid实现一体化（绑缚在源Grid底部）

CalcTotal 计算指定列的合计数并存放在局部数组变量aTotals中（已修改）。

*******以下是修改后新增的自定义方法

ColumnsInit 设置执行合计的命令语句并初始化Gridfooter控件各列。该方法沿用了原有CalcTotal方法的大部分代码，增加了对用户设置的cSumFieldList属性的错误检查。为了使该控件具有更广泛的适用性，特新增了3个属性：cSumFieldList、cSql和aTotal[1]。cSumFieldList属性和cSumColumns属性对应，cSumColumns属性指定在该控件中显示合计数的列名，cSumFieldList属性指定源表中需要计算合计数的字段名。ColumnsInit方法检查cSumFieldList属性中指定的字段名和字段数据类型是否正确。为方便其重新计算合计值，将统计合计数的执行语句，放在新增的cSql属性中，同时，为了方便其它过程调用合计数，将统计出的合计数数组放在新增的aTotal属性中。原有的CalcTotal方法修改为纯粹的计算合计数功能。

四、修改后的Gridfooter控件使用方法。

1.设置控件的下列属性：

CtotalLabelExpression 合计数据的意义表述，如：”合计”、”金额合计”等，注意：引号一定要带上。如果此属性值不设置，则默认使用”TOTAL”字符。在cColWithLabel属性设置的列中显示此字符串。

cColWithLabel 设置CtotalLabelExpression属性确定的标签要显示在控件的哪一列的列名称。控件各列的列名称依次为：Column1、Column2、Column3、…。

cFoolterBackColor 设置Gridfooter控件的背景色。默认值=RGB(255,255,255)。

cFoolterForeColor 设置Gridfooter控件的前景色。默认值=RGB(0,0,0)。

oSourceGrid 源Grid控件在表单中被引用的对象名称。如Grid1。

cSourceGridAlias 源Grid绑定的数据源属性RecordeSource的值，即数据库表的别名。

cSourceGrid 源Grid控件在表单中的名称。即在表单中源Grid控件的Name属性。

cSumFieldList 源Grid控件数据源表中需要合计的字段名列表，用逗号区隔。注意：字段名不能有错且均为数值型字段，字段的数据类型可为”Y”、”N”、”I”。

cSumColumns 设置要将统计出的各字段合计值显示在控件的对应列的列名。多列用逗号区隔。该属性设置的各列不能超出控件列对象范围，且先后顺序必须与cSumFieldList属性所列字段的顺序一一对应。

nDecimalAccurrace 设置合计数据的精度，即保留小数位。

2.控件方法及合计数据的调用。

在cSumFieldList属性设置的表格对应列的Text1对象的Valid事件或LostFocus事件中调用该控件的CalcTotal方法。

如果要调用合计数据，可调用控件的aTotal属性，该属性是一个数组，其下标值对应cSumFieldList属性各字段的排列顺序。

下载地址 https://share.weiyun.com/Noxw9Xah