Class TCatalogPropGroup

Unit

idCatalog

Declaration

type TCatalogPropGroup = class(TBaseCatalogObject)

Description

TCatalogPropGroup

Hierarchy

• TDBXOMObject
• TBaseCatalogObject
• TCatalogPropGroup

Overview

Methods

	procedure AfterConstruction; override;
	procedure BeforeDestruction; override;
	procedure BaseAssign(_Source: TObject; AssignClasses: Boolean); override;
	procedure WriteToJson(AObject: TlkJSONobject; AWithClasses: Boolean); override;
	procedure ReadFromJson(AObject: TlkJSONObject); override;
	procedure FillFromDataSet(ADataSet: TDBXOMDataSet); override;
	class function CaptionForLocation(ALoc: TGPSBaseLocation; AMeasurementSystem: TMeasurementSystem): WideString; virtual;
	function AddCatalogPeriod (ACatPeriod: TCatalogPeriod): TPeriod;
	function AddExcludeCatalogPeriod (ACatPeriod: TCatalogPeriod): TPeriod;
	function SearchCaption(const AIncludeFilter: Boolean = True): WideString;
	function PublicGroupName(ACatalog: TCatalog = nil): WideString;
	procedure EnumPropsForGUID (const AGUID: String; AResult: TList; AGroups: TList);
	procedure Clear;
	function IsEmpty: Boolean;
	function IsIncludeEmpty: Boolean;
	function IsExcludeEmpty: Boolean;
	function HasIncludedProps: Boolean;
	function HasIncludedCats: Boolean;
	function CanStamp: Boolean;
	procedure MergeGroupIncludes(AGroup: TCatalogPropGroup);
	procedure MergeGroupExcludes(AGroup: TCatalogPropGroup);
	procedure MergeGroup(AGroup: TCatalogPropGroup);
	procedure SubtractGroupIncludes(AGroup: TCatalogPropGroup);
	procedure SubtractGroupExcludes(AGroup: TCatalogPropGroup);
	procedure SubtractGroup(AGroup: TCatalogPropGroup);
	function OverlapsGroup(AGroup: TCatalogPropGroup): Boolean;
	procedure SwapIncludeExclude;
	procedure ClearIncludes;
	procedure ClearExcludes;

Properties

	property PhotoCount: Integer read FPhotoCount write FPhotoCount;
	property IsLabelSet: Boolean read GetIsLabelSet;
	property CountIncludeItems: Integer read GetCountIncludeItems;
	property CountExcludeItems: Integer read GetCountExcludeItems;
	property CountTotalItems: Integer read GetCountTotalItems;
	property SortID: String read GetSortID;
	property Settings: TidElement read FSettings;
	property Tag: PtrInt read FTag write FTag;
	property UserGUID: String read FUserGUID write FUserGUID;
	property GroupName : WideString read FGroupName write FGroupName;
	property IncludeStyle: TCatalogIncludeStyle read FIncludeStyle write FIncludeStyle;
	property VersionsDisplay: TVersionsDisplay read FVersionsDisplay write FVersionsDisplay;
	property MeasurementSystem: TMeasurementSystem read FMeasurementSystem write FMeasurementSystem;
	property IncludeProps : TCatalogItemProps read FIncludeProps write FIncludeProps;
	property ExcludeProps : TCatalogItemProps read FExcludeProps write FExcludeProps;
	property IncludeCats : TCatalogPropCategories read FIncludeCats write FIncludeCats;
	property ExcludeCats : TCatalogPropCategories read FExcludeCats write FExcludeCats;
	property Ratings: TxomStringList read FRatings write FRatings;
	property ExcludeRatings: TxomStringList read FExcludeRatings write FExcludeRatings;
	property Labels: TxomStringList read FLabels write FLabels;
	property ExcludeLabels: TxomStringList read FExcludeLabels write FExcludeLabels;
	property IncludeStacks: TxomStringList read FIncludeStacks write FIncludeStacks;
	property ExcludeStacks: TxomStringList read FExcludeStacks write FExcludeStacks;
	property FileTypes: TxomStringList read FFileTypes write FFileTypes;
	property ExcludeFileTypes: TxomStringList read FExcludeFileTypes write FExcludeFileTypes;
	property FilePaths: TCatalogFilePaths read FFilePaths write FFilePaths;
	property ExcludeFilePaths: TCatalogFilePaths read FExcludeFilePaths write FExcludeFilePaths;
	property Periods: TPeriods read FPeriods write FPeriods;
	property ExcludePeriods: TPeriods read FExcludePeriods write FExcludePeriods;
	property CatalogPeriods: TCatalogPeriods read FCatalogPeriods write FCatalogPeriods;
	property ExcludeCatalogPeriods: TCatalogPeriods read FExcludeCatalogPeriods write FExcludeCatalogPeriods;
	property PlaceHolders: TCatalogPlaceHolders read FPlaceHolders write FPlaceHolders;
	property ExcludePlaceHolders: TCatalogPlaceHolders read FExcludePlaceHolders write FExcludePlaceHolders;
	property MetaItems: TMetaSchemaItems read FMetaItems write FMetaItems;
	property ExcludeMetaItems: TMetaSchemaItems read FExcludeMetaItems write FExcludeMetaItems;
	property MetaOccurrences: TMetaSchemaItemOccurences read FMetaOccurrences write FMetaOccurrences;
	property ExcludeMetaOccurrences: TMetaSchemaItemOccurences read FExcludeMetaOccurrences write FExcludeMetaOccurrences;
	property States: TCatalogStateObjects read FStates write FStates;
	property ExcludeStates: TCatalogStateObjects read FExcludeStates write FExcludeStates;
	property FilePathStates: TFilePathStateObjects read FFilePathStates write FFilePathStates;
	property ExcludeFilePathStates: TFilePathStateObjects read FExcludeFilePathStates write FExcludeFilePathStates;
	property StackMarkers: TStackMarkerObjects read FStackMarkers write FStackMarkers;
	property ExcludeStackMarkers: TStackMarkerObjects read FExcludeStackMarkers write FExcludeStackMarkers;
	property GroupType: String read FGroupType write FGroupType;
	property Collections : TImageCollections read FCollections write FCollections;
	property ExcludeCollections : TImageCollections read FExcludeCollections write FExcludeCollections;
	property Galleries : TImageGalleries read FGalleries write FGalleries;
	property ExcludeGalleries : TImageGalleries read FExcludeGalleries write FExcludeGalleries;
	property Albums : TImageModelItems read FAlbums write FAlbums;
	property ExcludeAlbums : TImageModelItems read FExcludeAlbums write FExcludeAlbums;
	property IncludeGroups : TCatalogPropGroups read FIncludeGroups write FIncludeGroups;
	property ExcludeGroups : TCatalogPropGroups read FExcludeGroups write FExcludeGroups;
	property FreeSearch : WideString read FFreeSearch write FFreeSearch;
	property ExclFreeSearch : WideString read FExclFreeSearch write FExclFreeSearch;
	property IncludeItems : TCatalogItems read FIncludeItems write FIncludeItems;
	property ExcludeItems : TCatalogItems read FExcludeItems write FExcludeItems;
	property IncludeLocations : TGPSBaseLocations read FIncludeLocations write FIncludeLocations;
	property ExcludeLocations : TGPSBaseLocations read FExcludeLocations write FExcludeLocations;
	property DynamicContent: Boolean read FDynamicContent write FDynamicContent;
	property AdvancedSearch: Boolean read FAdvancedSearch write FAdvancedSearch;
	property CustomSettings: TidElement read FCustomSettings write FCustomSettings;
	property QueryInfo: TCatalogPropGroupResultQueryInfo read FQueryInfo write FQueryInfo;

Description

Methods

	procedure AfterConstruction; override;

	procedure BeforeDestruction; override;

	procedure BaseAssign(_Source: TObject; AssignClasses: Boolean); override;

	procedure WriteToJson(AObject: TlkJSONobject; AWithClasses: Boolean); override;

	procedure ReadFromJson(AObject: TlkJSONObject); override;

	procedure FillFromDataSet(ADataSet: TDBXOMDataSet); override;

	class function CaptionForLocation(ALoc: TGPSBaseLocation; AMeasurementSystem: TMeasurementSystem): WideString; virtual;

	function AddCatalogPeriod (ACatPeriod: TCatalogPeriod): TPeriod;

	function AddExcludeCatalogPeriod (ACatPeriod: TCatalogPeriod): TPeriod;

	function SearchCaption(const AIncludeFilter: Boolean = True): WideString;

	function PublicGroupName(ACatalog: TCatalog = nil): WideString;

	procedure EnumPropsForGUID (const AGUID: String; AResult: TList; AGroups: TList);

	procedure Clear;

	function IsEmpty: Boolean;

	function IsIncludeEmpty: Boolean;

	function IsExcludeEmpty: Boolean;

	function HasIncludedProps: Boolean;

	function HasIncludedCats: Boolean;

	function CanStamp: Boolean;

	procedure MergeGroupIncludes(AGroup: TCatalogPropGroup);

	procedure MergeGroupExcludes(AGroup: TCatalogPropGroup);

	procedure MergeGroup(AGroup: TCatalogPropGroup);

	procedure SubtractGroupIncludes(AGroup: TCatalogPropGroup);

	procedure SubtractGroupExcludes(AGroup: TCatalogPropGroup);

	procedure SubtractGroup(AGroup: TCatalogPropGroup);

	function OverlapsGroup(AGroup: TCatalogPropGroup): Boolean;

	procedure SwapIncludeExclude;

	procedure ClearIncludes;

	procedure ClearExcludes;

Properties

	property PhotoCount: Integer read FPhotoCount write FPhotoCount;

	property IsLabelSet: Boolean read GetIsLabelSet;

	property CountIncludeItems: Integer read GetCountIncludeItems;

	property CountExcludeItems: Integer read GetCountExcludeItems;

	property CountTotalItems: Integer read GetCountTotalItems;

	property SortID: String read GetSortID;

	property Settings: TidElement read FSettings;

	property Tag: PtrInt read FTag write FTag;

	property UserGUID: String read FUserGUID write FUserGUID;

	property GroupName : WideString read FGroupName write FGroupName;

	property IncludeStyle: TCatalogIncludeStyle read FIncludeStyle write FIncludeStyle;

	property VersionsDisplay: TVersionsDisplay read FVersionsDisplay write FVersionsDisplay;

	property MeasurementSystem: TMeasurementSystem read FMeasurementSystem write FMeasurementSystem;

	property IncludeProps : TCatalogItemProps read FIncludeProps write FIncludeProps;

	property ExcludeProps : TCatalogItemProps read FExcludeProps write FExcludeProps;

	property IncludeCats : TCatalogPropCategories read FIncludeCats write FIncludeCats;

	property ExcludeCats : TCatalogPropCategories read FExcludeCats write FExcludeCats;

	property Ratings: TxomStringList read FRatings write FRatings;

	property ExcludeRatings: TxomStringList read FExcludeRatings write FExcludeRatings;

	property Labels: TxomStringList read FLabels write FLabels;

	property ExcludeLabels: TxomStringList read FExcludeLabels write FExcludeLabels;

	property IncludeStacks: TxomStringList read FIncludeStacks write FIncludeStacks;

	property ExcludeStacks: TxomStringList read FExcludeStacks write FExcludeStacks;

	property FileTypes: TxomStringList read FFileTypes write FFileTypes;

	property ExcludeFileTypes: TxomStringList read FExcludeFileTypes write FExcludeFileTypes;

	property FilePaths: TCatalogFilePaths read FFilePaths write FFilePaths;

	property ExcludeFilePaths: TCatalogFilePaths read FExcludeFilePaths write FExcludeFilePaths;

	property Periods: TPeriods read FPeriods write FPeriods;

	property ExcludePeriods: TPeriods read FExcludePeriods write FExcludePeriods;

	property CatalogPeriods: TCatalogPeriods read FCatalogPeriods write FCatalogPeriods;

	property ExcludeCatalogPeriods: TCatalogPeriods read FExcludeCatalogPeriods write FExcludeCatalogPeriods;

	property PlaceHolders: TCatalogPlaceHolders read FPlaceHolders write FPlaceHolders;

	property ExcludePlaceHolders: TCatalogPlaceHolders read FExcludePlaceHolders write FExcludePlaceHolders;

	property MetaItems: TMetaSchemaItems read FMetaItems write FMetaItems;

	property ExcludeMetaItems: TMetaSchemaItems read FExcludeMetaItems write FExcludeMetaItems;

	property MetaOccurrences: TMetaSchemaItemOccurences read FMetaOccurrences write FMetaOccurrences;

	property ExcludeMetaOccurrences: TMetaSchemaItemOccurences read FExcludeMetaOccurrences write FExcludeMetaOccurrences;

	property States: TCatalogStateObjects read FStates write FStates;

	property ExcludeStates: TCatalogStateObjects read FExcludeStates write FExcludeStates;

	property FilePathStates: TFilePathStateObjects read FFilePathStates write FFilePathStates;

	property ExcludeFilePathStates: TFilePathStateObjects read FExcludeFilePathStates write FExcludeFilePathStates;

	property StackMarkers: TStackMarkerObjects read FStackMarkers write FStackMarkers;

	property ExcludeStackMarkers: TStackMarkerObjects read FExcludeStackMarkers write FExcludeStackMarkers;

	property GroupType: String read FGroupType write FGroupType;

	property Collections : TImageCollections read FCollections write FCollections;

	property ExcludeCollections : TImageCollections read FExcludeCollections write FExcludeCollections;

	property Galleries : TImageGalleries read FGalleries write FGalleries;

	property ExcludeGalleries : TImageGalleries read FExcludeGalleries write FExcludeGalleries;

	property Albums : TImageModelItems read FAlbums write FAlbums;

	property ExcludeAlbums : TImageModelItems read FExcludeAlbums write FExcludeAlbums;

	property IncludeGroups : TCatalogPropGroups read FIncludeGroups write FIncludeGroups;

	property ExcludeGroups : TCatalogPropGroups read FExcludeGroups write FExcludeGroups;

	property FreeSearch : WideString read FFreeSearch write FFreeSearch;

	property ExclFreeSearch : WideString read FExclFreeSearch write FExclFreeSearch;

	property IncludeItems : TCatalogItems read FIncludeItems write FIncludeItems;

	property ExcludeItems : TCatalogItems read FExcludeItems write FExcludeItems;

	property IncludeLocations : TGPSBaseLocations read FIncludeLocations write FIncludeLocations;

	property ExcludeLocations : TGPSBaseLocations read FExcludeLocations write FExcludeLocations;

	property DynamicContent: Boolean read FDynamicContent write FDynamicContent;
set DynamicContent to true when the content of the group is not stored in the DB

	property AdvancedSearch: Boolean read FAdvancedSearch write FAdvancedSearch;
set AdvancedSearch to true when this group is constructed in the Metadata Search frame

	property CustomSettings: TidElement read FCustomSettings write FCustomSettings;

	property QueryInfo: TCatalogPropGroupResultQueryInfo read FQueryInfo write FQueryInfo;