产品 检验

A02基础产品管理/U_TatClothInfo.dfm

@@ -7,7 +7,6 @@ inherited frmTatClothInfo: TfrmTatClothInfo
   FormStyle = fsMDIChild
   Position = poScreenCenter
   Visible = True
-  ExplicitLeft = -64
   ExplicitWidth = 1460
   ExplicitHeight = 741
   PixelsPerInch = 96
@@ -331,8 +330,6 @@ inherited frmTatClothInfo: TfrmTatClothInfo
       Align = alClient
       PopupMenu = PM_1
       TabOrder = 0
-      ExplicitLeft = 6
-      ExplicitTop = 41
       object Tv1: TcxGridDBTableView
         Navigator.Buttons.CustomButtons = <>
         Navigator.Buttons.Delete.Enabled = False
@@ -500,6 +497,14 @@ inherited frmTatClothInfo: TfrmTatClothInfo
           Options.Editing = False
           Width = 80
         end
+        object Tv1estimated_diff: TcxGridDBColumn
+          Caption = #39044#35745#24046#20540
+          DataBinding.FieldName = 'estimated_diff'
+          DataBinding.IsNullValueType = True
+          HeaderAlignmentHorz = taCenter
+          Options.Editing = False
+          Width = 80
+        end
       end
       object cxGrid1Level1: TcxGridLevel
         GridView = Tv1

A02基础产品管理/U_TatClothInfo.pas

@@ -121,6 +121,7 @@ type
     Tv1Column8: TcxGridDBColumn;
     ToolButton4: TToolButton;
     Tv1C_Color: TcxGridDBColumn;
+    Tv1estimated_diff: TcxGridDBColumn;
     procedure FormClose(Sender: TObject; var Action: TCloseAction);
     procedure TBCloseClick(Sender: TObject);
     procedure TBDelClick(Sender: TObject);

A02基础产品管理/U_TatClothInfoInput.dfm

@@ -231,7 +231,7 @@ object frmTatClothInfoInput: TfrmTatClothInfoInput
     end
     object Label10: TLabel
       Left = 675
-      Top = 71
+      Top = 70
       Width = 65
       Height = 12
       Caption = #19978#26426#32428#23494#65306
@@ -255,6 +255,19 @@ object frmTatClothInfoInput: TfrmTatClothInfoInput
       Font.Style = [fsBold]
       ParentFont = False
     end
+    object Label13: TLabel
+      Left = 675
+      Top = 101
+      Width = 65
+      Height = 12
+      Caption = #39044#35745#24046#20540#65306
+      Font.Charset = GB2312_CHARSET
+      Font.Color = clBlack
+      Font.Height = -12
+      Font.Name = #23435#20307
+      Font.Style = [fsBold]
+      ParentFont = False
+    end
     object C_Code: TEdit
       Tag = 2
       Left = 93
@@ -458,6 +471,14 @@ object frmTatClothInfoInput: TfrmTatClothInfoInput
       TabOrder = 13
       OnKeyPress = CYColorKeyPress
     end
+    object estimated_diff: TEdit
+      Tag = 2
+      Left = 738
+      Top = 99
+      Width = 120
+      Height = 18
+      TabOrder = 14
+    end
   end
   object cxPageControl3: TcxPageControl
     Left = 0

A02基础产品管理/U_TatClothInfoInput.pas

@@ -217,6 +217,8 @@ type
     DS_3: TDataSource;
     C_Color: TEdit;
     Label11: TLabel;
+    estimated_diff: TEdit;
+    Label13: TLabel;
     procedure FormShow(Sender: TObject);
     procedure TBCloseClick(Sender: TObject);
     procedure ToolButton1Click(Sender: TObject);

E03梭织坯布检验/U_TatMachInsp.dfm

@@ -2625,7 +2625,7 @@
           Width = 113
         end
         object Tv3code_table_length: TcxGridDBColumn
-          Caption = #23454#38469#31859#25968
+          Caption = #30721#34920#38271#24230
           DataBinding.FieldName = 'code_table_length'
           DataBinding.IsNullValueType = True
           HeaderAlignmentHorz = taCenter