Lines Matching refs:TRefCountedObject

35   TRefCountedObject = class(TFreeNotifyingObject)  class
40     FDebugNext, FDebugPrev: TRefCountedObject;
86 var FUnfreedRefObjList: TRefCountedObject = nil;
116 procedure TRefCountedObject.AddReference{$IFDEF WITH_REFCOUNT_DEBUG}(DebugIdAdr: Pointer = nil; Deb…
124   If TMethod(@DoReferenceAdded).Code <> Pointer(@TRefCountedObject.DoReferenceAdded) then
129 procedure TRefCountedObject.DbgAddName(DebugIdAdr: Pointer; DebugIdTxt: String);
154 procedure TRefCountedObject.DbgRemoveName(DebugIdAdr: Pointer; DebugIdTxt: String);
178 procedure TRefCountedObject.DoFree;
187 procedure TRefCountedObject.DoReferenceAdded;
192 procedure TRefCountedObject.DoReferenceReleased;
197 constructor TRefCountedObject.Create;
214 destructor TRefCountedObject.Destroy;
240 procedure TRefCountedObject.ReleaseReference{$IFDEF WITH_REFCOUNT_DEBUG}(DebugIdAdr: Pointer = nil;…
255   If TMethod(@DoReferenceReleased).Code <> Pointer(@TRefCountedObject.DoReferenceReleased) then
267 procedure TRefCountedObject.DbgRenameReference(DebugIdAdr: Pointer; DebugIdTxt: String);
273 procedure TRefCountedObject.DbgRenameReference(OldDebugIdAdr: Pointer; OldDebugIdTxt: String;
286     lnAdded:   TRefCountedObject(Ptr).AddReference;
288     lnDeleted: TRefCountedObject(Ptr).ReleaseReference;
295           (TObject(ARefCountedObject) is TRefCountedObject),
301   if (TObject(ARefCountedObject) is TRefCountedObject) then
302 …TRefCountedObject(ARefCountedObject).ReleaseReference{$IFDEF WITH_REFCOUNT_DEBUG}(DebugIdAdr, Debu…
308   RefObj: TRefCountedObject;
311           (TObject(ARefCountedObject) is TRefCountedObject),
317   if (TObject(ARefCountedObject) is TRefCountedObject) then
318     RefObj := TRefCountedObject(ARefCountedObject)