TSDOBaseDataObject

type TSDOBaseDataObject = class(TInterfacedObject,IInterface,ISDODataObject,ISDODataObjectEx,IDataObjectObserver)

protected

  function _Release;

  procedure PrepareDataBuffer;

  procedure FreeBuffer;

  function parsePropertyPath();

  function IsOwnerOf(); virtual;

  function CreateList();

  procedure InitializeDefaultValues;

  procedure RecordChange();

  procedure NotifyReferencersForDeletion;

  function IsInstanceOf();

  function IsAncestorOf();

  procedure setContainer();

  function getPropertyIndex();

  function getInstanceProperties; virtual;

  function getProperty();

  function getContainer;

  function getContainmentProperty;

  function getType;

  function getTypeEnum;

  function getList();

  function getDataObject();

  procedure setDataObject();

  function getBoolean();

  procedure setBoolean();

  function getByte();

  procedure setByte();

  function getCharacter();

  procedure setCharacter();

  function getBytes();

  procedure setBytes();

  function getCurrency();

  procedure setCurrency();

  function getString();

  procedure setString();

  function getDate();

  procedure setDate();

  function getDouble();

  procedure setDouble();

  function getFloat();

  procedure setFloat();

  function getInteger();

  procedure setInteger();

  function getLong();

  procedure setLong();

  function getShort();

  procedure setShort();

  function getVariant();

  procedure setVariant();

  procedure setNull();

  function isNull();

  function isSet();

  procedure unset();

  function createDataObject();

  function getChangeSummary; overload;

  procedure clear;

  procedure NotifyDeletion();

  procedure AddReference();

  procedure RemoveReference();

  procedure NotifyContainedObjectsForDeletion();

  procedure addProperty();

public

  constructor Create(); virtual;

  destructor Destroy; override;

end;

TSDOBaseDataObject

TObject,IInterface,ISDODataObject,ISDODataObjectEx,IDataObjectObserver