InterlockedIncrement in welcher Unit?

[Papaschlumpf73]

Und was ist das?

Delphi-Quellcode:

function MyFreeMem(P: Pointer): Integer;
begin
  { Route the call. }
  Result := OldMemMgr.FreeMem(P);

  { Safely increment the counter. }
  Interlocke1dIncrement(FreeMemCalls);
end;

Interlocke1???