本文探讨了在数据集中构建关键字段的方法，包括如何通过运行时动态创建固定字段，具体步骤涉及更新字段定义、遍历现有字段并创建相应类别的新字段，以及特殊字段如总金额的计算字段创建。
建立此类字段的关键，是必须先为数据集现有的字段建立固定字段(运行时运态创建)
procedure BuildCalcField;
var
i : Integer;
Field : TField;
begin
DataSet.FieldDefs.Update;
for i := 0 to DataSet.FieldDefs.Count -1 do
begin
Field := DataSet.FieldDefs.Items[i].FieldClass.Create(DataSet);
Field.FieldName := DataSet.FieldDefs.Items[i].Name;
Field.FieldKind := fkData;
Field.Size := DataSet.FieldDefs.Items[i].Size;
Field.DataSet := DataSet;
end;
Field := TFloatField.Create(DataSet);
Field.FieldName := 'TotalMoney';
Field.FieldKind := fkCalculated;
Field.DataSet := DataSet;
end;
动态建立计算、参照字段的方法
最新推荐文章于 2020-04-28 11:04:21 发布
扫一扫
1041
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
