Class TUsedWithModelCollection

Unit

ScreenObjectUnit

Declaration

type TUsedWithModelCollection = class(TPhastCollection)

Description

TPhastCollection invalidates the model when it is changed.

Hierarchy

• TCollection
• TPhastCollection
• TUsedWithModelCollection

Overview

Fields

FUsedWithAllModels: boolean;

Methods

	procedure SetUsedWithAllModels(const Value: boolean);
	procedure Assign(Source: TPersistent); override;
	constructor Create(Model: TBaseModel);
	function UsesModel(AModel: TBaseModel): boolean;
	procedure AddModel(AModel: TBaseModel);
	procedure RemoveModel(AModel: TBaseModel);

Properties

property UsedWithAllModels: boolean read FUsedWithAllModels write SetUsedWithAllModels default True;

Description

Fields

	FUsedWithAllModels: boolean;

Methods

	procedure SetUsedWithAllModels(const Value: boolean);

	procedure Assign(Source: TPersistent); override;

	constructor Create(Model: TBaseModel);

	function UsesModel(AModel: TBaseModel): boolean;

	procedure AddModel(AModel: TBaseModel);

	procedure RemoveModel(AModel: TBaseModel);

Properties

	property UsedWithAllModels: boolean read FUsedWithAllModels write SetUsedWithAllModels default True;