Class TVerticalScreen

Unit

ModflowMnw2Unit

Declaration

type TVerticalScreen = class(TCustomModflowBoundaryItem)

Description

TCustomModflowBoundaryItem represents a boundary for one time interval. TCustomModflowBoundaryItem is stored by TCustomMF_BoundColl.

Hierarchy

• TCollectionItem
• TOrderedItem
• TCustomBoundaryItem
• TCustomModflowBoundaryItem
• TVerticalScreen

Overview

Fields

	FSkinRadius: TFormulaObject;
	FB: TFormulaObject;
	FC: TFormulaObject;
	FZTop: double;
	FCellToWellConductance: TFormulaObject;
	FP: TFormulaObject;
	FWellRadius: TFormulaObject;
	FSkinK: TFormulaObject;
	FZBottom: double;

Methods

	procedure SetB(const Value: string);
	procedure SetC(const Value: string);
	procedure SetCellToWellConductance(const Value: string);
	procedure SetP(const Value: string);
	procedure SetSkinK(const Value: string);
	procedure SetSkinRadius(const Value: string);
	procedure SetWellRadius(const Value: string);
	procedure SetZBottom(const Value: double);
	procedure SetZTop(const Value: double);
	function GetB: string;
	function GetC: string;
	function GetCellToWellConductance: string;
	function GetP: string;
	function GetSkinK: string;
	function GetSkinRadius: string;
	function GetWellRadius: string;
	function BoundaryFormulaCount: integer; override;
	function GetBoundaryFormula(Index: integer): string; override;
	procedure SetBoundaryFormula(Index: integer; const Value: string); override;
	function IsSame(AnotherItem: TOrderedItem): boolean; override;
	function ScreenObject: TObject;
	procedure CreateFormulaObjects; override;
	procedure AssignObserverEvents(Collection: TCollection); override;
	procedure GetPropertyObserver(Sender: TObject; List: TList); override;
	procedure RemoveFormulaObjects; override;
	procedure Assign(Source: TPersistent); override;

Properties

	property ZTop: double read FZTop write SetZTop;
	property ZBottom: double read FZBottom write SetZBottom;
	property WellRadius: string read GetWellRadius write SetWellRadius;
	property SkinRadius: string read GetSkinRadius write SetSkinRadius;
	property SkinK: string read GetSkinK write SetSkinK;
	property B: string read GetB write SetB;
	property C: string read GetC write SetC;
	property P: string read GetP write SetP;
	property CellToWellConductance: string read GetCellToWellConductance write SetCellToWellConductance;

Description

Fields

	FSkinRadius: TFormulaObject;

	FB: TFormulaObject;

	FC: TFormulaObject;

	FZTop: double;

	FCellToWellConductance: TFormulaObject;

	FP: TFormulaObject;

	FWellRadius: TFormulaObject;

	FSkinK: TFormulaObject;

	FZBottom: double;

Methods

	procedure SetB(const Value: string);

	procedure SetC(const Value: string);

	procedure SetCellToWellConductance(const Value: string);

	procedure SetP(const Value: string);

	procedure SetSkinK(const Value: string);

	procedure SetSkinRadius(const Value: string);

	procedure SetWellRadius(const Value: string);

	procedure SetZBottom(const Value: double);

	procedure SetZTop(const Value: double);

	function GetB: string;

	function GetC: string;

	function GetCellToWellConductance: string;

	function GetP: string;

	function GetSkinK: string;

	function GetSkinRadius: string;

	function GetWellRadius: string;

	function BoundaryFormulaCount: integer; 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;

	function ScreenObject: TObject;

	procedure CreateFormulaObjects; override;

	procedure AssignObserverEvents(Collection: TCollection); override;

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

	procedure RemoveFormulaObjects; override;

	procedure Assign(Source: TPersistent); override;

Properties

	property ZTop: double read FZTop write SetZTop;

	property ZBottom: double read FZBottom write SetZBottom;

	property WellRadius: string read GetWellRadius write SetWellRadius;

	property SkinRadius: string read GetSkinRadius write SetSkinRadius;

	property SkinK: string read GetSkinK write SetSkinK;

	property B: string read GetB write SetB;

	property C: string read GetC write SetC;

	property P: string read GetP write SetP;

	property CellToWellConductance: string read GetCellToWellConductance write SetCellToWellConductance;