Почему нельзя войти в критическую секцию без Sleep(1)? [Code] type TMyThread = class(TThread) public procedure Execute; override; end; var T: TMyThread; c: TRTLCriticalSection; implementation procedure TForm1.FormCreate(Sender: TObject); begin InitializeCriticalSection(c); T := TMyThread.Create(false); end; procedure TMyThread.Execute; begin repeat EnterCriticalSection(c); Sleep(100); LeaveCriticalSection(c); //sleep(1); ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83489