From febcdb2c222d9d8328f1cf31f589143edbf0bf01 Mon Sep 17 00:00:00 2001
From: "DESKTOP-E401PHE\\Administrator" <rightsoft@163.com>
Date: Thu, 14 Aug 2025 16:37:19 +0800
Subject: [PATCH] ~

---
 检验管理/U_JYOrderCDOne.dfm | 3 ++-
 检验管理/U_JYOrderCDOne.pas | 2 +-
 检验管理/U_OrderInPut.pas   | 4 ++--
 3 files changed, 5 insertions(+), 4 deletions(-)

diff --git a/检验管理/U_JYOrderCDOne.dfm b/检验管理/U_JYOrderCDOne.dfm
index 1d9e014..9e3a161 100644
--- a/检验管理/U_JYOrderCDOne.dfm
+++ b/检验管理/U_JYOrderCDOne.dfm
@@ -186,7 +186,8 @@ object frmJYOrderCDOne: TfrmJYOrderCDOne
         #22806#38144#30721#21333
         #26816#39564#30721#21333'('#19977#32852#65289
         #26816#39564#30721#21333'('#19977#32852#32454#30721')'
-        #26816#39564#30721#21333'('#19977#32852#31859')')
+        #26816#39564#30721#21333'('#19977#32852#31859')'
+        #22806#38144#30721#21333'2')
     end
     object TBAftChkHX: TToolButton
       Left = 596
diff --git a/检验管理/U_JYOrderCDOne.pas b/检验管理/U_JYOrderCDOne.pas
index 734e2f7..271d309 100644
--- a/检验管理/U_JYOrderCDOne.pas
+++ b/检验管理/U_JYOrderCDOne.pas
@@ -1559,7 +1559,7 @@ begin
 //    SCreateCDS20(ADOQueryTemp, CDS_PRT);
 //    SInitCDSData20(ADOQueryTemp, CDS_PRT);            
   end;
-  if (trim(ComboBox1.Text) = '�����뵥2') then
+  if (trim(ComboBox1.Text) = '�����뵥2') then        
   begin
     with ADOQueryTemp do
     begin
diff --git a/检验管理/U_OrderInPut.pas b/检验管理/U_OrderInPut.pas
index 3acc634..d622786 100644
--- a/检验管理/U_OrderInPut.pas
+++ b/检验管理/U_OrderInPut.pas
@@ -913,12 +913,12 @@ begin
   begin
     Close;
     sql.Clear;
-    sql.Add('select * from Contract_Cloth_LLMX where OrdSubId=''' + Trim(Order_Sub.fieldbyname('SubId').AsString) + '''');
+    sql.Add('select * from WFB_MJJY where SubId=''' + Trim(Order_Sub.fieldbyname('SubId').AsString) + '''');
     Open;
   end;
   if ADOTemp.IsEmpty = False then
   begin
-    Application.MessageBox('�����ϲ���ɾ������!', '��ʾ', 0);
+    Application.MessageBox('�Ѵ������ɾ������!', '��ʾ', 0);
     Exit;
   end;
   with ADOTemp do