Class TMt3dmsConcItem

Unit

Mt3dmsChemUnit

Declaration

type TMt3dmsConcItem = class(TCustomModflowBoundaryItem)

Description

TMt3dmsConcItem represents an MT3DMS concentration point source for one time interval. TMt3dmsConcItem is stored by TMt3dmsConcCollection.

Hierarchy

• TCollectionItem
• TOrderedItem
• TCustomBoundaryItem
• TCustomModflowBoundaryItem
• TMt3dmsConcItem

Overview

Fields

FStringConcCollection: TStringConcCollection;

Methods

	procedure SetMt3dmsConc(Index: integer; const Value: string);
	function GetMt3dmsConc(Index: integer): string;
	function GetCollection: TMt3dmsConcCollection;
	procedure SetStringConcCollection(const Value: TStringConcCollection);
	function BoundaryFormulaName(Index: integer): string;
	procedure RenameItems(const OldSpeciesName, NewSpeciesName: string);
	procedure ChangeSpeciesItemPosition(OldIndex, NewIndex: integer);
	procedure AssignObserverEvents(Collection: TCollection); override;
	procedure CreateFormulaObjects; override;
	procedure GetPropertyObserver(Sender: TObject; List: TList); override;
	procedure RemoveFormulaObjects; override;
	function GetBoundaryFormula(Index: integer): string; override;
	procedure SetBoundaryFormula(Index: integer; const Value: string); override;
	function IsSame(AnotherItem: TOrderedItem): boolean; override;
	procedure InvalidateModel; override;
	function BoundaryFormulaCount: integer; override;
	Destructor Destroy; override;
	procedure InsertNewSpecies(SpeciesIndex: integer; const Name: string);
	procedure DeleteSpecies(SpeciesIndex: integer);
	procedure Assign(Source: TPersistent); override;

Properties

	property Collection: TMt3dmsConcCollection read GetCollection;
	property Mt3dmsConcRate[Index:integer]: string read GetMt3dmsConc write SetMt3dmsConc;
	property StringConcCollection: TStringConcCollection read FStringConcCollection write SetStringConcCollection;

Description

Fields

	FStringConcCollection: TStringConcCollection;
See Mt3dmsConcRate.

Methods

	procedure SetMt3dmsConc(Index: integer; const Value: string);
See Mt3dmsConcRate.

	function GetMt3dmsConc(Index: integer): string;

	function GetCollection: TMt3dmsConcCollection;

	procedure SetStringConcCollection(const Value: TStringConcCollection);

	function BoundaryFormulaName(Index: integer): string;

	procedure RenameItems(const OldSpeciesName, NewSpeciesName: string);

	procedure ChangeSpeciesItemPosition(OldIndex, NewIndex: integer);

	procedure AssignObserverEvents(Collection: TCollection); override;

	procedure CreateFormulaObjects; override;

	procedure GetPropertyObserver(Sender: TObject; List: TList); override;

	procedure RemoveFormulaObjects; override;

	function GetBoundaryFormula(Index: integer): string; override;
See BoundaryFormula.

	procedure SetBoundaryFormula(Index: integer; const Value: string); override;
See BoundaryFormula.

	function IsSame(AnotherItem: TOrderedItem): boolean; override;
IsSame checks whether AnotherItem is the same as the current TMt3dmsConcItem.

	procedure InvalidateModel; override;

	function BoundaryFormulaCount: integer; override;

	Destructor Destroy; override;

	procedure InsertNewSpecies(SpeciesIndex: integer; const Name: string);

	procedure DeleteSpecies(SpeciesIndex: integer);

	procedure Assign(Source: TPersistent); override;
Assign copies Source to this TMt3dmsConcItem.

Properties

	property Collection: TMt3dmsConcCollection read GetCollection;

	property Mt3dmsConcRate[Index:integer]: string read GetMt3dmsConc write SetMt3dmsConc;

	property StringConcCollection: TStringConcCollection read FStringConcCollection write SetStringConcCollection;
StringConcCollection is the formula used to set the concentration of this boundary.