RS
constructor Create(CreateSuspended: Boolean;
const StackSize: SizeUInt = DefaultStackSize);
Вот попробовать поиграть с этим параметром StackSize
В свое время уменьшив его получилось запускать более 1000 потоков одновременно на 32x машине.Оставляя по умолчанию - не хватало памяти