【结贴】动态设置DataGrid属性**

liubin · 发表于 2008-8-12 11:00:03

现在我用Query，DataSoure，DataGrid 三个组建一起使用
我想动态设置DataGrid 第3列字段汇总（SUM值），代码怎么写？

gaihl · 发表于 2008-8-12 11:05:41

参考
http://bbs.justep.com/forum.php?mod=viewthread&tid=18655
24楼

liubin · 发表于 2008-8-12 11:15:35

Query.CommandText := 'select F_INTERFIXUNIT as ''相关单位'', F_CURRENCYTYPE as ''币别'', SUM(F_MONEY) as ''金额'' from T_Fee where ' +
'F_YRPZ = 1 and F_GOP = ''S'' GROUP BY F_INTERFIXUNIT, F_CURRENCYTYPE';
我只想对F_MONEY列做统计

atiger · 发表于 2008-8-12 11:44:00

那你想在哪里显示呢，如果是在DataGrid的那列的页脚上显示，那么只能这样，如果你是用一个控件，例如Edit，那么直接写SQL，得到这样一个值，直接赋值给这个控件就可以了

gaihl · 发表于 2008-8-12 11:45:20

也可以在Colunm 的 OnDrawSummaryFooter 事件中赋值
http://bbs.justep.com/forum.php?mod=viewthread&tid=4466
如不适合要求，请说一下原始业务需求？

liubin · 发表于 2008-8-12 12:27:55

Query1.Close;
  Query1.CommandText := 'select F_INTERFIXUNIT as ''相关单位'', F_CURRENCYTYPE as ''币别'', SUM(F_MONEY) as ''金额'' from T_Fee where ' +
'F_YRPZ = 1 and F_GOP = ''S'' GROUP BY F_INTERFIXUNIT, F_CURRENCYTYPE';
  Query1.Open;
  DataGrid1.Columns[2].SummaryFooterField := '金额';
  DataGrid1.Columns[2].SummaryFooterType := TSummaryType.cstSum;
搞定，结贴吧

		自动登录	找回密码
密码			立即注册