From 97f3deb714a5e63e6854fc59f3caf2daedd9119b Mon Sep 17 00:00:00 2001
From: "DESKTOP-E401PHE\\Administrator" <rightsoft@163.com>
Date: Sun, 4 Jan 2026 14:45:31 +0800
Subject: [PATCH] ~

---
 打卷检验管理/U_OrderInPut.dfm | 12 ++++++------
 打卷检验管理/U_OrderInPut.pas | 21 +++++++++++++++++----
 2 files changed, 23 insertions(+), 10 deletions(-)

diff --git a/打卷检验管理/U_OrderInPut.dfm b/打卷检验管理/U_OrderInPut.dfm
index e726f0c..5b60122 100644
--- a/打卷检验管理/U_OrderInPut.dfm
+++ b/打卷检验管理/U_OrderInPut.dfm
@@ -18,7 +18,7 @@ object frmOrderInPut: TfrmOrderInPut
   object ToolBar1: TToolBar
     Left = 0
     Top = 0
-    Width = 1371
+    Width = 1363
     Height = 29
     ButtonHeight = 30
     ButtonWidth = 59
@@ -66,7 +66,7 @@ object frmOrderInPut: TfrmOrderInPut
   object ScrollBox1: TScrollBox
     Left = 0
     Top = 29
-    Width = 1371
+    Width = 1363
     Height = 280
     Align = alTop
     BevelInner = bvNone
@@ -1521,7 +1521,7 @@ object frmOrderInPut: TfrmOrderInPut
       OnClick = Button1Click
     end
     object GroupBox1: TGroupBox
-      Left = 945
+      Left = 937
       Top = 0
       Width = 424
       Height = 278
@@ -1548,7 +1548,7 @@ object frmOrderInPut: TfrmOrderInPut
   object ToolBar2: TToolBar
     Left = 0
     Top = 309
-    Width = 1371
+    Width = 1363
     Height = 29
     ButtonHeight = 30
     ButtonWidth = 83
@@ -1595,8 +1595,8 @@ object frmOrderInPut: TfrmOrderInPut
   object cxGrid1: TcxGrid
     Left = 0
     Top = 338
-    Width = 1371
-    Height = 392
+    Width = 1363
+    Height = 384
     Align = alClient
     TabOrder = 3
     object Tv1: TcxGridDBTableView
diff --git a/打卷检验管理/U_OrderInPut.pas b/打卷检验管理/U_OrderInPut.pas
index cf5b559..5d82ad2 100644
--- a/打卷检验管理/U_OrderInPut.pas
+++ b/打卷检验管理/U_OrderInPut.pas
@@ -12,7 +12,20 @@ uses
   cxCurrencyEdit, cxImage, Menus, cxLookAndFeelPainters, cxButtons, cxDBEdit,
   cxGridCustomPopupMenu, cxGridPopupMenu, cxLookAndFeels, cxNavigator,
   RM_Dataset, RM_System, RM_Common, RM_Class, RM_GridReport, RM_Preview,
-  RM_DsgGridReport, RM_e_Graphic, RM_e_bmp;
+  RM_DsgGridReport, RM_e_Graphic, RM_e_bmp, dxSkinsCore, dxSkinBlack,
+  dxSkinBlue, dxSkinBlueprint, dxSkinCaramel, dxSkinCoffee, dxSkinDarkRoom,
+  dxSkinDarkSide, dxSkinDevExpressDarkStyle, dxSkinDevExpressStyle,
+  dxSkinFoggy, dxSkinGlassOceans, dxSkinHighContrast, dxSkiniMaginary,
+  dxSkinLilian, dxSkinLiquidSky, dxSkinLondonLiquidSky, dxSkinMcSkin,
+  dxSkinMetropolis, dxSkinMetropolisDark, dxSkinMoneyTwins,
+  dxSkinOffice2007Black, dxSkinOffice2007Blue, dxSkinOffice2007Green,
+  dxSkinOffice2007Pink, dxSkinOffice2007Silver, dxSkinOffice2010Black,
+  dxSkinOffice2010Blue, dxSkinOffice2010Silver, dxSkinOffice2013DarkGray,
+  dxSkinOffice2013LightGray, dxSkinOffice2013White, dxSkinPumpkin,
+  dxSkinSeven, dxSkinSevenClassic, dxSkinSharp, dxSkinSharpPlus,
+  dxSkinSilver, dxSkinSpringTime, dxSkinStardust, dxSkinSummer2008,
+  dxSkinTheAsphaltWorld, dxSkinsDefaultPainters, dxSkinValentine,
+  dxSkinVS2010, dxSkinWhiteprint, dxSkinXmas2008Blue, dxSkinscxPCPainter;
 
 type
   TfrmOrderInPut = class(TForm)
@@ -583,7 +596,7 @@ begin
         FieldByName('editcnt').Value := strtointdef(trim(editcnt.Text), 0);
         FieldByName('PBPrice').Value := strtofloatdef(trim(PBPrice.Text), 0);
         FieldByName('PBQty').Value := strtofloatdef(trim(PBQty.Text), 0);
-        FieldByName('Orddefstr15').Value := '���׺�����';
+        FieldByName('Orddefstr15').Value := '����ɫ����';
         FieldByName('status').Value := '0';
         Post;
       end;
@@ -642,8 +655,8 @@ begin
 //        FieldByName('Filltime').Value := SGetServerDateTime(ADOTemp);
 //      end
 //      else
-//      begin
-//        FieldByName('Editer').Value := Trim(DName);
+//      begin                      
+//        FieldByName('Editer').Value := Trim(DName);                       
 //        FieldByName('EditTime').Value := SGetServerDateTime(ADOTemp);
 //      end;
 //      FieldByName('LBNameNote').Value := Trim(LBNameNote.Text);