法藏法师:delphi中如何在cxGrid中动态增加合计行(footer)?_Delphi之家_NO...
来源:百度文库 编辑:偶看新闻 时间:2024/05/03 06:59:10
delphi中如何在cxGrid中动态增加合计行(footer)? 10-27
如何在cxGrid中动态增加合计行(footer)?
这段是我的代码,但是有问题。我却不知道应该怎么改了。
//合计代码段
if DataType=ftFloat then
begin
with gzk_tv.DataController.Summary do
begin
BeginUpdate;
try
GroupSummaryItems[i].Clear;
with GroupSummaryItems[i].Add as TcxGridDBTableSummaryItem do
begin
Column := gzk_tv.Columns[i];
Kind := skSum;
Format := '合: $,0';
end;
finally
EndUpdate;
end;
end;
end;
//合计代码段
1:var
cxColumn:TcxGridDBColumn;
footsumitem:tcxdatasummaryitem;
begin
...
Column := gzk_tv.Columns[i];
footsumitem:=cxview.DataController.Summary.DefaultGroupSummaryItems.Add;
footsumitem.Kind:=skSum;
footsumitem.ItemLink:= Column ;
footsumitem.Format:='#';
footsumitem.Position:=spFooter;
...
以上代码在D7中测试通过,祝你好运![:D]
2:改成这样,为什么还是没有合计行呢?
if DataType=ftfloat then
begin
cxColumn := gzk_tv.Columns[i];
footsumitem:=gzk_tv.DataController.Summary.DefaultGroupSummaryItems.Add;
footsumitem.Kind:=skSum;
footsumitem.ItemLink:= cxColumn ;
footsumitem.Format:='#';
footsumitem.Position:=spFooter;
end;
3:DataType=ftfloat
是否条件错了,你改成判断是否是那个字段试一下,或者你比较的数据类型加上其他的试试看
4:Ok
如何在cxGrid中动态增加合计行(footer)?
这段是我的代码,但是有问题。我却不知道应该怎么改了。
//合计代码段
if DataType=ftFloat then
begin
with gzk_tv.DataController.Summary do
begin
BeginUpdate;
try
GroupSummaryItems[i].Clear;
with GroupSummaryItems[i].Add as TcxGridDBTableSummaryItem do
begin
Column := gzk_tv.Columns[i];
Kind := skSum;
Format := '合: $,0';
end;
finally
EndUpdate;
end;
end;
end;
//合计代码段
1:var
cxColumn:TcxGridDBColumn;
footsumitem:tcxdatasummaryitem;
begin
...
Column := gzk_tv.Columns[i];
footsumitem:=cxview.DataController.Summary.DefaultGroupSummaryItems.Add;
footsumitem.Kind:=skSum;
footsumitem.ItemLink:= Column ;
footsumitem.Format:='#';
footsumitem.Position:=spFooter;
...
以上代码在D7中测试通过,祝你好运![:D]
2:改成这样,为什么还是没有合计行呢?
if DataType=ftfloat then
begin
cxColumn := gzk_tv.Columns[i];
footsumitem:=gzk_tv.DataController.Summary.DefaultGroupSummaryItems.Add;
footsumitem.Kind:=skSum;
footsumitem.ItemLink:= cxColumn ;
footsumitem.Format:='#';
footsumitem.Position:=spFooter;
end;
3:DataType=ftfloat
是否条件错了,你改成判断是否是那个字段试一下,或者你比较的数据类型加上其他的试试看
4:Ok
如何在DELPHI中在本地动态创建DBF文件?
如何在delphi中实现2维动态数组的传递,很菜请指教
delphi中如何动态删除toolbar 中的toolbutton
Delphi动态库在VB中使用的问题。。。
关于在delphi中动态数组之间的复制?
在DELPHI中如何调用API函数
如何在DELPHI中切换窗口
在DELPHI中如何获得文件路径
如何在Delphi中修改TcheckTree控件
如何在DELPHI中播放GIF动画?
如何在Delphi中装载gir图像
如何在delphi中实现打印功能
如何在delphi中进行打印?
delphi中如何调用
delphi中如何实现在编辑框中跳转
delphi中如何在type library中新建一个方法。
delphi中向access表中insert动态参数?
在delphi中,是不是能在动态连接库中用ADO操纵数据库
如何在div中动态显示时间
在asp中如何定义动态数组?
如何在动态画面中截图,按什麼键?
在VB中如何动态创建控件??
在VB中如何动态创建控件??
DELPHI中如何激活组件