Ein TDictionary ist nicht thread-safe, also wird dir da nen parallel for nicht viel bringen.
Die Operation, die im ersten Post gefragt war, ist O(n) wobei n die Anzahl der Elemente in A ist, also nix wildes, wo man sich Sorgen machen müsste.
Delphi-Quellcode:
for var key in a.Keys do
b.Remove(key);