Task #2030 项目属性--计算参数 小数位数调整

Forms/ProjectPropertiesFrm.dfm

@@ -1,6 +1,7 @@
 object ProjectPropertiesForm: TProjectPropertiesForm
   Left = 663
   Top = 261
+  ActiveControl = leProjectName
   BorderIcons = [biSystemMenu]
   BorderStyle = bsSingle
   Caption = #39033#30446#23646#24615
@@ -119,8 +120,8 @@ object ProjectPropertiesForm: TProjectPropertiesForm
     Top = 63
     Width = 530
     Height = 255
-    ActivePage = jpsPropertiesView
-    ActivePageIndex = 2
+    ActivePage = jpsPropertiesBase
+    ActivePageIndex = 0
     Align = alTop
     Caption = 'jpsProperties'
     object jpsPropertiesBase: TJimPage
@@ -979,7 +980,7 @@ object ProjectPropertiesForm: TProjectPropertiesForm
             Width = 16
             Height = 18
             Associate = leQuantityDigit
-            Max = 10
+            Max = 6
             Position = 3
             TabOrder = 29
           end
@@ -989,7 +990,7 @@ object ProjectPropertiesForm: TProjectPropertiesForm
             Width = 16
             Height = 18
             Associate = leTotalPriceDigit
-            Max = 10
+            Max = 4
             TabOrder = 30
           end
           object gbPM_Digit: TGroupBox
@@ -1018,7 +1019,7 @@ object ProjectPropertiesForm: TProjectPropertiesForm
               Width = 16
               Height = 18
               Associate = lePM_PriceDigit
-              Max = 10
+              Max = 4
               TabOrder = 1
             end
           end
@@ -1079,7 +1080,7 @@ object ProjectPropertiesForm: TProjectPropertiesForm
             Width = 16
             Height = 18
             Associate = leDealPayTotalPriceDigit
-            Max = 10
+            Max = 4
             TabOrder = 37
           end
           object leDealPhase: TLabeledEdit