From 3029258ff75ab369144d2dbc6d18e60d55948f3d Mon Sep 17 00:00:00 2001
From: rswindell <>
Date: Tue, 21 May 2002 11:27:22 +0000
Subject: [PATCH] Increased sleep back to 1 sec, added TThreadList comment.

---
 src/xpdev/clx/ThreadCreate/ThreadUnit.cpp | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/xpdev/clx/ThreadCreate/ThreadUnit.cpp b/src/xpdev/clx/ThreadCreate/ThreadUnit.cpp
index b850c06169..b69dd7a759 100644
--- a/src/xpdev/clx/ThreadCreate/ThreadUnit.cpp
+++ b/src/xpdev/clx/ThreadCreate/ThreadUnit.cpp
@@ -34,10 +34,11 @@ void __fastcall TMyThread::Execute()
 {
 	while(!Terminated) {
     	Synchronize(AddToLog);
+        /* TThreadList is a simplier way to use a thread-safe TList */
 		CriticalSection->Enter();
 		List->Add(new AnsiString(ThreadID));
         CriticalSection->Leave();
- 	    Sleep(1);
+ 	    Sleep(1000);
     }
 }
 //---------------------------------------------------------------------------
-- 
GitLab