Task #1402 清单汇总，所属项目及，增加“本期完成计量--数量”列

DataModules/BillsGatherDm.dfm

@@ -476,7 +476,7 @@ object BillsGatherData: TBillsGatherData
         FieldName = 'Quantity'
       end
       item
-        FieldName = 'EndGatherQuantity'
+        FieldName = 'CurGatherQuantity'
       end>
     OnFilterRecord = sdvDetailGclBillsFilterRecord
     OnGetText = sdvGclBillsGetText

Frames/BillsGatherFme.dfm

@@ -297,13 +297,13 @@ object BillsGatherFrame: TBillsGatherFrame
         Title.Font.Height = -12
         Title.Font.Name = #23435#20307
         Title.Font.Style = []
-        Alignment = taLeftJustify
+        Alignment = taRightJustify
         Font.Charset = GB2312_CHARSET
         Font.Color = clWindowText
         Font.Height = -12
         Font.Name = #23435#20307
         Font.Style = []
-        FieldName = 'EndGatherQuantity'
+        FieldName = 'CurGatherQuantity'
         Width = 80
         ReadOnly = False
       end