Class TClassificationList

Unit

ClassificationUnit

Declaration

type TClassificationList = class(TObject)

Description

TClassificationList is a list of TClassificationObjects. TClassificationList does not own the TClassificationObjects it contains.

Hierarchy

• TObject
• TClassificationList

Overview

Fields

FList: TList;

Methods

	function GetCount: integer;
	function GetItems(Index: integer): TClassificationObject;
	procedure SetItems(Index: integer; const Value: TClassificationObject);
	procedure Add(Item: TClassificationObject);
	constructor Create;
	Destructor Destroy; override;
	Function IndexOf(Item: TClassificationObject): integer;
	procedure Pack;

Properties

	property Count: integer read GetCount;
	property Items[Index:integer]: TClassificationObject read GetItems write SetItems;

Description

Fields

	FList: TList;
FList is a private TList that stores TClassificationObjects.

Methods

	function GetCount: integer;
GetCount returns FList.Count.

	function GetItems(Index: integer): TClassificationObject;
GetItems returns FList[Index].

	procedure SetItems(Index: integer; const Value: TClassificationObject);
SetItems sets FList[Index].

	procedure Add(Item: TClassificationObject);
Add calls FList.Count.

	constructor Create;
Create creates FList.

	Destructor Destroy; override;
Destroy destroys FList.

	Function IndexOf(Item: TClassificationObject): integer;
IndexOf returns FList.IndexOf(Item)

	procedure Pack;
Pack calls FList.Pack.

Properties

	property Count: integer read GetCount;
Count calls FList.Count.

	property Items[Index:integer]: TClassificationObject read GetItems write SetItems;
Items restores and sets TClassificationObjects.