Class TImageCollections

Unit

idCore

Declaration

type TImageCollections = class(TIDIClass)

Description

TImageCollections

Hierarchy

• TDBXOMClass
• TIDIClass
• TImageCollections

Overview

Methods

	procedure AfterConstruction; override;
	function Add: TImageCollection; reintroduce; virtual;
	procedure BuildNewGUIDs;
	function CountFilled (const AExcludedGUID: String = ''): Integer; virtual;
	function CountRelevant: Integer; virtual;
	function FindSource (const ASource: WideString): TImageCollection; virtual;
	function FindNamed (const AName: WideString): TImageCollection; virtual;
	function FindCollection(const ACollectionGUID: String): TImageCollection;
	function HasUpFolder: Boolean;
	procedure EnumImagesForPeriod (APeriod: TPeriod; var ACollection: TImageCollection);
	function UniqueCollectionName (ACollection: TImageCollection; DefaultName: WideString = 'Coll'): WideString;

Properties

	property Items[Index:Integer]: TImageCollection read GetItem write SetItem;
	property Tag: PtrInt read FTag write FTag;
	property Gallery: TImageGallery read FGallery write FGallery;
	property ParentCollection: TImageCollection read FParentCollection write FParentCollection;
	property GalleryName: WideString read FGalleryName write FGalleryName;

Description

Methods

	procedure AfterConstruction; override;

	function Add: TImageCollection; reintroduce; virtual;

	procedure BuildNewGUIDs;

	function CountFilled (const AExcludedGUID: String = ''): Integer; virtual;

	function CountRelevant: Integer; virtual;

	function FindSource (const ASource: WideString): TImageCollection; virtual;

	function FindNamed (const AName: WideString): TImageCollection; virtual;

	function FindCollection(const ACollectionGUID: String): TImageCollection;

	function HasUpFolder: Boolean;

	procedure EnumImagesForPeriod (APeriod: TPeriod; var ACollection: TImageCollection);

	function UniqueCollectionName (ACollection: TImageCollection; DefaultName: WideString = 'Coll'): WideString;

Properties

	property Items[Index:Integer]: TImageCollection read GetItem write SetItem;

	property Tag: PtrInt read FTag write FTag;

	property Gallery: TImageGallery read FGallery write FGallery;

	property ParentCollection: TImageCollection read FParentCollection write FParentCollection;
never make this published!!

	property GalleryName: WideString read FGalleryName write FGalleryName;