TThreadPool übernimmt Min/MaxWorkerCount nicht?

[Zacherl]

Hallo zusammen,

ich starte mehrere Tasks per TTask.Run. Jetzt versuche ich die Anzahl der Worker Threads zu erhöhen. Hierzu habe ich einen eigenen ThreadPool erstellt:

Delphi-Quellcode:

TaskPool := TThreadPool.Create;
    try
      TaskPool.SetMinWorkerThreads(64);
      TaskPool.SetMaxWorkerThreads(128);

und diesen der Run Methode als Parameter mitgegeben:

Delphi-Quellcode:

Result := TTask.Run(procedure
  begin
   // ..
  end, TaskPool);

Leider scheint dies absolut keine Auswirkung auf die Anzahl der Threads zu haben (im Taskmanager werden immer maximal 20 Threads angezeigt).

Irgendjemand ne Idee?

Viele Grüße
Zacherl