在View的OnSummary事件里添加:
//处理VCL库TFmtBcd自动求和的BUG(未知情况下会取整求和)
if(Arguments.SummaryItem->ItemLink->InheritsFrom(__classid(TcxGridColumn)))
{
TcxGridColumn* pCol = dynamic_cast<TcxGridColumn*>(Arguments.SummaryItem->ItemLink);
if(pCol->DataBinding->ValueType == "FMTBcd")
{
double dbValue;
if(!VarIsNull(ASender->DataController->Values[Arguments.RecordIndex][pCol->Index]))
{
dbValue = ASender->DataController->Values[Arguments.RecordIndex][pCol->Index];
OutArguments.Value = dbValue;
}
}
}

本文介绍了一个在View的OnSummary事件中处理VCL库TFmtBcd自动求和BUG的方法,该BUG在未知情况下会导致求和结果取整。通过检查列的数据类型并进行正确的值转换来确保计算的准确性。
419

被折叠的 条评论
为什么被折叠?



