Загрузить объект в контейнер
function AddObject(aObjectKey: int64; aObjectPtr: TObject = nil;
flReplaceIfExists: boolean = true; aSection: integer = 0): boolean;
aObjectKey
aObjectPtr
flReplaceIfExists
aSection
false если объект с указанным идентификатором уже загружен в контейнер, иначе true