[Overview][Constants][Types][Classes][Procedures and functions][Variables] Reference for unit 'CompactUtils' (#powtils_extras)

TObj

[Properties (by Name)] [Methods (by Name)] [Events (by Name)]

Declaration

Source position: compactutils.pas line 194

type TObj = object(_TObj)

protected

  fRefCount: Integer;

  fOnDestroy: TOnEvent;

  procedure DoDestroy;

  fAutoFree: PList;

  fTag: DWORD;

  destructor Destroy; virtual;

  procedure Final;

public

  procedure Free;

  function InstanceSize;

  constructor Create;

  function AncestorOfObject();

  function VmtAddr;

  procedure RefInc;

  procedure RefDec;

  property RefCount: Integer; [r]

  property OnDestroy: TOnEvent; [rw]

  procedure Add2AutoFree();

  procedure Add2AutoFreeEx();

  property Tag: DWORD; [rw]

end;

Inheritance

TObj

_TObj