[eXplorer]

Это понял... спасибо...
извеняюсь за колличество вопросов в одной теме...

Код:

procedure TMyThread.Execute;
var
i2:integer;
begin
for i2:=1 to 10000 do begin
cs.enter;
  S:=inttostr(i2);
cs.leave;
  Synchronize(Avatar);
end;
end;

почему этот код выполняют все 5 потоков одновременно? если стоит CriticalSection... или я делаю что не так.... или я туплю