0907

B04采购计划管理/PurchasePlan.dproj.local

@@ -1,58 +1,58 @@
 <?xml version="1.0" encoding="utf-8"?>
 <BorlandProject>
 	<Transactions>
-    <Transaction>1899-12-30 00:00:00.000.975,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.891,D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_ClothPurchasePlanList.pas=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_ClothRSPlanList.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.724,D:\Dp10Repo\项目代码\RTBasics\B04采购计划管理\Unit1.pas=</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas=</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.910,D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_ClothStainPlanPut.dfm=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_ClothPurchasePlanPut.dfm</Transaction>
     <Transaction>1899-12-30 00:00:00.000.048,=D:\Dp10Repo\public10\design\U_BaseList.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.857,=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_ClothHJGPlanPut.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.305,D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_RSTradePlanSel.dfm=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_PurTradePlanSel.dfm</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.869,D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_PurTradePlanSel.pas=D:\Dp10Repo\项目代码\骉骐\T00贸易通用窗体\U_TradePlanSel.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.869,D:\Dp10Repo\项目代码\骉骐\T00贸易通用窗体\U_TradePlanSel.pas=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_PurTradePlanSel.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.488,=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_ClothStainPlanList.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas=</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.724,D:\Dp10Repo\项目代码\RTBasics\B04采购计划管理\Unit1.pas=</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm</Transaction>
     <Transaction>1899-12-30 00:00:00.000.844,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas</Transaction>
     <Transaction>1899-12-30 00:00:00.000.873,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.857,=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_ClothHJGPlanPut.pas</Transaction>
     <Transaction>1899-12-30 00:00:00.000.106,=D:\Dp10Repo\项目代码\RTBasics\B04采购计划管理\U_YarnPurchasePlanPut.pas</Transaction>
     <Transaction>1899-12-30 00:00:00.000.832,=D:\Dp10Repo\public10\design\U_BaseHelp.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.305,D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_PurTradePlanSel.pas=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_RSTradePlanSel.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.910,D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_ClothPurchasePlanPut.dfm=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_ClothStainPlanPut.dfm</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.781,=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_HJGTradePlanSel.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.910,D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_ClothPurchasePlanPut.pas=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_ClothStainPlanPut.pas</Transaction>
     <Transaction>1899-12-30 00:00:00.000.149,=D:\Dp10Repo\public10\ThreeFun\Form\U_ZDYHelp.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
     <Transaction>1899-12-30 00:00:00.000.339,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
     <Transaction>1899-12-30 00:00:00.000.564,=D:\Dp10Repo\项目代码\骉骐\A00通用窗体\U_UserSel.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.424,=D:\Dp10Repo\项目代码\RTBasics\B04采购计划管理\U_YarnPurchasePlanList.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.458,D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_EmpSel.dfm=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_GXSel.dfm</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.781,=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_HJGTradePlanSel.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.891,D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_ClothPurchasePlanList.dfm=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_ClothRSPlanList.dfm</Transaction>
     <Transaction>1899-12-30 00:00:00.000.939,=D:\Dp10Repo\public10\design\U_BaseInput.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.910,D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_ClothStainPlanPut.pas=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_ClothPurchasePlanPut.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.488,=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_ClothStainPlanList.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.621,=D:\Dp10Repo\项目代码\RTBasics\B04采购计划管理\U_ClothPurchasePlanPut.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm</Transaction>
     <Transaction>1899-12-30 00:00:00.000.450,=D:\Dp10Repo\项目代码\骉骐\T00贸易通用窗体\U_TradePlanSel.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.424,=D:\Dp10Repo\项目代码\RTBasics\B04采购计划管理\U_YarnPurchasePlanList.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.891,D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_ClothRSPlanList.pas=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_ClothPurchasePlanList.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.621,=D:\Dp10Repo\项目代码\RTBasics\B04采购计划管理\U_ClothPurchasePlanPut.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.458,D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_GXSel.pas=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_EmpSel.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
     <Transaction>1899-12-30 00:00:00.000.110,=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_ClothHJGPlanList.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.pas=</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.931,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.869,D:\Dp10Repo\项目代码\骉骐\T00贸易通用窗体\U_TradePlanSel.dfm=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_PurTradePlanSel.dfm</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.086,=D:\Dp10Repo\public10\design\U_cxGridCustomCss.pas</Transaction>
     <Transaction>1899-12-30 00:00:00.000.123,=D:\Dp10Repo\public10\design\U_globalVar.pas</Transaction>
     <Transaction>1899-12-30 00:00:00.000.015,=D:\Dp10Repo\public10\ThreeFun\Fun\U_RTFun.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.931,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.pas=</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.086,=D:\Dp10Repo\public10\design\U_cxGridCustomCss.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.797,D:\Dp10Repo\项目代码\RTBasics\B04采购计划管理\PurchasePlan.dproj=D:\Dp10Repo\项目代码\RTBasics\B04采购计划管理\InformationBase.dproj</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.961,=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_EmpSel.pas</Transaction>
     <Transaction>1899-12-30 00:00:00.000.716,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ProcessSel.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.458,D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_GXSel.dfm=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_EmpSel.dfm</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.961,=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_EmpSel.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.844,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_YarnInfoSel.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.458,D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_EmpSel.pas=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_GXSel.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.092,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.975,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.891,D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_ClothRSPlanList.dfm=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_ClothPurchasePlanList.dfm</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.305,D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_RSTradePlanSel.pas=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_PurTradePlanSel.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.869,D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_PurTradePlanSel.dfm=D:\Dp10Repo\项目代码\骉骐\T00贸易通用窗体\U_TradePlanSel.dfm</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.135,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.305,D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_PurTradePlanSel.dfm=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_RSTradePlanSel.dfm</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.487,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelpSel.pas=</Transaction>
     <Transaction>1899-12-30 00:00:00.000.059,=D:\Dp10Repo\项目代码\骉骐\B04采购计划管理\U_ClothRSPlanPut.pas</Transaction>
     <Transaction>1899-12-30 00:00:00.000.366,=D:\Dp10Repo\项目代码\RTBasics\B04采购计划管理\U_ClothPurchasePlanList.pas</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.487,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelpSel.pas=</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.797,D:\Dp10Repo\项目代码\RTBasics\B04采购计划管理\InformationBase.dproj=D:\Dp10Repo\项目代码\RTBasics\B04采购计划管理\PurchasePlan.dproj</Transaction>
-    <Transaction>1899-12-30 00:00:00.000.135,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.092,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.844,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_YarnInfoSel.pas</Transaction>
+    <Transaction>1899-12-30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
   </Transactions>
 	<ProjectSortOrder AutoSort="0" SortType="0">
     <File Path="android-support-v4.dex.jar"/>
@@ -83,7 +83,7 @@
     <File Path="fmx.dex.jar"/>
     <File Path="google-play-billing.dex.jar"/>
     <File Path="google-play-licensing.dex.jar"/>
-    <File Path="..\..\骉骐"/>
+    <File Path="..\..\D10myBiaoqi"/>
     <File Path="..\A00通用窗体"/>
     <File Path="..\A00通用窗体\U_AttachmentUpload.pas"/>
     <File Path="..\A00通用窗体\U_AttachmentUpload.dfm"/>

B04采购计划管理/U_ClothPurchasePlanList.dfm

@@ -188,6 +188,7 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
     TabOrder = 3
     object Tv1: TcxGridDBTableView
       Navigator.Buttons.CustomButtons = <>
+      ScrollbarAnnotations.CustomAnnotations = <>
       OnCellDblClick = Tv1CellDblClick
       OnCustomDrawCell = Tv1CustomDrawCell
       OnFocusedRecordChanged = Tv1FocusedRecordChanged
@@ -215,6 +216,7 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object v1Column4: TcxGridDBColumn
         Caption = #36873#25321
         DataBinding.FieldName = 'SSel'
+        DataBinding.IsNullValueType = True
         PropertiesClassName = 'TcxCheckBoxProperties'
         Properties.ImmediatePost = True
         Properties.NullStyle = nssUnchecked
@@ -224,11 +226,13 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object Tv1Column1: TcxGridDBColumn
         Caption = #29366#24577
         DataBinding.FieldName = 'ZT'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
       end
       object v1OrdDate: TcxGridDBColumn
         Caption = #19979#21333#26085#26399
         DataBinding.FieldName = 'PurDate'
+        DataBinding.IsNullValueType = True
         PropertiesClassName = 'TcxDateEditProperties'
         Properties.ShowTime = False
         HeaderAlignmentHorz = taCenter
@@ -240,6 +244,7 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object v1DeliveryDate: TcxGridDBColumn
         Caption = #20132#36135#26085#26399
         DataBinding.FieldName = 'DlyDate'
+        DataBinding.IsNullValueType = True
         PropertiesClassName = 'TcxDateEditProperties'
         Properties.ShowTime = False
         HeaderAlignmentHorz = taCenter
@@ -251,6 +256,7 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object v1ConNo: TcxGridDBColumn
         Caption = #37319#36141#21333#21495
         DataBinding.FieldName = 'PurNo'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Options.Focusing = False
@@ -260,11 +266,13 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object Tv1Column4: TcxGridDBColumn
         Caption = #23458#25143#21333#21495
         DataBinding.FieldName = 'BuyConNo'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
       end
       object v1Column1: TcxGridDBColumn
         Caption = #20379#24212#21830
         DataBinding.FieldName = 'SellName'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Options.Focusing = False
@@ -274,6 +282,7 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object v1CustomerNoName: TcxGridDBColumn
         Caption = #25105#26041#21333#20301
         DataBinding.FieldName = 'BuyName'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Options.Focusing = False
@@ -283,6 +292,7 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object Tv1Column19: TcxGridDBColumn
         Caption = #20132#26399#35828#26126
         DataBinding.FieldName = 'ShippMent'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Width = 271
@@ -290,6 +300,7 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object v1Column9: TcxGridDBColumn
         Caption = #22791#27880
         DataBinding.FieldName = 'note'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Width = 80
@@ -297,6 +308,7 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object Tv1Column14: TcxGridDBColumn
         Caption = #20215#26684#26415#35821
         DataBinding.FieldName = 'JiaGeSY'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Width = 66
@@ -304,12 +316,14 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object Tv1Column7: TcxGridDBColumn
         Caption = #24065#31181
         DataBinding.FieldName = 'Currency'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Width = 66
       end
       object v1Column10: TcxGridDBColumn
         DataBinding.FieldName = 'status'
+        DataBinding.IsNullValueType = True
         Visible = False
         Options.Editing = False
         VisibleForCustomization = False
@@ -317,6 +331,7 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object v1Column12: TcxGridDBColumn
         Caption = #38468#20214
         DataBinding.FieldName = 'ISSC'
+        DataBinding.IsNullValueType = True
         PropertiesClassName = 'TcxCheckBoxProperties'
         Properties.NullStyle = nssUnchecked
         HeaderAlignmentHorz = taCenter
@@ -326,6 +341,7 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object v1Column13: TcxGridDBColumn
         Caption = #21046#21333#20154
         DataBinding.FieldName = 'Filler'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Width = 78
@@ -333,12 +349,14 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object Tv1Column2: TcxGridDBColumn
         Caption = #26159#21542#21547#31246
         DataBinding.FieldName = 'IsTax'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
       end
       object Tv1Column3: TcxGridDBColumn
         Caption = #36215#36816#28207
         DataBinding.FieldName = 'QiYun'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Width = 80
@@ -347,6 +365,7 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
         Tag = 2
         Caption = #28322#30701#35013
         DataBinding.FieldName = 'QtyNote'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Width = 66
@@ -354,6 +373,7 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object Tv1Column6: TcxGridDBColumn
         Caption = #20135#21697#22797#21333#21495
         DataBinding.FieldName = 'FOrdNo'
+        DataBinding.IsNullValueType = True
         Width = 80
       end
     end
@@ -610,6 +630,7 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
     TabOrder = 5
     object TV2: TcxGridDBTableView
       Navigator.Buttons.CustomButtons = <>
+      ScrollbarAnnotations.CustomAnnotations = <>
       DataController.DataSource = DS_2
       DataController.Filter.AutoDataSetFilter = True
       DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
@@ -668,6 +689,7 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object v1XHNo: TcxGridDBColumn
         Caption = #24207#21495
         DataBinding.FieldName = 'SerialNo'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         SortIndex = 0
@@ -678,6 +700,7 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object VC_SCSCode: TcxGridDBColumn
         Caption = #32534#21495
         DataBinding.FieldName = 'C_Code'
+        DataBinding.IsNullValueType = True
         PropertiesClassName = 'TcxButtonEditProperties'
         Properties.Buttons = <
           item
@@ -692,6 +715,7 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object cxGridDBColumn2: TcxGridDBColumn
         Caption = #21697#21517
         DataBinding.FieldName = 'C_Name'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Width = 70
@@ -699,6 +723,7 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object v1Column5: TcxGridDBColumn
         Caption = #35268#26684
         DataBinding.FieldName = 'C_Spec'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Width = 60
@@ -706,6 +731,7 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object cxGridDBColumn4: TcxGridDBColumn
         Caption = #25104#20998
         DataBinding.FieldName = 'C_Composition'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Width = 70
@@ -713,6 +739,7 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object cxGridDBColumn5: TcxGridDBColumn
         Caption = #39068#33394
         DataBinding.FieldName = 'C_Color'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Width = 70
@@ -720,18 +747,21 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object TV2Column6: TcxGridDBColumn
         Caption = #23433#25490#37319#36141#25968#37327
         DataBinding.FieldName = 'CGQty'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Width = 99
       end
       object TV2Column7: TcxGridDBColumn
         Caption = #23454#38469#37319#36141#25968#37327
         DataBinding.FieldName = 'SCGQty'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Width = 102
       end
       object v1PRTOrderQty: TcxGridDBColumn
         Caption = #25968#37327
         DataBinding.FieldName = 'Qty'
+        DataBinding.IsNullValueType = True
         PropertiesClassName = 'TcxTextEditProperties'
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
@@ -741,6 +771,7 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object v1OrderUnit: TcxGridDBColumn
         Caption = #21333#20301
         DataBinding.FieldName = 'QtyUnit'
+        DataBinding.IsNullValueType = True
         PropertiesClassName = 'TcxComboBoxProperties'
         Properties.DropDownListStyle = lsEditFixedList
         Properties.Items.Strings = (
@@ -755,6 +786,7 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object v1PRTPrice: TcxGridDBColumn
         Caption = #21333#20215
         DataBinding.FieldName = 'Price'
+        DataBinding.IsNullValueType = True
         PropertiesClassName = 'TcxTextEditProperties'
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
@@ -765,6 +797,7 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object cxGridDBColumn9: TcxGridDBColumn
         Caption = #37329#39069
         DataBinding.FieldName = 'Amount'
+        DataBinding.IsNullValueType = True
         PropertiesClassName = 'TcxTextEditProperties'
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
@@ -773,6 +806,7 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object v1Column2: TcxGridDBColumn
         Caption = #22791#27880
         DataBinding.FieldName = 'SNote'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Width = 70
@@ -780,36 +814,42 @@ inherited frmClothPurchasePlanList: TfrmClothPurchasePlanList
       object TV2Column1: TcxGridDBColumn
         Caption = #33457#22411
         DataBinding.FieldName = 'C_Pattern'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Width = 60
       end
       object TV2Column2: TcxGridDBColumn
         Caption = #33394#21495
         DataBinding.FieldName = 'C_ColorNo'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Width = 60
       end
       object TV2Column3: TcxGridDBColumn
         Caption = #21305#25968
         DataBinding.FieldName = 'Piece'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Width = 60
       end
       object TV2Column4: TcxGridDBColumn
         Caption = #24320#21305
         DataBinding.FieldName = 'KP'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Width = 57
       end
       object TV2Column5: TcxGridDBColumn
         Caption = #24320#21305#21333#20301
         DataBinding.FieldName = 'KPUnit'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Width = 59
       end
       object TV2Column8: TcxGridDBColumn
         Caption = #35746#21333#25968#37327
         DataBinding.FieldName = 'OrdQty'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
       end
     end

B04采购计划管理/U_ClothPurchasePlanList.pas

@@ -12,7 +12,8 @@ uses
   RM_Common, RM_Class, RM_GridReport, RM_e_Xls, Menus, cxPC, cxButtonEdit,
   cxTextEdit, cxDropDownEdit, cxLookAndFeels, cxLookAndFeelPainters, dxSkinsCore,
   dxSkinsDefaultPainters, cxNavigator, dxDateRanges, dxBarBuiltInMenu,
-  U_BaseList, RM_e_Graphic, RM_e_Jpeg, RM_E_llPDF, Vcl.Clipbrd;
+  U_BaseList, RM_e_Graphic, RM_e_Jpeg, RM_E_llPDF, Vcl.Clipbrd, dxSkinWXI,
+  dxScrollbarAnnotations;
 
 type
   TfrmClothPurchasePlanList = class(TfrmBaseList)

B04采购计划管理/U_ClothPurchasePlanPut.dfm

@@ -791,6 +791,7 @@ inherited frmClothPurchasePlanPut: TfrmClothPurchasePlanPut
     TabOrder = 3
     object TV1: TcxGridDBTableView
       Navigator.Buttons.CustomButtons = <>
+      ScrollbarAnnotations.CustomAnnotations = <>
       DataController.DataSource = DS_1
       DataController.Filter.AutoDataSetFilter = True
       DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
@@ -850,6 +851,7 @@ inherited frmClothPurchasePlanPut: TfrmClothPurchasePlanPut
         Tag = 9
         Caption = #36873#25321
         DataBinding.FieldName = 'SSel'
+        DataBinding.IsNullValueType = True
         PropertiesClassName = 'TcxCheckBoxProperties'
         Properties.ImmediatePost = True
         Properties.NullStyle = nssUnchecked
@@ -859,6 +861,7 @@ inherited frmClothPurchasePlanPut: TfrmClothPurchasePlanPut
       object cxGridDBColumn14: TcxGridDBColumn
         Caption = #24207#21495
         DataBinding.FieldName = 'SerialNo'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         SortIndex = 0
         SortOrder = soAscending
@@ -868,6 +871,7 @@ inherited frmClothPurchasePlanPut: TfrmClothPurchasePlanPut
       object cxGridDBColumn15: TcxGridDBColumn
         Caption = #32534#21495
         DataBinding.FieldName = 'C_Code'
+        DataBinding.IsNullValueType = True
         PropertiesClassName = 'TcxButtonEditProperties'
         Properties.Buttons = <
           item
@@ -882,36 +886,42 @@ inherited frmClothPurchasePlanPut: TfrmClothPurchasePlanPut
       object cxGridDBColumn16: TcxGridDBColumn
         Caption = #21697#21517
         DataBinding.FieldName = 'C_Name'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Width = 70
       end
       object cxGridDBColumn17: TcxGridDBColumn
         Caption = #35268#26684
         DataBinding.FieldName = 'C_Spec'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Width = 60
       end
       object cxGridDBColumn18: TcxGridDBColumn
         Caption = #25104#20998
         DataBinding.FieldName = 'C_Composition'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Width = 70
       end
       object cxGridDBColumn19: TcxGridDBColumn
         Caption = #39068#33394
         DataBinding.FieldName = 'C_Color'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Width = 70
       end
       object TV1Column7: TcxGridDBColumn
         Caption = #23433#25490#37319#36141#25968#37327
         DataBinding.FieldName = 'CGQty'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Width = 105
       end
       object TV1Column9: TcxGridDBColumn
         Caption = #23454#38469#37319#36141#25968#37327
         DataBinding.FieldName = 'SCGQty'
+        DataBinding.IsNullValueType = True
         PropertiesClassName = 'TcxTextEditProperties'
         Properties.OnEditValueChanged = v1PRTOrderQtyPropertiesEditValueChanged
         HeaderAlignmentHorz = taCenter
@@ -920,6 +930,7 @@ inherited frmClothPurchasePlanPut: TfrmClothPurchasePlanPut
       object cxGridDBColumn20: TcxGridDBColumn
         Caption = #25968#37327
         DataBinding.FieldName = 'Qty'
+        DataBinding.IsNullValueType = True
         PropertiesClassName = 'TcxTextEditProperties'
         HeaderAlignmentHorz = taCenter
         Styles.Header = DataLink_PurchasePlan.Default
@@ -928,6 +939,7 @@ inherited frmClothPurchasePlanPut: TfrmClothPurchasePlanPut
       object cxGridDBColumn21: TcxGridDBColumn
         Caption = #21333#20301
         DataBinding.FieldName = 'QtyUnit'
+        DataBinding.IsNullValueType = True
         PropertiesClassName = 'TcxComboBoxProperties'
         Properties.DropDownListStyle = lsEditFixedList
         Properties.Items.Strings = (
@@ -941,6 +953,7 @@ inherited frmClothPurchasePlanPut: TfrmClothPurchasePlanPut
       object cxGridDBColumn22: TcxGridDBColumn
         Caption = #21333#20215
         DataBinding.FieldName = 'Price'
+        DataBinding.IsNullValueType = True
         PropertiesClassName = 'TcxTextEditProperties'
         Properties.OnEditValueChanged = v1PRTOrderQtyPropertiesEditValueChanged
         HeaderAlignmentHorz = taCenter
@@ -951,6 +964,7 @@ inherited frmClothPurchasePlanPut: TfrmClothPurchasePlanPut
       object cxGridDBColumn23: TcxGridDBColumn
         Caption = #37329#39069
         DataBinding.FieldName = 'Amount'
+        DataBinding.IsNullValueType = True
         PropertiesClassName = 'TcxTextEditProperties'
         HeaderAlignmentHorz = taCenter
         Width = 84
@@ -958,35 +972,41 @@ inherited frmClothPurchasePlanPut: TfrmClothPurchasePlanPut
       object cxGridDBColumn24: TcxGridDBColumn
         Caption = #22791#27880
         DataBinding.FieldName = 'SNote'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Width = 70
       end
       object TV1Column1: TcxGridDBColumn
         Caption = #33457#22411
         DataBinding.FieldName = 'C_Pattern'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Width = 54
       end
       object TV1Column2: TcxGridDBColumn
         Caption = #33394#21495
         DataBinding.FieldName = 'C_ColorNo'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Width = 57
       end
       object TV1Column3: TcxGridDBColumn
         Caption = #21305#25968
         DataBinding.FieldName = 'Piece'
+        DataBinding.IsNullValueType = True
         PropertiesClassName = 'TcxTextEditProperties'
         Properties.OnEditValueChanged = v1PRTOrderQtyPropertiesEditValueChanged
         HeaderAlignmentHorz = taCenter
       end
       object TV1Column4: TcxGridDBColumn
         DataBinding.FieldName = 'SubId'
+        DataBinding.IsNullValueType = True
         Visible = False
       end
       object TV1Column5: TcxGridDBColumn
         Caption = #24320#21305
         DataBinding.FieldName = 'KP'
+        DataBinding.IsNullValueType = True
         PropertiesClassName = 'TcxTextEditProperties'
         Properties.OnEditValueChanged = v1PRTOrderQtyPropertiesEditValueChanged
         HeaderAlignmentHorz = taCenter
@@ -995,6 +1015,7 @@ inherited frmClothPurchasePlanPut: TfrmClothPurchasePlanPut
       object TV1Column6: TcxGridDBColumn
         Caption = #24320#21305#21333#20301
         DataBinding.FieldName = 'KPUnit'
+        DataBinding.IsNullValueType = True
         PropertiesClassName = 'TcxButtonEditProperties'
         Properties.Buttons = <
           item
@@ -1007,6 +1028,7 @@ inherited frmClothPurchasePlanPut: TfrmClothPurchasePlanPut
       end
       object TV1Column8: TcxGridDBColumn
         DataBinding.FieldName = 'MainID'
+        DataBinding.IsNullValueType = True
         Visible = False
       end
     end

B04采购计划管理/U_ClothPurchasePlanPut.pas

@@ -14,7 +14,8 @@ uses
   dxDateRanges, dxBarBuiltInMenu, dxDateTimeWheelPicker, dxGDIPlusClasses,
   Vcl.Menus, MovePanel, cxCheckBox, cxImage, cxDBEdit, Vcl.DBCtrls, U_BaseInput,
   System.ImageList, Vcl.ImgList, IdBaseComponent, IdComponent, IdTCPConnection,
-  IdTCPClient, IdExplicitTLSClientServerBase, IdFTP, ShellAPI;
+  IdTCPClient, IdExplicitTLSClientServerBase, IdFTP, ShellAPI, dxSkinWXI,
+  dxScrollbarAnnotations;
 
 type
   TfrmClothPurchasePlanPut = class(TfrmBaseInput)

B04采购计划管理/U_DataLink.pas

@@ -5,7 +5,7 @@ interface
 uses
   SysUtils, Classes, DB, ADODB, ImgList, Controls, cxStyles, cxLookAndFeels,
   Windows, Messages, forms, OleCtnrs, DateUtils, ExtCtrls, SyncObjs, cxClasses,
-  dxSkinsCore, dxSkinsDefaultPainters, System.ImageList;
+  dxSkinsCore, dxSkinsDefaultPainters, System.ImageList, dxSkinWXI;
 
 type
   TMyThread = class(TThread)

B04采购计划管理/U_PurTradePlanSel.dfm

@@ -10,8 +10,6 @@ inherited frmPurTradePlanSel: TfrmPurTradePlanSel
   Font.Name = #23435#20307
   Position = poScreenCenter
   OnClose = FormClose
-  ExplicitLeft = -259
-  ExplicitTop = -73
   ExplicitWidth = 1556
   ExplicitHeight = 682
   PixelsPerInch = 96
@@ -234,11 +232,11 @@ inherited frmPurTradePlanSel: TfrmPurTradePlanSel
     Height = 546
     Align = alClient
     TabOrder = 2
-    ExplicitLeft = 1
     object Tv1: TcxGridDBTableView
       PopupMenu = PopupMenu1
       OnDblClick = TV1DblClick
       Navigator.Buttons.CustomButtons = <>
+      ScrollbarAnnotations.CustomAnnotations = <>
       DataController.DataSource = DS_1
       DataController.Filter.AutoDataSetFilter = True
       DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
@@ -254,6 +252,7 @@ inherited frmPurTradePlanSel: TfrmPurTradePlanSel
       object v1Column7: TcxGridDBColumn
         Caption = #36873#25321
         DataBinding.FieldName = 'Ssel'
+        DataBinding.IsNullValueType = True
         PropertiesClassName = 'TcxCheckBoxProperties'
         Properties.ImmediatePost = True
         HeaderAlignmentHorz = taCenter
@@ -262,6 +261,7 @@ inherited frmPurTradePlanSel: TfrmPurTradePlanSel
       object Tv1Column11: TcxGridDBColumn
         Caption = #23458#25143
         DataBinding.FieldName = 'CustName'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Width = 80
@@ -269,6 +269,7 @@ inherited frmPurTradePlanSel: TfrmPurTradePlanSel
       object v1OrderNo: TcxGridDBColumn
         Caption = #35745#21010#21333#21495
         DataBinding.FieldName = 'OrderNo'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Options.Focusing = False
@@ -277,6 +278,7 @@ inherited frmPurTradePlanSel: TfrmPurTradePlanSel
       object v1ConNo: TcxGridDBColumn
         Caption = #21512#21516#21495
         DataBinding.FieldName = 'ConNo'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Options.Focusing = False
@@ -285,6 +287,7 @@ inherited frmPurTradePlanSel: TfrmPurTradePlanSel
       object v1DeliveryDate: TcxGridDBColumn
         Caption = #20132#36135#26085#26399
         DataBinding.FieldName = 'DlyDate'
+        DataBinding.IsNullValueType = True
         PropertiesClassName = 'TcxDateEditProperties'
         Properties.ShowTime = False
         HeaderAlignmentHorz = taCenter
@@ -295,6 +298,7 @@ inherited frmPurTradePlanSel: TfrmPurTradePlanSel
       object Tv1Column4: TcxGridDBColumn
         Caption = #23458#25143#21333#21495
         DataBinding.FieldName = 'BuyConNo'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Width = 80
@@ -302,17 +306,20 @@ inherited frmPurTradePlanSel: TfrmPurTradePlanSel
       object Tv1Column5: TcxGridDBColumn
         Caption = #24037#33402
         DataBinding.FieldName = 'Technics'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
       end
       object Tv1Column2: TcxGridDBColumn
         Caption = #21152#24037#21378
         DataBinding.FieldName = 'FtyName'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Width = 138
       end
       object v1OrdDefStr1: TcxGridDBColumn
         Caption = #20135#21697#32534#21495
         DataBinding.FieldName = 'C_Code'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Options.Focusing = False
@@ -321,6 +328,7 @@ inherited frmPurTradePlanSel: TfrmPurTradePlanSel
       object v1MPRTCodeName: TcxGridDBColumn
         Caption = #20135#21697#21517#31216
         DataBinding.FieldName = 'C_Name'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Options.Focusing = False
@@ -329,6 +337,7 @@ inherited frmPurTradePlanSel: TfrmPurTradePlanSel
       object v1MPRTSpec: TcxGridDBColumn
         Caption = #35268#26684
         DataBinding.FieldName = 'C_Spec'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Options.Focusing = False
@@ -337,6 +346,7 @@ inherited frmPurTradePlanSel: TfrmPurTradePlanSel
       object Tv1Column1: TcxGridDBColumn
         Caption = #25104#20998
         DataBinding.FieldName = 'C_Composition'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Width = 66
@@ -344,6 +354,7 @@ inherited frmPurTradePlanSel: TfrmPurTradePlanSel
       object v1MPRTMF: TcxGridDBColumn
         Caption = #38376#24133
         DataBinding.FieldName = 'C_Width'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Options.Focusing = False
@@ -352,6 +363,7 @@ inherited frmPurTradePlanSel: TfrmPurTradePlanSel
       object v1MPRTKZ: TcxGridDBColumn
         Caption = #20811#37325
         DataBinding.FieldName = 'C_GramWeight'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Options.Focusing = False
@@ -360,6 +372,7 @@ inherited frmPurTradePlanSel: TfrmPurTradePlanSel
       object v1PRTColor: TcxGridDBColumn
         Caption = #39068#33394
         DataBinding.FieldName = 'C_Color'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Options.Focusing = False
@@ -368,6 +381,7 @@ inherited frmPurTradePlanSel: TfrmPurTradePlanSel
       object v1Column1: TcxGridDBColumn
         Caption = #33394#21495
         DataBinding.FieldName = 'C_ColorNo'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Options.Focusing = False
@@ -376,6 +390,7 @@ inherited frmPurTradePlanSel: TfrmPurTradePlanSel
       object v1Column6: TcxGridDBColumn
         Caption = #33457#22411
         DataBinding.FieldName = 'C_Pattern'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Options.Focusing = False
@@ -384,29 +399,34 @@ inherited frmPurTradePlanSel: TfrmPurTradePlanSel
       object v1Column4: TcxGridDBColumn
         Caption = #21305#25968
         DataBinding.FieldName = 'OrdPiece'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Width = 87
       end
       object Tv1Column10: TcxGridDBColumn
         Caption = #22797#21512#25968
         DataBinding.FieldName = 'FHS'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Width = 47
       end
       object Tv1Column6: TcxGridDBColumn
         Caption = #23433#25490#37319#36141#25968#37327
         DataBinding.FieldName = 'PQty'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Width = 91
       end
       object Tv1Column7: TcxGridDBColumn
         Caption = #24453#37319#36141#25968
         DataBinding.FieldName = 'WPQty'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
       end
       object v1PRTOrderQty: TcxGridDBColumn
         Caption = #35746#21333#25968#37327
         DataBinding.FieldName = 'OrdQty'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Options.Focusing = False
@@ -415,6 +435,7 @@ inherited frmPurTradePlanSel: TfrmPurTradePlanSel
       object v1Column5: TcxGridDBColumn
         Caption = #25968#37327#21333#20301
         DataBinding.FieldName = 'OrdUnit'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Options.Focusing = False
@@ -423,6 +444,7 @@ inherited frmPurTradePlanSel: TfrmPurTradePlanSel
       object v1Column3: TcxGridDBColumn
         Caption = #20844#26020#25968
         DataBinding.FieldName = 'PRTOrderKgQty'
+        DataBinding.IsNullValueType = True
         Visible = False
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
@@ -431,6 +453,7 @@ inherited frmPurTradePlanSel: TfrmPurTradePlanSel
       object Tv1Column3: TcxGridDBColumn
         Caption = #22791#27880
         DataBinding.FieldName = 'OrdSNote'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Options.Editing = False
         Width = 66
@@ -438,18 +461,21 @@ inherited frmPurTradePlanSel: TfrmPurTradePlanSel
       object Tv1Column8: TcxGridDBColumn
         Caption = #24320#21305
         DataBinding.FieldName = 'KP'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Width = 46
       end
       object Tv1Column9: TcxGridDBColumn
         Caption = #24320#21305#21333#20301
         DataBinding.FieldName = 'KPUnit'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         Width = 60
       end
       object Tv1Column12: TcxGridDBColumn
         Caption = #19994#21153#21592
         DataBinding.FieldName = 'Saleser'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         HeaderGlyphAlignmentHorz = taCenter
         Width = 58
@@ -457,6 +483,7 @@ inherited frmPurTradePlanSel: TfrmPurTradePlanSel
       object Tv1Column13: TcxGridDBColumn
         Caption = #21046#21333#20154
         DataBinding.FieldName = 'Filler'
+        DataBinding.IsNullValueType = True
         HeaderAlignmentHorz = taCenter
         HeaderGlyphAlignmentHorz = taCenter
         Width = 53

B04采购计划管理/U_PurTradePlanSel.pas

@@ -11,7 +11,7 @@ uses
   cxTextEdit, cxGridCustomPopupMenu, cxGridPopupMenu, cxLookAndFeels,
   cxLookAndFeelPainters, dxSkinsCore, dxSkinsDefaultPainters, cxNavigator,
   dxDateRanges, dxBarBuiltInMenu, System.ImageList, U_BaseInput, cxCheckBox,
-  cxCalendar, Vcl.Menus;
+  cxCalendar, Vcl.Menus, dxSkinWXI, dxScrollbarAnnotations;
 
 type
   TfrmPurTradePlanSel = class(TfrmBaseHelp)