变更台账，金额小数位数显示控制

Units/ProjectData.pas

@@ -1798,6 +1798,10 @@ procedure TProjectData.ResetFloatDigitView;
     FBGLData.cdsBGBillsViewQuantity.DisplayFormat := FProjProperties.QuantityFormat;
     FBGLData.cdsBGBillsViewTotalPrice.DisplayFormat := FProjProperties.TotalPriceFormat;
     FBGLData.cdsBGBillsViewUsedQuantity.DisplayFormat := FProjProperties.QuantityFormat;
+
+    FBGLData.cdsScjtBGlViewTotalPrice.DisplayFormat := FProjProperties.TotalPriceFormat;
+    FBGLData.cdsScjtBGlViewLxTotalPrice.DisplayFormat := FProjProperties.TotalPriceFormat;
+    FBGLData.cdsScjtBGlViewPfTotalPrice.DisplayFormat := FProjProperties.TotalPriceFormat;
   end;
 
   procedure SetOtherMeasureDigit;