cxgrid控件计算字段时除法报错

cxgrid控件计算字段时除法出错
procedure TMngEmployeeKHFm.mdDetailCalcFields(DataSet: TDataSet);
begin
  inherited;
 mdDetailDachengL.AsCurrency := mdDetailDachengYJ.AsCurrency / mdDetailYusuanYJ.AsCurrency;
end;


如上代码，在乘法时不会出错，除法是错误信息：Invalid floating oint operation.
------解决方案--------------------
先判断一下分母，因为分母不能为0。即mdDetailYusuanYJ.AsCurrency这个值不能是0哦