~

检验管理/U_JYOrderCDOne.dfm

@@ -1,6 +1,6 @@
 object frmJYOrderCDOne: TfrmJYOrderCDOne
-  Left = 296
+  Left = 151
-  Top = 178
+  Top = 186
   Width = 1400
   Height = 741
   Caption = #26816#39564#25253#21578
@@ -1150,6 +1150,18 @@ object frmJYOrderCDOne: TfrmJYOrderCDOne
         HeaderAlignmentHorz = taCenter
         Width = 60
       end
+      object Tv1Column10: TcxGridDBColumn
+        Caption = #23548#20837#23458#25143
+        DataBinding.FieldName = 'DRKH'
+        HeaderAlignmentHorz = taCenter
+        Width = 60
+      end
+      object Tv1Column11: TcxGridDBColumn
+        Caption = #23548#20837#21697#21517
+        DataBinding.FieldName = 'DRname'
+        HeaderAlignmentHorz = taCenter
+        Width = 60
+      end
     end
     object cxGrid1Level1: TcxGridLevel
       GridView = Tv1

检验管理/U_JYOrderCDOne.pas

@@ -249,6 +249,8 @@ type
     ToolButton15: TToolButton;
     Label42: TLabel;
     TZZD: TComboBox;
+    Tv1Column10: TcxGridDBColumn;
+    Tv1Column11: TcxGridDBColumn;
     procedure FormDestroy(Sender: TObject);
     procedure FormClose(Sender: TObject; var Action: TCloseAction);
     procedure FormCreate(Sender: TObject);

检验管理/U_MDdrXx.dfm

@@ -293,6 +293,30 @@ object frmmddrxx: Tfrmmddrxx
         Caption = #23548#20837#25104#20998
         DataBinding.FieldName = 'DRcf'
       end
+      object Tv1Column10: TcxGridDBColumn
+        Caption = #38376#24133
+        DataBinding.FieldName = 'MJFK'
+        HeaderAlignmentHorz = taCenter
+        Width = 60
+      end
+      object Tv1Column11: TcxGridDBColumn
+        Caption = #20811#37325
+        DataBinding.FieldName = 'MJSJKZ'
+        HeaderAlignmentHorz = taCenter
+        Width = 60
+      end
+      object Tv1Column12: TcxGridDBColumn
+        Caption = #21697#21517
+        DataBinding.FieldName = 'DRname'
+        HeaderAlignmentHorz = taCenter
+        Width = 60
+      end
+      object Tv1Column13: TcxGridDBColumn
+        Caption = #23458#25143
+        DataBinding.FieldName = 'DRKH'
+        HeaderAlignmentHorz = taCenter
+        Width = 60
+      end
     end
     object cxGrid1Level1: TcxGridLevel
       GridView = Tv1

检验管理/U_MDdrXx.pas

@@ -82,6 +82,10 @@ type
     Tv1Column7: TcxGridDBColumn;
     Tv1Column8: TcxGridDBColumn;
     Tv1Column9: TcxGridDBColumn;
+    Tv1Column10: TcxGridDBColumn;
+    Tv1Column11: TcxGridDBColumn;
+    Tv1Column12: TcxGridDBColumn;
+    Tv1Column13: TcxGridDBColumn;
     procedure ToolButton3Click(Sender: TObject);
     procedure TBAddClick(Sender: TObject);
     procedure FormShow(Sender: TObject);