Class TSfrItem

Unit

ModflowSfrReachUnit

Declaration

type TSfrItem = class(TCustomModflowBoundaryItem)

Description

TSfrItem represents a MODFLOW Streamflow Routing boundary for one time interval. TSfrItem is stored by TSfrCollection.

Hierarchy

• TCollectionItem
• TOrderedItem
• TCustomBoundaryItem
• TCustomModflowBoundaryItem
• TSfrItem

Overview

Fields

	FStreamBedThickness: TFormulaObject;
	FStreambedElevation: TFormulaObject;
	FHydraulicConductivity: TFormulaObject;
	FStreamSlope: TFormulaObject;
	FBrooksCoreyExponent: TFormulaObject;
	FVerticalK: TFormulaObject;
	FInitialWaterContent: TFormulaObject;
	FSaturatedWaterContent: TFormulaObject;
	FReachLength: TFormulaObject;

Methods

	procedure SetHydraulicConductivity(const Value: string);
	procedure SetStreambedElevation(const Value: string);
	procedure SetStreamBedThickness(const Value: string);
	procedure SetStreamSlope(const Value: string);
	procedure SetBrooksCoreyExponent(const Value: string);
	procedure SetInitialWaterContent(const Value: string);
	procedure SetSaturatedWaterContent(const Value: string);
	procedure SetVerticalK(const Value: string);
	procedure SetReachLength(const Value: string);
	function ScreenObject: TObject;
	function GetBrooksCoreyExponent: string;
	function GetHydraulicConductivity: string;
	function GetInitialWaterContent: string;
	function GetReachLength: string;
	function GetSaturatedWaterContent: string;
	function GetStreambedElevation: string;
	function GetStreamBedThickness: string;
	function GetStreamSlope: string;
	function GetVerticalK: string;
	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;
	constructor Create(Collection: TCollection); override;
	procedure Assign(Source: TPersistent); override;
	Destructor Destroy; override;

Properties

	property ReachLength: string read GetReachLength write SetReachLength;
	property HydraulicConductivity: string read GetHydraulicConductivity write SetHydraulicConductivity;
	property StreamBedThickness: string read GetStreamBedThickness write SetStreamBedThickness;
	property StreambedElevation: string read GetStreambedElevation write SetStreambedElevation;
	property StreamSlope: string read GetStreamSlope write SetStreamSlope;
	property SaturatedWaterContent: string read GetSaturatedWaterContent write SetSaturatedWaterContent;
	property InitialWaterContent: string read GetInitialWaterContent write SetInitialWaterContent;
	property BrooksCoreyExponent: string read GetBrooksCoreyExponent write SetBrooksCoreyExponent;
	property VerticalK: string read GetVerticalK write SetVerticalK;

Description

Fields

	FStreamBedThickness: TFormulaObject;

	FStreambedElevation: TFormulaObject;

	FHydraulicConductivity: TFormulaObject;

	FStreamSlope: TFormulaObject;

	FBrooksCoreyExponent: TFormulaObject;

	FVerticalK: TFormulaObject;

	FInitialWaterContent: TFormulaObject;

	FSaturatedWaterContent: TFormulaObject;

	FReachLength: TFormulaObject;

Methods

	procedure SetHydraulicConductivity(const Value: string);

	procedure SetStreambedElevation(const Value: string);

	procedure SetStreamBedThickness(const Value: string);

	procedure SetStreamSlope(const Value: string);

	procedure SetBrooksCoreyExponent(const Value: string);

	procedure SetInitialWaterContent(const Value: string);

	procedure SetSaturatedWaterContent(const Value: string);

	procedure SetVerticalK(const Value: string);

	procedure SetReachLength(const Value: string);

	function ScreenObject: TObject;

	function GetBrooksCoreyExponent: string;

	function GetHydraulicConductivity: string;

	function GetInitialWaterContent: string;

	function GetReachLength: string;

	function GetSaturatedWaterContent: string;

	function GetStreambedElevation: string;

	function GetStreamBedThickness: string;

	function GetStreamSlope: string;

	function GetVerticalK: string;

	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 TSfrItem.

	procedure InvalidateModel; override;

	function BoundaryFormulaCount: integer; override;

	constructor Create(Collection: TCollection); override;

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

	Destructor Destroy; override;

Properties

	property ReachLength: string read GetReachLength write SetReachLength;

	property HydraulicConductivity: string read GetHydraulicConductivity write SetHydraulicConductivity;

	property StreamBedThickness: string read GetStreamBedThickness write SetStreamBedThickness;

	property StreambedElevation: string read GetStreambedElevation write SetStreambedElevation;

	property StreamSlope: string read GetStreamSlope write SetStreamSlope;

	property SaturatedWaterContent: string read GetSaturatedWaterContent write SetSaturatedWaterContent;

	property InitialWaterContent: string read GetInitialWaterContent write SetInitialWaterContent;

	property BrooksCoreyExponent: string read GetBrooksCoreyExponent write SetBrooksCoreyExponent;

	property VerticalK: string read GetVerticalK write SetVerticalK;