DBGridEh1.Columns[13].Footer.ValueType := fvtSum;
DBGridEh1.Columns[14].Footer.ValueType := fvtSum;
DBGridEh1.Columns[15].Footer.ValueType:=fvtFieldValue;//对不对
想:DBGridEh1.Columns[15].Footer.Value:=DBGridEh1.Columns[13].Footer.ValueType /DBGridEh1.Columns[14].Footer.ValueType?
怎么解决问题? (所有的都是FLOAT)!
DBGridEh1.Columns[14].Footer.ValueType := fvtSum;
DBGridEh1.Columns[15].Footer.ValueType:=fvtFieldValue;//对不对
想:DBGridEh1.Columns[15].Footer.Value:=DBGridEh1.Columns[13].Footer.ValueType /DBGridEh1.Columns[14].Footer.ValueType?
怎么解决问题? (所有的都是FLOAT)!
解决方案 »
- 请问怎么把一个图片中一个一个的像素的值取出来?
- 如何以二进制方式打开文件
- DBGridEH的多级列标题真不错,能不能显示数据表的树结构?
- 如何测出键盘值
- 请问一段代码(上万行)的执行速度如何测试出来?
- raid 0,加磁盘陈列卡共挂8个硬盘,有人说磁盘陈列的机子如果非法断电会让硬盘全废了,是这样吗?
- 如何控制mediaplayer控件的音量,而不是系统音量
- delphi6中怎么不能使用null了?
- 老鱼大哥,分给了,我笨,嘻嘻,你原谅我,还有个问题,请进。。。
- 热切期盼“程序员大本营2001”能尽早出来(类似如程序员大本营2000 微软版,荟萃版等等)
- 怎样由内网获取外网数据?
- 为什么编译的exe文件其它机子不能运行。。? (
var
c13, c14, c15: double;
begin
DBGridEh1.Columns[13].Footers[0].ValueType := fvtSum;
DBGridEh1.Columns[14].Footers[0].ValueType := fvtSum;
DBGridEh1.Columns[15].Footers[0].ValueType := fvtStaticText
c13:=DBGridEh1.Columns[13].Footers[0].sumValue;
c14:=DBGridEh1.Columns[14].Footers[0].sumValue;
if c14=0 then
c15:=0
else
c15:=c13/c14;
DBGridEh1.Columns[15].Footers[0].sumValue:=c15;
end;
DBGridEh1.Columns[15].Footers[0].ValueType := fvtStaticText;