Class TChildDiscretization

Unit

PhastModelUnit

Declaration

type TChildDiscretization = class(TOrderedItem)

Description

TOrderedItem is designed to allow TOrderedCollection to identify changed and new items during TOrderedCollection.Assign.

Hierarchy

• TCollectionItem
• TOrderedItem
• TChildDiscretization

Overview

Fields

	FParentLayerNumber: integer;
	FLayerGroup: TLayerGroup;
	FLayerGroupName: string;
	FDiscretization: integer;

Methods

	procedure SetDiscretization(const Value: integer);
	procedure SetLayerGroup(const Value: TLayerGroup);
	procedure SetLayerGroupName(const Value: string);
	procedure SetParentLayerNumber(const Value: integer);
	function GetLayerGroupName: string;
	function GetLayerGroup: TLayerGroup;
	function GetDiscretization: integer;
	function IsSame(AnotherItem: TOrderedItem): boolean; override;
	procedure Loaded;
	constructor Create(Collection: TCollection); override;
	procedure Assign(Source: TPersistent); override;

Properties

	property LayerGroup: TLayerGroup read GetLayerGroup write SetLayerGroup;
	property LayerGroupName: string read GetLayerGroupName write SetLayerGroupName;
	property ParentLayerNumber: integer read FParentLayerNumber write SetParentLayerNumber;
	property Discretization: integer read GetDiscretization write SetDiscretization default 1;

Description

Fields

	FParentLayerNumber: integer;

	FLayerGroup: TLayerGroup;

	FLayerGroupName: string;

	FDiscretization: integer;

Methods

	procedure SetDiscretization(const Value: integer);

	procedure SetLayerGroup(const Value: TLayerGroup);

	procedure SetLayerGroupName(const Value: string);

	procedure SetParentLayerNumber(const Value: integer);

	function GetLayerGroupName: string;

	function GetLayerGroup: TLayerGroup;

	function GetDiscretization: integer;

	function IsSame(AnotherItem: TOrderedItem): boolean; override;

	procedure Loaded;

	constructor Create(Collection: TCollection); override;

	procedure Assign(Source: TPersistent); override;

Properties

	property LayerGroup: TLayerGroup read GetLayerGroup write SetLayerGroup;

	property LayerGroupName: string read GetLayerGroupName write SetLayerGroupName;

	property ParentLayerNumber: integer read FParentLayerNumber write SetParentLayerNumber;
ParentLayerNumber refers to the layer within the LayerGroup. ParentLayerNumber starts at 0.

	property Discretization: integer read GetDiscretization write SetDiscretization default 1;