diff --git a/坯布生产计划(WeavingSchedule)/ProjectGroup1.bpg b/坯布生产计划(WeavingSchedule)/ProjectGroup1.bpg
index 7c050f6..29d6bdc 100644
--- a/坯布生产计划(WeavingSchedule)/ProjectGroup1.bpg
+++ b/坯布生产计划(WeavingSchedule)/ProjectGroup1.bpg
@@ -9,15 +9,15 @@ MAKE = $(ROOT)\bin\make.exe -$(MAKEFLAGS) -f$**
 DCC = $(ROOT)\bin\dcc32.exe $**
 BRCC = $(ROOT)\bin\brcc32.exe $**
 #------------------------------------------------------------------------------
-PROJECTS = testDll.exe ProductPrice.dll
+PROJECTS = WeavingSchedule.dll testDll.exe
 #------------------------------------------------------------------------------
 default: $(PROJECTS)
 #------------------------------------------------------------------------------
 
+WeavingSchedule.dll: WeavingSchedule.dpr
+  $(DCC)
+
 testDll.exe: testDll.dpr
   $(DCC)
 
-ProductPrice.dll: ProductPrice.dpr
-  $(DCC)
-
 
diff --git a/坯布生产计划(WeavingSchedule)/U_ClothSCDCGAnPai.pas b/坯布生产计划(WeavingSchedule)/U_ClothSCDCGAnPai.pas
index 67d4915..6a9f39b 100644
--- a/坯布生产计划(WeavingSchedule)/U_ClothSCDCGAnPai.pas
+++ b/坯布生产计划(WeavingSchedule)/U_ClothSCDCGAnPai.pas
@@ -1099,8 +1099,8 @@ procedure TfrmClothSCDCGAnPai.PSKeyPress(Sender: TObject; var Key: Char);
 begin
   if Key = #13 then
   begin
-    Button2.Click;
     Button2.Enabled := False;
+    Button2.Click;
   end;
 end;
 
diff --git a/坯布生产计划(WeavingSchedule)/WeavingSchedule.dof b/坯布生产计划(WeavingSchedule)/WeavingSchedule.dof
index e7ecb37..86d6646 100644
--- a/坯布生产计划(WeavingSchedule)/WeavingSchedule.dof
+++ b/坯布生产计划(WeavingSchedule)/WeavingSchedule.dof
@@ -101,7 +101,7 @@ DebugSourceDirs=
 UsePackages=0
 [Parameters]
 RunParams=
-HostApplication=D:\Dp7Repo\��Ŀ����\���\���������ƻ�(WeavingSchedule)\testDll.exe
+HostApplication=E:\��Ŀ����\01_��֯��\���\D7zzXiangHeng\���������ƻ�(WeavingSchedule)\testDll.exe
 Launcher=
 UseLauncher=0
 DebugCWD=