求救，十万火急！在线等答案！

求救，十万火急！在线等答案！ VCL组件开发及应用
http://www.delphi2007.net/DelphiVCL/html/delphi_20061226132901108.html
dbgrid1中有下面的记录：  
  id gp10 gp12 gp45 gp20 rf20 fr20 ot20  
  09 1 1 1 1  
  09 11 0 10 110  
  09 0 0 0 0  
   
  dbgrid2中要求dbgrid1中的每列数据加起来的和。  
  id gp10 gp12 gp45 gp20 rf20 fr20 ot20  
  10               12                 1                 11               111  
  怎么样才能得到dbgrid1每一列的和阿？  
  请指教！

可以用SQL直接取得列的汇总结果  
  也可以循环遍历DBGRID1所连接数据集，累加

没有简单的方法吗？最好给点代码参考。谢谢！  
 

1.循环计算  
  2.dbgrid2重新select   sum(*)  
  3.dbgrid1select的时候完全可以弄一个和在最后  
  另：没用过DBgrid,我都是用ListView显示。