TInterlocked.Exchange function

class function Exchange(var Target: LongInt; Value: LongInt): LongInt
 ; overload; static
class function Exchange(var Target: Int64; Value: Int64): Int64
 ; overload; static
class function Exchange(var Target: Pointer; Value: Pointer): Pointer
 ; overload; static
class function Exchange(var Target: TObject; Value: TObject): TObject
 ; overload; static
class function Exchange<T: class>(var Target: T; Value: T): T
 ; overload; static