标签:obj lse pup dna 格式 item button 发布 ase
cxGrid 分组 展开 加号
原创缘中人 最后发布于2014-05-08 10:34:23 阅读数 3125 收藏
展开
1.先放一个cxGrid,设置好View,设置View.DataController连接的DataSource
2.激活DataSource连接的DataSet,双击cxGrid,点击Retrieve Fields,取得所有的Column
3.设置View的OptionsView.Footer=True,OptionsView.GroupFooters=True,这是为了把分组小计和总计面板显示出来
4.将“订单号”字段拖到cxGrid上方的分组面板(GroupbyBox),将数据按“订单号”分组。这时你会发现单身所有的数据都缩起来了,如果想使所有的数据都展开,可以设置View.DataController.Options.dcoGroupsAlwaysExpanded=True
不用拖也可以找到字段,设置GroupIndex属性为0就可以了,支持多级分组
也可以写代码
cxGrid1DBTableView1DBColumn3.GroupIndex := 0 ;
或者
cxGrid1DBTableView1.Columns[3].GroupIndex :=0;
5.设置分组小计:把View.DataController.Summary.DefaultGroupSummaryItems点开,新增一个Item,Column属性在下拉里选择“数量”字段,FieldName属性为空,Format属性可以设置数值的显示格式,Kind属性下拉skSum加总,Position属性一定要选择spFooter。
6.设置总计:把View.DataController.Summary.FooterSummaryItems点开,新增一个Item,Column属性在下拉里选择“数量”字段,FieldName属性为空,Format属性可以设置数值的显示格式,Kind属性下拉skSum加总,Position属性一定要选择spFooter。
大功告成,按F9看一下胜利果实吧。
再奉送一个技巧,在Form1再放一个TcxGridPopupMenu控件,就在cxGrid控件旁边的那个,把TcxGridPopupMenu的Grid属性设置成你的cxGrid。
然后运行程序,在运行状态,点击Grid上的所有地方,左键或右键,你都会有意外收获。
// cxGrid1DBTableView1DBColumn3.GroupIndex := 0 ;
cxGrid1DBTableView1.Columns[3].GroupIndex :=0;
cxGrid1DBTableView1.OptionsView.GroupByBox:=false;
cxGrid1DBTableView1.DataController.Groups.FullExpand;
cxGrid1DBTableView1.OptionsView.GroupRowStyle := grsOffice11;
procedure TForm13.ToolButton1Click(Sender: TObject);
begin
cxGrid1DBTableView1.DataController.Groups.FullExpand;
end;
procedure TForm13.ToolButton2Click(Sender: TObject);
begin
cxGrid1DBTableView1.DataController.Groups.FullCollapse;
————————————————
版权声明:本文为CSDN博主「缘中人」的原创文章,遵循 CC 4.0 BY-SA 版权协议,转载请附上原文出处链接及本声明。
原文链接:https://blog.csdn.net/cb168/article/details/25284875
标签:obj lse pup dna 格式 item button 发布 ase
原文地址:https://www.cnblogs.com/westsoft/p/12216349.html