Class TfrmManageFluxObservations

Description

Hierarchy

Fields

Methods

Properties

Unit

frmManageFluxObservationsUnit

Declaration

type TfrmManageFluxObservations = class(TfrmCustomGoPhast)

Description

no description available, TfrmCustomGoPhast description follows

TfrmCustomGoPhast is the ancestor of all TForms in GoPhast.

TfrmCustomGoPhast handles setting the color and font. TfrmCustomGoPhast also tries to keep from appearing at a location where it can't be seen. )

Hierarchy

TForm
TfrmCustomGoPhast
TfrmManageFluxObservations

Overview

Fields

	`pnlBottom: TPanel;`
	`btnHelp: TBitBtn;`
	`CancelBtn: TBitBtn;`
	`OkBtn: TBitBtn;`
	`JvNetscapeSplitter1: TJvNetscapeSplitter;`
	`pnlMain: TPanel;`
	`pcMain: TJvPageControl;`
	`tabObservationsTimes: TTabSheet;`
	`lblNumObsTimes: TLabel;`
	`rdgFluxObsTimes: TRbwDataGrid4;`
	`seNumObsTimes: TJvSpinEdit;`
	`btnDelete: TButton;`
	`btnInsert: TButton;`
	`tabObjects: TTabSheet;`
	`SrcLabel: TLabel;`
	`DstLabel: TLabel;`
	`lblFactor: TLabel;`
	`SrcList: TJvListBox;`
	`IncBtn: TButton;`
	`IncAllBtn: TButton;`
	`ExclBtn: TButton;`
	`ExclAllBtn: TButton;`
	`DstList: TJvListBox;`
	`edFactorFormula: TJvEdit;`
	`btnFactorFormula: TButton;`
	`pnlTop: TPanel;`
	`edObservationName: TJvEdit;`
	`lblObservationName: TLabel;`
	`btnDeleteObservation: TButton;`
	`btnAddObservation: TButton;`
	`rparserThreeDFormulaElements: TRbwParser;`
	`rdeMultiValueEdit: TRbwDataEntry;`
	`comboMultiStatFlag: TJvImageComboBox;`
	`lblTreatment: TLabel;`
	`comboTreatment: TComboBox;`
	`tvFluxObservations: TTreeView;`
	`tabMassFlux: TTabSheet;`
	`rdeMassFluxMultiValueEdit: TRbwDataEntry;`
	`comboMt3dmsSpecies: TJvImageComboBox;`
	`rdgConcFluxObsTimes: TRbwDataGrid4;`
	`seNumMt3dmsObsTimes: TJvSpinEdit;`
	`lblNumMt3dmsObsTimes: TLabel;`
	`btnDeleteMt3dmsFlux: TButton;`
	`btnInsertMt3dmsFlux: TButton;`
	`FChobNode: TTreeNode;`
	`FChobObservations: TFluxObservationGroups;`
	`FSelectedGroup: TCustomFluxObservationGroups;`
	`FSelectedObservation: TCustomFluxObservationGroup;`
	`FChdScreenObjects: TList;`
	`FSettingObservation: Boolean;`
	`FUpdatingFormula: Boolean;`
	`FDrobObservations: TFluxObservationGroups;`
	`FDrnScreenObjects: TList;`
	`FGbobObservations: TFluxObservationGroups;`
	`FGhbScreenObjects: TList;`
	`FRvobObservations: TFluxObservationGroups;`
	`FRivScreenObjects: TList;`
	`FGbobNode: TTreeNode;`
	`FDrobNode: TTreeNode;`
	`FRvobNode: TTreeNode;`
	`FSettingTimeCount: Boolean;`
	`FHeadMassFluxObservations: TList;`
	`FWellMassFluxObservations: TList;`
	`FDrnMassFluxObservations: TList;`
	`FRivMassFluxObservations: TList;`
	`FGhbMassFluxObservations: TList;`
	`FRchMassFluxObservations: TList;`
	`FEvtMassFluxObservations: TList;`
	`FMassLoadingMassFluxObservations: TList;`
	`FResMassFluxObservations: TList;`
	`FLakMassFluxObservations: TList;`
	`FDrtMassFluxObservations: TList;`
	`FEtsMassFluxObservations: TList;`
	`FMassFluxObs: TMassFluxObs;`
	`FHeadMassFluxNode: TTreeNode;`
	`FWellMassFluxNode: TTreeNode;`
	`FDrnMassFluxNode: TTreeNode;`
	`FRivMassFluxNode: TTreeNode;`
	`FGhbMassFluxNode: TTreeNode;`
	`FRchMassFluxNode: TTreeNode;`
	`FEVTMassFluxNode: TTreeNode;`
	`FMassLoadingMassFluxNode: TTreeNode;`
	`FResMassFluxNode: TTreeNode;`
	`FLakMassFluxNode: TTreeNode;`
	`FEtsMassFluxNode: TTreeNode;`
	`FDrtMassFluxNode: TTreeNode;`

Methods

	`procedure IncBtnClick(Sender: TObject);`
	`procedure IncAllBtnClick(Sender: TObject);`
	`procedure ExclBtnClick(Sender: TObject);`
	`procedure ExclAllBtnClick(Sender: TObject);`
	`procedure SrcListDragOver(Sender, Source: TObject; X, Y: Integer; State: TDragState; var Accept: Boolean);`
	`procedure DstListDragOver(Sender, Source: TObject; X, Y: Integer; State: TDragState; var Accept: Boolean);`
	`procedure SrcListDragDrop(Sender, Source: TObject; X, Y: Integer);`
	`procedure DstListDragDrop(Sender, Source: TObject; X, Y: Integer);`
	`procedure SrcListKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);`
	`procedure DstListKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);`
	`procedure FormCreate(Sender: TObject); override;`
	`procedure ListClick(Sender: TObject);`
	`procedure FormResize(Sender: TObject);`
	`procedure btnAddObservationClick(Sender: TObject);`
	`procedure btnDeleteObservationClick(Sender: TObject);`
	`procedure edObservationNameChange(Sender: TObject);`
	`procedure FormDestroy(Sender: TObject); override;`
	`procedure rdgFluxObsTimesExit(Sender: TObject);`
	`procedure seNumObsTimesChange(Sender: TObject);`
	`procedure btnDeleteClick(Sender: TObject);`
	`procedure btnInsertClick(Sender: TObject);`
	`procedure OkBtnClick(Sender: TObject);`
	`procedure edFactorFormulaChange(Sender: TObject);`
	`procedure btnFactorFormulaClick(Sender: TObject);`
	`procedure edFactorFormulaExit(Sender: TObject);`
	`procedure rdgFluxObsTimesBeforeDrawCell(Sender: TObject; ACol, ARow: Integer);`
	`procedure rdgFluxObsTimesEndUpdate(Sender: TObject);`
	`procedure edObservationNameExit(Sender: TObject);`
	`procedure rdgFluxObsTimesHorizontalScroll(Sender: TObject);`
	`procedure tabObservationsTimesResize(Sender: TObject);`
	`procedure rdgFluxObsTimesColSize(Sender: TObject; ACol, PriorWidth: Integer);`
	`procedure rdeMultiValueEditChange(Sender: TObject);`
	`procedure comboMultiStatFlagChange(Sender: TObject);`
	`procedure rdgFluxObsTimesSelectCell(Sender: TObject; ACol, ARow: Integer; var CanSelect: Boolean);`
	`procedure comboTreatmentChange(Sender: TObject);`
	`procedure FormShow(Sender: TObject);`
	`procedure tvFluxObservationsChange(Sender: TObject; Node: TTreeNode);`
	`procedure rdeMassFluxMultiValueEditChange(Sender: TObject);`
	`procedure comboMt3dmsSpeciesChange(Sender: TObject);`
	`procedure seNumMt3dmsObsTimesChange(Sender: TObject);`
	`procedure rdgConcFluxObsTimesBeforeDrawCell(Sender: TObject; ACol, ARow: Integer);`
	`procedure rdgConcFluxObsTimesColSize(Sender: TObject; ACol, PriorWidth: Integer);`
	`procedure rdgConcFluxObsTimesEndUpdate(Sender: TObject);`
	`procedure rdgConcFluxObsTimesExit(Sender: TObject);`
	`procedure rdgConcFluxObsTimesHorizontalScroll(Sender: TObject);`
	`procedure rdgConcFluxObsTimesSelectCell(Sender: TObject; ACol, ARow: Integer; var CanSelect: Boolean);`
	`procedure btnDeleteMt3dmsFluxClick(Sender: TObject);`
	`procedure btnInsertMt3dmsFluxClick(Sender: TObject);`
	`procedure rdgConcFluxObsTimesSetEditText(Sender: TObject; ACol, ARow: Integer; const Value: string);`
	`procedure SetSelectedObservation(const Value: TCustomFluxObservationGroup);`
	`procedure AssignObsNames;`
	`procedure DisplayFactor;`
	`procedure UpdateFactor;`
	`procedure CreateVariables;`
	`procedure LayoutMt3dmsMultiFluxEdits;`
	`procedure ReadMassFluxObservations(Package: TModflowPackageSelection; const FluxTypeLabel: string; FluxObservations: TMt3dmsFluxObservationGroups; var ParentNode: TTreeNode);`
	`procedure SetSelectedMt3dmsObs(Mt3dmsObs: TMt3dmsFluxObservationGroup);`
	`procedure GetData;`
	`procedure SetData;`
	`procedure ReadFluxObservations(Package: TModflowPackageSelection; FluxObservations: TFluxObservationGroups; var ParentNode: TTreeNode);`
	`procedure UpdateObjectsInSelectedObservation;`
	`procedure GetGlobalVariables;`
	`function CheckFormula(FunctionString: string; ShowError: boolean): boolean;`
	`procedure AssignFactor(NewFormula: string);`
	`procedure InitializeFirstRow(Grid: TRbwDataGrid4; SpinEdit: TJvSpinEdit);`
	`procedure CheckErrors;`
	`procedure LayoutMultiFluxEdits;`
	`procedure LayoutMt3dmsFluxEdits;`
	`procedure AssignValuesToSelectedGridCells(const NewText: string; Grid: TRbwDataGrid4; const StartCol, EndCol: integer);`
	`procedure EnableMultiEditControl(Grid: TRbwDataGrid4; AControl: TControl; const StartCol, EndCol: integer);`
	`procedure SetSelectedGroupAndObservation(TreeView: TTreeView);`
	`procedure SetStatFlagLabels;`
	`procedure SetSelectedFluxObs(FluxObs: TFluxObservationGroup);`
	`procedure SetObsNameLength(SpinEdit: TJvSpinEdit);`
	`procedure SetObsGridRowCount(SpinEdit: TJvSpinEdit; Grid: TRbwDataGrid4; DeleteButton: TButton);`
	`procedure InitializeNewObs(RowIndex, TimeColumn, ValueColumn, CommentColumn: Integer; Grid: TRbwDataGrid4; ObsTime: TCustomFluxObservationItem);`
	`procedure SetButtons;`

Properties

property SelectedObservation: TCustomFluxObservationGroup read FSelectedObservation write SetSelectedObservation;

Description

Fields

	`pnlBottom: TPanel;`

	`btnHelp: TBitBtn;`

	`CancelBtn: TBitBtn;`

	`OkBtn: TBitBtn;`

	`JvNetscapeSplitter1: TJvNetscapeSplitter;`

	`pnlMain: TPanel;`

	`pcMain: TJvPageControl;`

	`tabObservationsTimes: TTabSheet;`

	`lblNumObsTimes: TLabel;`

	`rdgFluxObsTimes: TRbwDataGrid4;`

	`seNumObsTimes: TJvSpinEdit;`

	`btnDelete: TButton;`

	`btnInsert: TButton;`

	`tabObjects: TTabSheet;`

	`SrcLabel: TLabel;`

	`DstLabel: TLabel;`

	`lblFactor: TLabel;`

	`SrcList: TJvListBox;`

	`IncBtn: TButton;`

	`IncAllBtn: TButton;`

	`ExclBtn: TButton;`

	`ExclAllBtn: TButton;`

	`DstList: TJvListBox;`

	`edFactorFormula: TJvEdit;`

	`btnFactorFormula: TButton;`

	`pnlTop: TPanel;`

	`edObservationName: TJvEdit;`

	`lblObservationName: TLabel;`

	`btnDeleteObservation: TButton;`

	`btnAddObservation: TButton;`

	`rparserThreeDFormulaElements: TRbwParser;`

	`rdeMultiValueEdit: TRbwDataEntry;`

	`comboMultiStatFlag: TJvImageComboBox;`

	`lblTreatment: TLabel;`

	`comboTreatment: TComboBox;`

	`tvFluxObservations: TTreeView;`

	`tabMassFlux: TTabSheet;`

	`rdeMassFluxMultiValueEdit: TRbwDataEntry;`

	`comboMt3dmsSpecies: TJvImageComboBox;`

	`rdgConcFluxObsTimes: TRbwDataGrid4;`

	`seNumMt3dmsObsTimes: TJvSpinEdit;`

	`lblNumMt3dmsObsTimes: TLabel;`

	`btnDeleteMt3dmsFlux: TButton;`

	`btnInsertMt3dmsFlux: TButton;`

	`FChobNode: TTreeNode;`

	`FChobObservations: TFluxObservationGroups;`

	`FSelectedGroup: TCustomFluxObservationGroups;`

	`FSelectedObservation: TCustomFluxObservationGroup;`

	`FChdScreenObjects: TList;`

	`FSettingObservation: Boolean;`

	`FUpdatingFormula: Boolean;`

	`FDrobObservations: TFluxObservationGroups;`

	`FDrnScreenObjects: TList;`

	`FGbobObservations: TFluxObservationGroups;`

	`FGhbScreenObjects: TList;`

	`FRvobObservations: TFluxObservationGroups;`

	`FRivScreenObjects: TList;`

	`FGbobNode: TTreeNode;`

	`FDrobNode: TTreeNode;`

	`FRvobNode: TTreeNode;`

	`FSettingTimeCount: Boolean;`

	`FHeadMassFluxObservations: TList;`

	`FWellMassFluxObservations: TList;`

	`FDrnMassFluxObservations: TList;`

	`FRivMassFluxObservations: TList;`

	`FGhbMassFluxObservations: TList;`

	`FRchMassFluxObservations: TList;`

	`FEvtMassFluxObservations: TList;`

	`FMassLoadingMassFluxObservations: TList;`

	`FResMassFluxObservations: TList;`

	`FLakMassFluxObservations: TList;`

	`FDrtMassFluxObservations: TList;`

	`FEtsMassFluxObservations: TList;`

	`FMassFluxObs: TMassFluxObs;`

	`FHeadMassFluxNode: TTreeNode;`

	`FWellMassFluxNode: TTreeNode;`

	`FDrnMassFluxNode: TTreeNode;`

	`FRivMassFluxNode: TTreeNode;`

	`FGhbMassFluxNode: TTreeNode;`

	`FRchMassFluxNode: TTreeNode;`

	`FEVTMassFluxNode: TTreeNode;`

	`FMassLoadingMassFluxNode: TTreeNode;`

	`FResMassFluxNode: TTreeNode;`

	`FLakMassFluxNode: TTreeNode;`

	`FEtsMassFluxNode: TTreeNode;`

	`FDrtMassFluxNode: TTreeNode;`

Methods

	`procedure IncBtnClick(Sender: TObject);`

	`procedure IncAllBtnClick(Sender: TObject);`

	`procedure ExclBtnClick(Sender: TObject);`

	`procedure ExclAllBtnClick(Sender: TObject);`

	`procedure SrcListDragOver(Sender, Source: TObject; X, Y: Integer; State: TDragState; var Accept: Boolean);`

	`procedure DstListDragOver(Sender, Source: TObject; X, Y: Integer; State: TDragState; var Accept: Boolean);`

	`procedure SrcListDragDrop(Sender, Source: TObject; X, Y: Integer);`

	`procedure DstListDragDrop(Sender, Source: TObject; X, Y: Integer);`

	`procedure SrcListKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);`

	`procedure DstListKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);`

	`procedure FormCreate(Sender: TObject); override;`

	`procedure ListClick(Sender: TObject);`

	`procedure FormResize(Sender: TObject);`

	`procedure btnAddObservationClick(Sender: TObject);`

	`procedure btnDeleteObservationClick(Sender: TObject);`

	`procedure edObservationNameChange(Sender: TObject);`

	`procedure FormDestroy(Sender: TObject); override;`

	`procedure rdgFluxObsTimesExit(Sender: TObject);`

	`procedure seNumObsTimesChange(Sender: TObject);`

	`procedure btnDeleteClick(Sender: TObject);`

	`procedure btnInsertClick(Sender: TObject);`

	`procedure OkBtnClick(Sender: TObject);`

	`procedure edFactorFormulaChange(Sender: TObject);`

	`procedure btnFactorFormulaClick(Sender: TObject);`

	`procedure edFactorFormulaExit(Sender: TObject);`

	`procedure rdgFluxObsTimesBeforeDrawCell(Sender: TObject; ACol, ARow: Integer);`

	`procedure rdgFluxObsTimesEndUpdate(Sender: TObject);`

	`procedure edObservationNameExit(Sender: TObject);`

	`procedure rdgFluxObsTimesHorizontalScroll(Sender: TObject);`

	`procedure tabObservationsTimesResize(Sender: TObject);`

	`procedure rdgFluxObsTimesColSize(Sender: TObject; ACol, PriorWidth: Integer);`

	`procedure rdeMultiValueEditChange(Sender: TObject);`

	`procedure comboMultiStatFlagChange(Sender: TObject);`

	`procedure rdgFluxObsTimesSelectCell(Sender: TObject; ACol, ARow: Integer; var CanSelect: Boolean);`

	`procedure comboTreatmentChange(Sender: TObject);`

	`procedure FormShow(Sender: TObject);`

	`procedure tvFluxObservationsChange(Sender: TObject; Node: TTreeNode);`

	`procedure rdeMassFluxMultiValueEditChange(Sender: TObject);`

	`procedure comboMt3dmsSpeciesChange(Sender: TObject);`

	`procedure seNumMt3dmsObsTimesChange(Sender: TObject);`

	`procedure rdgConcFluxObsTimesBeforeDrawCell(Sender: TObject; ACol, ARow: Integer);`

	`procedure rdgConcFluxObsTimesColSize(Sender: TObject; ACol, PriorWidth: Integer);`

	`procedure rdgConcFluxObsTimesEndUpdate(Sender: TObject);`

	`procedure rdgConcFluxObsTimesExit(Sender: TObject);`

	`procedure rdgConcFluxObsTimesHorizontalScroll(Sender: TObject);`

	`procedure rdgConcFluxObsTimesSelectCell(Sender: TObject; ACol, ARow: Integer; var CanSelect: Boolean);`

	`procedure btnDeleteMt3dmsFluxClick(Sender: TObject);`

	`procedure btnInsertMt3dmsFluxClick(Sender: TObject);`

	`procedure rdgConcFluxObsTimesSetEditText(Sender: TObject; ACol, ARow: Integer; const Value: string);`

	`procedure SetSelectedObservation(const Value: TCustomFluxObservationGroup);`

	`procedure AssignObsNames;`

	`procedure DisplayFactor;`

	`procedure UpdateFactor;`

	`procedure CreateVariables;`

	`procedure LayoutMt3dmsMultiFluxEdits;`

	`procedure ReadMassFluxObservations(Package: TModflowPackageSelection; const FluxTypeLabel: string; FluxObservations: TMt3dmsFluxObservationGroups; var ParentNode: TTreeNode);`

	`procedure SetSelectedMt3dmsObs(Mt3dmsObs: TMt3dmsFluxObservationGroup);`

	`procedure GetData;`

	`procedure SetData;`

	`procedure ReadFluxObservations(Package: TModflowPackageSelection; FluxObservations: TFluxObservationGroups; var ParentNode: TTreeNode);`

	`procedure UpdateObjectsInSelectedObservation;`

	`procedure GetGlobalVariables;`

	`function CheckFormula(FunctionString: string; ShowError: boolean): boolean;`

	`procedure AssignFactor(NewFormula: string);`

	`procedure InitializeFirstRow(Grid: TRbwDataGrid4; SpinEdit: TJvSpinEdit);`

	`procedure CheckErrors;`

	`procedure LayoutMultiFluxEdits;`

	`procedure LayoutMt3dmsFluxEdits;`

	`procedure AssignValuesToSelectedGridCells(const NewText: string; Grid: TRbwDataGrid4; const StartCol, EndCol: integer);`

	`procedure EnableMultiEditControl(Grid: TRbwDataGrid4; AControl: TControl; const StartCol, EndCol: integer);`

	`procedure SetSelectedGroupAndObservation(TreeView: TTreeView);`

	`procedure SetStatFlagLabels;`

	`procedure SetSelectedFluxObs(FluxObs: TFluxObservationGroup);`

	`procedure SetObsNameLength(SpinEdit: TJvSpinEdit);`

	`procedure SetObsGridRowCount(SpinEdit: TJvSpinEdit; Grid: TRbwDataGrid4; DeleteButton: TButton);`

	`procedure InitializeNewObs(RowIndex, TimeColumn, ValueColumn, CommentColumn: Integer; Grid: TRbwDataGrid4; ObsTime: TCustomFluxObservationItem);`

	`procedure SetButtons;`

Properties

	`property SelectedObservation: TCustomFluxObservationGroup read FSelectedObservation write SetSelectedObservation;`

Generated by PasDoc 0.12.1 on 2013-05-13 15:41:38