delphi - 在列中添加值

Question

您好，我有一个带有 AdoTable 数据集的 DBGrid，我的列标题包括“作业 ID”、“旅行 ID”和“旅行成本”。我希望能够将“旅行费用”值加在一起以创建旅行费用总额。我还获得了以下代码，用于过滤搜索职位 ID 时成功显示的旅行 ID，

DBTravel.DataSource.DataSet.DisableControls;  
DBTravel.DataSource.DataSet.Filtered := False;   
DBTravel.DataSource.DataSet.Filter   := 'Job_ID = ' + edtSearchJobID.Text;    
DBTravel.DataSource.DataSet.Filtered := True;    
DBTravel.DataSource.DataSet.First;   
DBTravel.DataSource.DataSet.EnableControls;   

每个工作都有很多旅行费用，因此每个工作 ID 都有很多旅行 ID 和旅行费用，最终我希望旅行费用总和仅添加通过过滤器显示的那些“旅行费用”值，即差旅费用总和仅包括作业 ID 等于 edtSe​​archJobID.Text 的“差旅费用”，并显示在搜索后的 dbgrid 中。谢谢

Answer 1

您应该使用聚合和分组来对按职位 ID 过滤的差旅费用求和:

• ClientDataSet Aggregates and GroupState
• Grouping and Aggregates
• 另一个有用的 answer by @Wodzu使用过滤器。