A Delphi Unit that implements weak references for objects.