DELPHI cxgrid 统计主从表中,从表的记录数量
效果如图所示:
核心代码:
procedure TForm1.Button1Click(Sender: TObject); var AIndex, I, ATotalSelectedCount, ASelectedRecordsCount: integer; AMasterView: TcxGridDBTableView; ADetailDataController: TcxCustomDataController; begin ATotalSelectedCount := 0; // 初始化总选中记录计数为0 ASelectedRecordsCount := cxGrid1DBTableView1.Controller.SelectedRecordCount; // 获取当前选择的主表记录数量 AMasterView := cxGrid1DBTableView1; // 获取主视图 // 遍历每个选中的主表之下的从表,有多少记录,然后累加.当然你如果设置了单选行模式,就没必要累加了 for I := 0 to ASelectedRecordsCount - 1 do begin AIndex := AMasterView.Controller.SelectedRecords[i].RecordIndex; // 获取选中主记录的索引 ADetailDataController := AMasterView.DataController.GetDetailDataController(AIndex,0) as TcxCustomDataController; // 获取从表数据控制器 inc(ATotalSelectedCount, ADetailDataController.RecordCount); // 累加当前主表记录下的从表记录数量 end; ShowMessage( IntToStr(ATotalSelectedCount)); // 显示总选中记录数量 end;
分类:
Delphi学习笔记
【推荐】编程新体验,更懂你的AI,立即体验豆包MarsCode编程助手
【推荐】凌霞软件回馈社区,博客园 & 1Panel & Halo 联合会员上线
【推荐】抖音旗下AI助手豆包,你的智能百科全书,全免费不限次数
【推荐】博客园社区专享云产品让利特惠,阿里云新客6.5折上折
【推荐】轻量又高性能的 SSH 工具 IShell:AI 加持,快人一步
· 一个费力不讨好的项目,让我损失了近一半的绩效!
· 清华大学推出第四讲使用 DeepSeek + DeepResearch 让科研像聊天一样简单!
· 实操Deepseek接入个人知识库
· CSnakes vs Python.NET:高效嵌入与灵活互通的跨语言方案对比
· Plotly.NET 一个为 .NET 打造的强大开源交互式图表库