Class TfrmGoPhast

Description

Hierarchy

Fields

Methods

Properties

Unit

frmGoPhastUnit

Declaration

type TfrmGoPhast = class(TUndoForm)

Description

TfrmGoPhast is the type of frmGoPhast which is the main form of GoPhast.

TfrmGoPhast has tool bars and a menu to control the operation of GoPhast. The main part of the form is occupied by three TframeViews which display top, front, and side views of the model. Most of the user interaction with the spatial data in the model is through the three TframeViews. A status bar sbMain on TfrmGoPhast displays messages to the user.

See frmGoPhast.

Hierarchy

TForm
TfrmCustomGoPhast
TUndoForm
TfrmGoPhast

Overview

Fields

	`cbControlBar: TControlBar;`
	`tbarEdit: TToolBar;`
	`tbCut: TToolButton;`
	`tbCopy: TToolButton;`
	`tbPaste: TToolButton;`
	`tbUndo: TToolButton;`
	`tbRedo: TToolButton;`
	`tbarFile: TToolBar;`
	`tbSave: TToolButton;`
	`tbOpen: TToolButton;`
	`tbPrint: TToolButton;`
	`tbNew: TToolButton;`
	`tbarEditScreenObjects: TToolBar;`
	`tbSeparator1: TToolButton;`
	`tbInsertPoint: TToolButton;`
	`tbDeleteSegment: TToolButton;`
	`tbLasso: TToolButton;`
	`tbSelectPoint: TToolButton;`
	`tbSelect: TToolButton;`
	`tbSeparator2: TToolButton;`
	`tbShowHideObjects: TToolButton;`
	`tbarView: TToolBar;`
	`tbZoom: TToolButton;`
	`tbZoomOut: TToolButton;`
	`tbZoomIn: TToolButton;`
	`tbPan: TToolButton;`
	`tbarEditGrid: TToolBar;`
	`tbDeleteColumnRow: TToolButton;`
	`tbMove: TToolButton;`
	`tbAddVerticalBoundary: TToolButton;`
	`tbAddHorizontalBoundary: TToolButton;`
	`tbSubdivide: TToolButton;`
	`tbGridAngle: TToolButton;`
	`tbSpacing: TToolButton;`
	`tbGenerateGrid: TToolButton;`
	`tbarCreateScreenObject: TToolBar;`
	`tbStraightLine: TToolButton;`
	`tbLine: TToolButton;`
	`tbPolygon: TToolButton;`
	`tbRectangle: TToolButton;`
	`tbPoint: TToolButton;`
	`tbarView3D: TToolBar;`
	`tbShell: TToolButton;`
	`tbTopGrid: TToolButton;`
	`tbFrontGrid: TToolButton;`
	`tbSideGrid: TToolButton;`
	`tb3DColors: TToolButton;`
	`tb3DObjects: TToolButton;`
	`MostRecentlyUsed: TvRbwMostRecentlyUsed;`
	`Model1: TMenuItem;`
	`miModflow: TMenuItem;`
	`miPhast: TMenuItem;`
	`acModflowActive: TAction;`
	`acPhastActive: TAction;`
	`miNewModflowModel: TMenuItem;`
	`miNewPHASTModel: TMenuItem;`
	`acFileNewPhastModel: TAction;`
	`miLayers: TMenuItem;`
	`acLayers: TAction;`
	`miGeneral: TMenuItem;`
	`tbSelectColRowLayer: TToolButton;`
	`acSelectColRowLay: TAction;`
	`miSelectColRowLayer: TMenuItem;`
	`miTime: TMenuItem;`
	`miOutputControl: TMenuItem;`
	`sdModflowInput: TSaveDialog;`
	`miExport: TMenuItem;`
	`miExportModflow: TMenuItem;`
	`WarningsandErrors1: TMenuItem;`
	`miInvertSelection: TMenuItem;`
	`miSelectAllTop: TMenuItem;`
	`acSelectAllFront: TAction;`
	`acSelectAllSide: TAction;`
	`miSelectAllFront: TMenuItem;`
	`miSelectAllSide: TMenuItem;`
	`miShowGridValues: TMenuItem;`
	`miPackages: TMenuItem;`
	`miProgramLocations: TMenuItem;`
	`N7: TMenuItem;`
	`miEditGlobalVariables: TMenuItem;`
	`AddPartstoObject1: TMenuItem;`
	`tbAddPartsToObject: TToolButton;`
	`acAddPolygonsToObject: TAction;`
	`tbSeparator3: TToolButton;`
	`tbAddLinesToObjects: TToolButton;`
	`acAddLinesToObject: TAction;`
	`AddLinesToObject1: TMenuItem;`
	`tbAddPointsToObject: TToolButton;`
	`acAddPointsToObject: TAction;`
	`AddPointstoObject1: TMenuItem;`
	`ShallAllObjects1: TMenuItem;`
	`HideAllObjects1: TMenuItem;`
	`N8: TMenuItem;`
	`miFilesToArchive: TMenuItem;`
	`ModflowReference1: TMenuItem;`
	`miLinkSFRStreams: TMenuItem;`
	`IntroductoryVideo1: TMenuItem;`
	`comboZCount: TComboBox;`
	`miExportShapefile: TMenuItem;`
	`miModflow2005Model: TMenuItem;`
	`ilImageList: TImageList;`
	`miModelResults: TMenuItem;`
	`miScaleRotateorMoveObjects: TMenuItem;`
	`miMergeObjects: TMenuItem;`
	`tbShow2DGrid: TToolButton;`
	`miShow2DGridlines: TMenuItem;`
	`splitVertTop: TJvNetscapeSplitter;`
	`splitVertBottom: TJvNetscapeSplitter;`
	`splitHoriz: TJvNetscapeSplitter;`
	`miModflowNameFile: TMenuItem;`
	`miReverseSelectedObjects: TMenuItem;`
	`acRunModflow: TAction;`
	`RestoreDefault2DView1: TMenuItem;`
	`tbRestoreDefault2DView: TToolButton;`
	`tbPositionUndo: TToolButton;`
	`tbPositionRedo: TToolButton;`
	`acPositionForward: TAction;`
	`acPositionBackward: TAction;`
	`miUndoPosition: TMenuItem;`
	`RedoPosition: TMenuItem;`
	`miGriddedData: TMenuItem;`
	`miExportModpath: TMenuItem;`
	`acExportModpath: TAction;`
	`sdModpathInput: TSaveDialog;`
	`miManageFluxObservations: TMenuItem;`
	`Create1: TMenuItem;`
	`Edit1: TMenuItem;`
	`Navigation1: TMenuItem;`
	`miAllVideos: TMenuItem;`
	`miShowVideoTips: TMenuItem;`
	`N2: TMenuItem;`
	`N9: TMenuItem;`
	`acExportModelMate: TAction;`
	`ModelMateFile1: TMenuItem;`
	`acImportModelMate: TAction;`
	`odModelMate: TOpenDialog;`
	`miImportModelMate: TMenuItem;`
	`miObservationType: TMenuItem;`
	`miObservations: TMenuItem;`
	`miPredictions: TMenuItem;`
	`acEditSelecteObjects: TAction;`
	`miMF_HydrogeologicUnits: TMenuItem;`
	`miBatchFileAdditions: TMenuItem;`
	`miSelectObjectsforEditing: TMenuItem;`
	`miDisplayDataSetValues: TMenuItem;`
	`miObjectstoShapefile: TMenuItem;`
	`miDeleteImage: TMenuItem;`
	`miPHASTProgramLocation: TMenuItem;`
	`SurferGridFile1: TMenuItem;`
	`SampleDEMData1: TMenuItem;`
	`miZONEBUDGETInputFiles: TMenuItem;`
	`sdZonebudgetInput: TSaveDialog;`
	`tbVertexValue: TToolButton;`
	`acVertexValue: TAction;`
	`EditVertexValues1: TMenuItem;`
	`sdModelMate: TSaveDialog;`
	`menuGridLineChoice: TPopupMenu;`
	`Showall1: TMenuItem;`
	`Showexterior1: TMenuItem;`
	`Showactive1: TMenuItem;`
	`ShowAll2: TMenuItem;`
	`Showexterior2: TMenuItem;`
	`Showactive2: TMenuItem;`
	`acShowAllGridLines: TAction;`
	`acShowExteriorGridLines: TAction;`
	`acShowActiveGridLines: TAction;`
	`Showactiveedge1: TMenuItem;`
	`acShowActiveEdge: TAction;`
	`Showactiveedge2: TMenuItem;`
	`acRestoreDefault2DView: TAction;`
	`acExportImage: TAction;`
	`ExportImage1: TMenuItem;`
	`miManageParameters: TMenuItem;`
	`miManageHeadObservations: TMenuItem;`
	`miContourstoShapefile: TMenuItem;`
	`sdShapefile: TSaveDialog;`
	`miShapefile: TMenuItem;`
	`miPathlinestoShapefile: TMenuItem;`
	`miEndpointsatStartingLocationstoShapefile: TMenuItem;`
	`miEndpointsatEndingLocationstoShapefile: TMenuItem;`
	`miTimeSeriestoShapefile: TMenuItem;`
	`miDataSetstoCSV: TMenuItem;`
	`tbShowGridValues: TToolButton;`
	`acShowGridValues: TAction;`
	`acModflowLgrActive: TAction;`
	`miModflowLgr: TMenuItem;`
	`miChildModels: TMenuItem;`
	`miASCII_RasterFile: TMenuItem;`
	`tbImportModelResults: TToolButton;`
	`acImportModelResults: TAction;`
	`acRunModflowLgr: TAction;`
	`sdModflowLgr: TSaveDialog;`
	`miExportModflowLgr: TMenuItem;`
	`miInvertSelectedVertices: TMenuItem;`
	`miSplitSelectedObjects: TMenuItem;`
	`miMakeSelectedVerticesASeparateObject: TMenuItem;`
	`miSplitObjectAtSelectedVertices: TMenuItem;`
	`acUndo: TAction;`
	`acRedo: TAction;`
	`miModflowNwt: TMenuItem;`
	`acModflowNwtActive: TAction;`
	`acRunModflowNwt: TAction;`
	`miExportModflowNwt: TMenuItem;`
	`acMeasure: TAction;`
	`tbMeasure: TToolButton;`
	`hntMeasure: TJvHint;`
	`miMeasure: TMenuItem;`
	`miLockSelectedObjects: TMenuItem;`
	`miUnlockSelectedObjects: TMenuItem;`
	`btnDisplayData: TToolButton;`
	`acDisplayData: TAction;`
	`miDisplayData: TMenuItem;`
	`miClearUndoRedostack: TMenuItem;`
	`acRunMt3dms: TAction;`
	`dlgSaveMt3dms: TSaveDialog;`
	`miRunMt3dms: TMenuItem;`
	`btnRunModel: TJvArrowButton;`
	`acExportZoneBudget: TAction;`
	`pmExportModel: TPopupMenu;`
	`miExportModpathPopUp: TMenuItem;`
	`miExportZoneBudgetPopup: TMenuItem;`
	`miRunMt3dmsPopup: TMenuItem;`
	`acSutraActive: TAction;`
	`miSUTRA: TMenuItem;`
	`acSutraLayers: TAction;`
	`N10: TMenuItem;`
	`miSUTRALayerGroups: TMenuItem;`
	`tlbMesh: TToolBar;`
	`tbCrossSection: TToolButton;`
	`acSutraOptions: TAction;`
	`miSutraOptions: TMenuItem;`
	`acSutraTimes: TAction;`
	`miSutraTimes: TMenuItem;`
	`acRunSutra: TAction;`
	`sdSutraInput: TSaveDialog;`
	`acRunSutra1: TMenuItem;`
	`acSutraOutputControl: TAction;`
	`miSutraOutputControl: TMenuItem;`
	`miSutraProgramLocations: TMenuItem;`
	`acSutraProgramLocations: TAction;`
	`acImportTprogs: TAction;`
	`ImportTPROGSBinaryGridFile1: TMenuItem;`
	`miCustomizeSutraMesh: TMenuItem;`
	`tbRotateCrossSection: TToolButton;`
	`acImportSutraModelResults: TAction;`
	`miMesh: TMenuItem;`
	`miSpecifyCrossSection: TMenuItem;`
	`miMeshGenerationControls: TMenuItem;`
	`miRenumberMesh: TMenuItem;`
	`tbMoveNodes: TToolButton;`
	`btnGenerateMesh: TToolButton;`
	`tlb3dViewMesh: TToolBar;`
	`acShowTopMesh: TAction;`
	`acShowFrontMesh: TAction;`
	`btnShowTopMesh: TToolButton;`
	`btnShowFrontMesh: TToolButton;`
	`ShowTopMesh1: TMenuItem;`
	`ShowFrontMesh1: TMenuItem;`
	`acNewSutraModel: TAction;`
	`acNewSutraModel1: TMenuItem;`
	`btnFishnet: TToolButton;`
	`acFishnet: TAction;`
	`miViewMeshInformation1: TMenuItem;`
	`FCreateArchive: Boolean;`
	`CreateArchiveSet: boolean;`
	`FCreatingMainForm: Boolean;`
	`miHint: TMenuItemHint;`
	`FSaveModelForm: TfrmSaveArchive;`
	`FOtherSplitterMoving: Boolean;`
	`FSynchronizeCount: integer;`
	`FRunModflowForm: TfrmRunModflow;`
	`FRunModpathForm: TfrmRunModpath;`
	`FRunZoneBudgetForm: TfrmRunZoneBudget;`
	`FRunModflow: Boolean;`
	`FRunModpath: Boolean;`
	`FCreateNewCompositeBudgetFile: boolean;`
	`FRunZoneBudget: Boolean;`
	`FRunPhastForm: TfrmRunPhast;`
	`FRunSutraFrom: TfrmRunPhast;`
	`FRunPhast: boolean;`
	`FRunSutra: Boolean;`
	`FPositionList: TPositionList;`
	`FBrowser: string;`
	`FStartTime: TDateTime;`
	`FFileStream: TFileStream;`
	`FFileSize: Int64;`
	`FRunModelMateForm: TfrmRunModelMate;`
	`FRunModelMate: boolean;`
	`FObservationFileName: string;`
	`FPredictionFileName: string;`
	`FReadingFile: Boolean;`
	`FSizeWarningDisplayed: Boolean;`
	`FRunModelSelection: Integer;`
	`FSupressDrawing: Integer;`
	`FLastMoveTime: TDateTime;`
	`FRunMt3dmsForm: TfrmRunMt3dms;`
	`FRunMt3dms: boolean;`
	`FRunModpathModelSelection: integer;`
	`FExportModpathShapefileForm: TfrmExportModpathShapefile;`
	`FExportModpathShapeFileModelChoice: Integer;`
	`FRenumberMethod: integer;`
	`acAddColumn: TAction;`
	`acAddRow: TAction;`
	`acColor: TAction;`
	`acColoredGrid: TAction;`
	`acCopy: TAction;`
	`acCreateLine: TAction;`
	`acCreatePoint: TAction;`
	`acCreatePolygon: TAction;`
	`acCreateRectangle: TAction;`
	`acCreateStraightLine: TAction;`
	`acCut: TAction;`
	`acDeleteColumnRow: TAction;`
	`acDeleteSegment: TAction;`
	`acEditDataSets: TAction;`
	`acEditGridLines: TAction;`
	`acEditVerticalExaggeration: TAction;`
	`acExit: TAction;`
	`acExportPhastInputFile: TAction;`
	`acFileNewModflowModel: TAction;`
	`acFileOpen: TAction;`
	`acFilePrint: TAction;`
	`acFileSave: TAction;`
	`acFileSaveAs: TAction;`
	`acFont: TAction;`
	`acGenerateGrid: TAction;`
	`acGridAngle: TAction;`
	`acGridDragRotate: TAction;`
	`acHelpContents: THelpContents;`
	`acInsertNode: TAction;`
	`acMoveColumnOrRow: TAction;`
	`acMoveTo: TAction;`
	`acPan: TAction;`
	`acPaste: TAction;`
	`acRestoreDefaultView: TAction;`
	`acSelectAllTop: TAction;`
	`acSelectNode: TAction;`
	`acSelectObjects: TAction;`
	`acSelectWithLasso: TAction;`
	`acSetSpacing: TAction;`
	`acShow3DObjects: TAction;`
	`acShowFrontGrid: TAction;`
	`acShowGridShell: TAction;`
	`acShowHideObjects: TAction;`
	`acShowSideGrid: TAction;`
	`acShowTopGrid: TAction;`
	`acSmoothGrid: TAction;`
	`acSubdivide: TAction;`
	`acZoom: TAction;`
	`acZoomIn: TAction;`
	`acZoomOut: TAction;`
	`alActionList: TActionList;`
	`cdColorDialog: TColorDialog;`
	`dcAddColCursor: TRbwDynamicCursor;`
	`dcAddRowCursor: TRbwDynamicCursor;`
	`dcMoveColCursor: TRbwDynamicCursor;`
	`dcMoveRowCursor: TRbwDynamicCursor;`
	`dcSetSpacing: TRbwDynamicCursor;`
	`dcSubdivide: TRbwDynamicCursor;`
	`fdFontDialog: TFontDialog;`
	`frame3DView: Tframe3DView;`
	`frameFrontView: TframeView;`
	`frameSideView: TframeView;`
	`frameTopView: TframeView;`
	`ilDisabledImageList: TImageList;`
	`mi3D_Colors: TMenuItem;`
	`miAbout: TMenuItem;`
	`miAddHorizontalGridLine: TMenuItem;`
	`miAddVerticalGridLine: TMenuItem;`
	`miChemistryOptions: TMenuItem;`
	`miColor: TMenuItem;`
	`miContents: TMenuItem;`
	`miCopy: TMenuItem;`
	`miCreateLine: TMenuItem;`
	`miCreatePoint: TMenuItem;`
	`miCreatePolygon: TMenuItem;`
	`miCreateRectangle: TMenuItem;`
	`miCreateStraightLine: TMenuItem;`
	`miCustomize: TMenuItem;`
	`miCut: TMenuItem;`
	`miData: TMenuItem;`
	`miDeleteGridLine: TMenuItem;`
	`miDeleteSegment: TMenuItem;`
	`miDragtoRotate: TMenuItem;`
	`miEdit: TMenuItem;`
	`miEditBitmaps: TMenuItem;`
	`miEditDataSet: TMenuItem;`
	`miEditGridLines: TMenuItem;`
	`miEditSelectedObjects: TMenuItem;`
	`miExamples: TMenuItem;`
	`miExit: TMenuItem;`
	`miExportPhast: TMenuItem;`
	`miFile: TMenuItem;`
	`miFont: TMenuItem;`
	`miFreeSurface: TMenuItem;`
	`miGenerateGrid: TMenuItem;`
	`miGoTo: TMenuItem;`
	`miGrid: TMenuItem;`
	`miGridAngle: TMenuItem;`
	`miGridOptions: TMenuItem;`
	`miHelp: TMenuItem;`
	`miHelpOnMainWindow: TMenuItem;`
	`miHintDelay: TMenuItem;`
	`miImport: TMenuItem;`
	`miImportBitmap: TMenuItem;`
	`miImportDistributedDatabyZone: TMenuItem;`
	`miImportDXFFile: TMenuItem;`
	`miImportPoints: TMenuItem;`
	`miImportShapefile: TMenuItem;`
	`miInsertNode: TMenuItem;`
	`miMoveColumnOrRow: TMenuItem;`
	`miNew: TMenuItem;`
	`miObject: TMenuItem;`
	`miOpen: TMenuItem;`
	`miPan: TMenuItem;`
	`miPaste: TMenuItem;`
	`miPrint: TMenuItem;`
	`miPrintFrequency: TMenuItem;`
	`miPrintInitial: TMenuItem;`
	`miRearrangeObjects: TMenuItem;`
	`miRedo: TMenuItem;`
	`miRestoreDefaultView: TMenuItem;`
	`miRulerFormat: TMenuItem;`
	`miSave: TMenuItem;`
	`miSaveAs: TMenuItem;`
	`miSearchForObject: TMenuItem;`
	`miSelectAll: TMenuItem;`
	`miSelectNodes: TMenuItem;`
	`miSelectObjects: TMenuItem;`
	`miSelectObjectsByName: TMenuItem;`
	`miSelectWithLasso: TMenuItem;`
	`miSetSelectedColRowLayer: TMenuItem;`
	`miSetSpacing: TMenuItem;`
	`miShow3DObjects: TMenuItem;`
	`miShowColoredGrid: TMenuItem;`
	`miShowFormulaErrors: TMenuItem;`
	`miShowFrontGrid: TMenuItem;`
	`miShowGridShell: TMenuItem;`
	`miShowHideBitmaps: TMenuItem;`
	`miShowHideObjects: TMenuItem;`
	`miShowSelectedObjects: TMenuItem;`
	`miShowSideGrid: TMenuItem;`
	`miShowTopGrid: TMenuItem;`
	`miSmoothGrid: TMenuItem;`
	`miSolutionMethod: TMenuItem;`
	`miSteadyFlow: TMenuItem;`
	`miSubdivide: TMenuItem;`
	`miTimeControl: TMenuItem;`
	`miTitleAndUnits: TMenuItem;`
	`miUndo: TMenuItem;`
	`miVerticalExaggeration: TMenuItem;`
	`miView: TMenuItem;`
	`miZoom: TMenuItem;`
	`miZoomIn: TMenuItem;`
	`miZoomOut: TMenuItem;`
	`mmMainMenu: TMainMenu;`
	`N1: TMenuItem;`
	`N3: TMenuItem;`
	`N4: TMenuItem;`
	`N5: TMenuItem;`
	`N6: TMenuItem;`
	`odOpenDialog: TOpenDialog;`
	`pnlBottom: TPanel;`
	`pnlTop: TPanel;`
	`sbMain: TStatusBar;`
	`sdPhastInput: TSaveDialog;`
	`sdSaveDialog: TSaveDialog;`
	`timTimer: TTimer;`
	`FCanDraw: boolean;`
	`FCanEdit: boolean;`
	`FClickedRuler: TObject;`
	`FCurrentTool: TCustomInteractiveTool;`
	`FCursorGrid: TCursorGrid;`
	`FCursorX: integer;`
	`FCursorY: integer;`
	`FFileFormat: TFileFormat;`
	`FFrontDiscretizationChanged: boolean;`
	`FFrontScreenObjectsChanged: boolean;`
	`FPhastModel: TPhastModel;`
	`FMovingPanelIndex: integer;`
	`FMovingStatusBarPanel: boolean;`
	`FOldHeight: integer;`
	`FOldWidth: integer;`
	`FSideDiscretizationChanged: boolean;`
	`FSideScreenObjectsChanged: boolean;`
	`FTopDiscretizationChanged: boolean;`
	`FTopScreenObjectsChanged: boolean;`
	`FIniFile: TMemInifile;`
	`FChangingSelection: boolean;`
	`FCubeControl: TRbwModelCube;`

Methods

	`procedure tbUndoClick(Sender: TObject);`
	`procedure acUndoExecute(Sender: TObject);`
	`procedure tbRedoClick(Sender: TObject);`
	`procedure acPhastActiveExecute(Sender: TObject);`
	`procedure acModflowActiveExecute(Sender: TObject);`
	`procedure acLayersExecute(Sender: TObject);`
	`procedure miGeneralClick(Sender: TObject);`
	`procedure acSelectColRowLayExecute(Sender: TObject);`
	`procedure miTimeClick(Sender: TObject);`
	`procedure miOutputControlClick(Sender: TObject);`
	`procedure miExportModflowClick(Sender: TObject);`
	`procedure WarningsandErrors1Click(Sender: TObject);`
	`procedure miInvertSelectionClick(Sender: TObject);`
	`procedure acSelectAllTopExecute(Sender: TObject);`
	`procedure acSelectAllFrontExecute(Sender: TObject);`
	`procedure acSelectAllSideExecute(Sender: TObject);`
	`procedure acShowGridValuesClick(Sender: TObject);`
	`procedure miPackagesClick(Sender: TObject);`
	`procedure miProgramLocationsClick(Sender: TObject);`
	`procedure miEditGlobalVariablesClick(Sender: TObject);`
	`procedure acAddPolygonsToObjectExecute(Sender: TObject);`
	`procedure acAddLinesToObjectExecute(Sender: TObject);`
	`procedure acAddPointsToObjectExecute(Sender: TObject);`
	`procedure ShallAllObjects1Click(Sender: TObject);`
	`procedure HideAllObjects1Click(Sender: TObject);`
	`procedure miFilesToArchiveClick(Sender: TObject);`
	`procedure sdSaveDialogClose(Sender: TObject);`
	`procedure sdSaveDialogShow(Sender: TObject);`
	`procedure ModflowReference1Click(Sender: TObject);`
	`procedure miLinkSFRStreamsClick(Sender: TObject);`
	`procedure IntroductoryVideo1Click(Sender: TObject);`
	`procedure miExportShapefileClick(Sender: TObject);`
	`procedure sdSaveDialogTypeChange(Sender: TObject);`
	`procedure miModelResultsClick(Sender: TObject);`
	`procedure miScaleRotateorMoveObjectsClick(Sender: TObject);`
	`procedure miMergeObjectsClick(Sender: TObject);`
	`procedure miModflowNameFileClick(Sender: TObject);`
	`procedure miReverseSelectedObjectsClick(Sender: TObject);`
	`procedure RestoreDefault2DView1Click(Sender: TObject);`
	`procedure sdModflowInputShow(Sender: TObject);`
	`procedure sdModflowInputClose(Sender: TObject);`
	`procedure sdPhastInputShow(Sender: TObject);`
	`procedure sdPhastInputClose(Sender: TObject);`
	`procedure acPositionForwardExecute(Sender: TObject);`
	`procedure acPositionBackwardExecute(Sender: TObject);`
	`procedure miGriddedDataClick(Sender: TObject);`
	`procedure sdModpathInputShow(Sender: TObject);`
	`procedure sdModpathInputClose(Sender: TObject);`
	`procedure acExportModpathExecute(Sender: TObject);`
	`procedure miFileClick(Sender: TObject);`
	`procedure miManageFluxObservationsClick(Sender: TObject);`
	`procedure miAllVideosClick(Sender: TObject);`
	`procedure miShowVideoTipsClick(Sender: TObject);`
	`procedure acCopyExecute(Sender: TObject);`
	`procedure acCutExecute(Sender: TObject);`
	`procedure acPasteExecute(Sender: TObject);`
	`procedure FormActivate(Sender: TObject);`
	`procedure FormDeactivate(Sender: TObject);`
	`procedure acExportModelMateExecute(Sender: TObject);`
	`procedure acImportModelMateExecute(Sender: TObject);`
	`procedure miObservationsClick(Sender: TObject);`
	`procedure miMF_HydrogeologicUnitsClick(Sender: TObject);`
	`procedure miBatchFileAdditionsClick(Sender: TObject);`
	`procedure miSelectObjectsforEditingClick(Sender: TObject);`
	`procedure miDisplayDataSetValuesClick(Sender: TObject);`
	`procedure miObjectstoShapefileClick(Sender: TObject);`
	`procedure miDeleteImageClick(Sender: TObject);`
	`procedure miPHASTProgramLocationClick(Sender: TObject);`
	`procedure SurferGridFile1Click(Sender: TObject);`
	`procedure sbMainDrawPanel(StatusBar: TStatusBar; Panel: TStatusPanel; const Rect: TRect);`
	`procedure SampleDEMData1Click(Sender: TObject);`
	`procedure miZONEBUDGETInputFilesClick(Sender: TObject);`
	`procedure sdZonebudgetInputShow(Sender: TObject);`
	`procedure sdZonebudgetInputClose(Sender: TObject);`
	`procedure acVertexValueExecute(Sender: TObject);`
	`procedure acExportImageExecute(Sender: TObject);`
	`procedure miManageParametersClick(Sender: TObject);`
	`procedure miManageHeadObservationsClick(Sender: TObject);`
	`procedure sdModelMateShow(Sender: TObject);`
	`procedure sdModelMateClose(Sender: TObject);`
	`procedure miContourstoShapefileClick(Sender: TObject);`
	`procedure miPathlinestoShapefileClick(Sender: TObject);`
	`procedure miEndpointsatStartingLocationstoShapefileClick(Sender: TObject);`
	`procedure miEndpointsatEndingLocationstoShapefileClick(Sender: TObject);`
	`procedure miTimeSeriestoShapefileClick(Sender: TObject);`
	`procedure miDataSetstoCSVClick(Sender: TObject);`
	`procedure acModflowLgrActiveExecute(Sender: TObject);`
	`procedure miChildModelsClick(Sender: TObject);`
	`procedure miASCII_RasterFileClick(Sender: TObject);`
	`procedure acRunModflowLgrExecute(Sender: TObject);`
	`procedure miInvertSelectedVerticesClick(Sender: TObject);`
	`procedure miSplitSelectedObjectsClick(Sender: TObject);`
	`procedure miMakeSelectedVerticesASeparateObjectClick(Sender: TObject);`
	`procedure miSplitObjectAtSelectedVerticesClick(Sender: TObject);`
	`procedure acModflowNwtActiveExecute(Sender: TObject);`
	`procedure acRunModflowNwtExecute(Sender: TObject);`
	`procedure acMeasureExecute(Sender: TObject);`
	`procedure miLockSelectedObjectsClick(Sender: TObject);`
	`procedure miUnlockSelectedObjectsClick(Sender: TObject);`
	`procedure acDisplayDataExecute(Sender: TObject);`
	`procedure FormMouseWheel(Sender: TObject; Shift: TShiftState; WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean);`
	`procedure miClearUndoRedostackClick(Sender: TObject);`
	`procedure acRunMt3dmsExecute(Sender: TObject);`
	`procedure dlgSaveMt3dmsShow(Sender: TObject);`
	`procedure dlgSaveMt3dmsClose(Sender: TObject);`
	`procedure acSutraActiveExecute(Sender: TObject);`
	`procedure sdShapefileShow(Sender: TObject);`
	`procedure sdShapefileClose(Sender: TObject);`
	`procedure acSutraLayersExecute(Sender: TObject);`
	`procedure tbCrossSectionClick(Sender: TObject);`
	`procedure acSutraOptionsExecute(Sender: TObject);`
	`procedure AllowDrawing(Sender: TObject);`
	`procedure FormShow(Sender: TObject);`
	`procedure acSutraTimesExecute(Sender: TObject);`
	`procedure acRunSutraExecute(Sender: TObject);`
	`procedure acSutraOutputControlExecute(Sender: TObject);`
	`procedure acSutraProgramLocationsExecute(Sender: TObject);`
	`procedure acImportTprogsExecute(Sender: TObject);`
	`procedure sdSutraInputShow(Sender: TObject);`
	`procedure sdSutraInputClose(Sender: TObject);`
	`procedure miCustomizeSutraMeshClick(Sender: TObject);`
	`procedure tbRotateCrossSectionClick(Sender: TObject);`
	`procedure miSpecifyCrossSectionClick(Sender: TObject);`
	`procedure miMeshGenerationControlsClick(Sender: TObject);`
	`procedure miRenumberMeshClick(Sender: TObject);`
	`procedure tbMoveNodesClick(Sender: TObject);`
	`procedure acShowTopMeshExecute(Sender: TObject);`
	`procedure acShowFrontMeshExecute(Sender: TObject);`
	`procedure acFishnetExecute(Sender: TObject);`
	`procedure miViewMeshInformation1Click(Sender: TObject);`
	`procedure SetCreateArchive(const Value: Boolean);`
	`procedure WMMenuSelect(var Msg: TWMMenuSelect); message WM_MENUSELECT;`
	`procedure DeleteLastPointInScreenObject;`
	`procedure DeleteSelectedNodesOrSelectedScreenObjects;`
	`procedure CreatePhastModel;`
	`procedure UpdateDisplay(Sender: TObject);`
	`procedure UpdatePermanantDialogBoxAppearances;`
	`procedure ShowOrHideAllScreenObjects(ShowAll: Boolean);`
	`procedure PlayIntroductoryVideo;`
	`procedure StoreInitalPosition;`
	`procedure ReadModelMateProject(FileName: string; ModelMateProject: TProject);`
	`procedure InitializeModflowInputDialog;`
	`procedure EnableDeleteImage;`
	`procedure CancelCurrentScreenObject;`
	`procedure InternalSaveFile(FileName: string);`
	`procedure GetProgramLocations(Model: TCustomModel);`
	`function TestModpathLocationOK(Model: TCustomModel): Boolean;`
	`function TestZoneBudgetLocationOK(Model: TCustomModel): Boolean;`
	`procedure MenuItemsSetEnabled(AValue: Boolean);`
	`procedure ClearFileSaveDialogBoxNames;`
	`procedure HandleCommandLineParameters(FileName: string);`
	`procedure ExportFromCommandLine(FileName: string);`
	`procedure ImportPvalFile(PValFile: string);`
	`procedure ImportGlobalVariablesFile(GloVarFile: string);`
	`procedure ExportSutra(ShouldRunSutra: Boolean; const FileName: string);`
	`procedure acColorExecute(Sender: TObject);`
	`procedure acDeleteColumnRowExecute(Sender: TObject);`
	`procedure acEditDataSetsExecute(Sender: TObject);`
	`procedure acEditGridLinesExecute(Sender: TObject);`
	`procedure acExitExecute(Sender: TObject);`
	`procedure acExportPhastInputFileExecute(Sender: TObject);`
	`procedure acFileNewModflowModelExecute(Sender: TObject);`
	`procedure acFileOpenExecute(Sender: TObject);`
	`procedure acFileSaveAsExecute(Sender: TObject);`
	`procedure acFileSaveExecute(Sender: TObject);`
	`procedure acFontExecute(Sender: TObject);`
	`procedure acGenerateGridExecute(Sender: TObject);`
	`procedure acGridAngleExecute(Sender: TObject);`
	`procedure acHelpContentsExecute(Sender: TObject);`
	`procedure acMoveColumnOrRowExecute(Sender: TObject);`
	`procedure acMoveToExecute(Sender: TObject);`
	`procedure acRestoreDefaultViewExecute(Sender: TObject);`
	`procedure acSetSpacingExecute(Sender: TObject);`
	`procedure acShowFrontGridExecute(Sender: TObject);`
	`procedure acShowGridShellExecute(Sender: TObject);`
	`procedure acShowSideGridExecute(Sender: TObject);`
	`procedure acShowTopGridExecute(Sender: TObject);`
	`procedure acSmoothGridExecute(Sender: TObject);`
	`procedure acSubdivideExecute(Sender: TObject);`
	`procedure dcAddColCursorDrawCursor(Sender: TObject; const ABitMap, AMask: TBitmap);`
	`procedure dcAddRowCursorDrawCursor(Sender: TObject; const ABitMap, AMask: TBitmap);`
	`procedure dcMoveColCursorDrawCursor(Sender: TObject; const ABitMap, AMask: TBitmap);`
	`procedure dcMoveRowCursorDrawCursor(Sender: TObject; const ABitMap, AMask: TBitmap);`
	`procedure dcSetSpacingDrawCursor(Sender: TObject; const ABitMap, AMask: TBitmap);`
	`procedure dcSubdivideDrawCursor(Sender: TObject; const ABitMap, AMask: TBitmap);`
	`procedure FormClose(Sender: TObject; var Action: TCloseAction);`
	`procedure FormCreate(Sender: TObject); override;`
	`procedure FormDestroy(Sender: TObject); override;`
	`procedure FormResize(Sender: TObject);`
	`procedure FormKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);`
	`procedure mi3D_ColorsClick(Sender: TObject);`
	`procedure miAboutClick(Sender: TObject);`
	`procedure miChemistryOptionsClick(Sender: TObject);`
	`procedure miEditBitmapsClick(Sender: TObject);`
	`procedure miEditSelectedObjectsClick(Sender: TObject);`
	`procedure miExamplesClick(Sender: TObject);`
	`procedure miFreeSurfaceClick(Sender: TObject);`
	`procedure miGridOptionsClick(Sender: TObject);`
	`procedure miHelpOnMainWindowClick(Sender: TObject);`
	`procedure miHintDelayClick(Sender: TObject);`
	`procedure miImportBitmapClick(Sender: TObject);`
	`procedure miImportDistributedDatabyZoneClick(Sender: TObject);`
	`procedure miImportDXFFileClick(Sender: TObject);`
	`procedure miImportPointsClick(Sender: TObject);`
	`procedure miImportShapefileClick(Sender: TObject);`
	`procedure miPrintFrequencyClick(Sender: TObject);`
	`procedure miPrintInitialClick(Sender: TObject);`
	`procedure miRearrangeObjectsClick(Sender: TObject);`
	`procedure miRulerFormatClick(Sender: TObject);`
	`procedure miSearchForObjectClick(Sender: TObject);`
	`procedure miSelectObjectsByNameClick(Sender: TObject);`
	`procedure miSetSelectedColRowLayerClick(Sender: TObject);`
	`procedure miShowFormulaErrorsClick(Sender: TObject);`
	`procedure miShowHideBitmapsClick(Sender: TObject);`
	`procedure miShowHideObjectsClick(Sender: TObject);`
	`procedure miShowSelectedObjectsClick(Sender: TObject);`
	`procedure miSolutionMethodClick(Sender: TObject);`
	`procedure miSteadyFlowClick(Sender: TObject);`
	`procedure miTimeControlClick(Sender: TObject);`
	`procedure miTitleAndUnitsClick(Sender: TObject);`
	`procedure miVerticalExaggerationClick(Sender: TObject);`
	`procedure miZoomInClick(Sender: TObject);`
	`procedure OpenMostRecentlyUsed(Sender: TObject);`
	`procedure pnlLowerRightMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);`
	`procedure sbMainMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);`
	`procedure sbMainMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);`
	`procedure sbMainMouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);`
	`procedure sdSaveDialogFilterChange(Sender: TObject; NewIndex: Integer);`
	`procedure splitHorizMoved(Sender: TObject);`
	`procedure splitVertBottomMoved(Sender: TObject);`
	`procedure splitVertTopMoved(Sender: TObject);`
	`procedure tb3DColorsClick(Sender: TObject);`
	`procedure tb3DObjectsClick(Sender: TObject);`
	`procedure tbAddHorizontalBoundaryClick(Sender: TObject);`
	`procedure tbAddVerticalBoundaryClick(Sender: TObject);`
	`procedure tbDeleteSegmentClick(Sender: TObject);`
	`procedure tbGridAngleClick(Sender: TObject);`
	`procedure tbInsertPointClick(Sender: TObject);`
	`procedure tbLassoClick(Sender: TObject);`
	`procedure tbLineClick(Sender: TObject);`
	`procedure tbPanClick(Sender: TObject);`
	`procedure tbPointClick(Sender: TObject);`
	`procedure tbPointMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);`
	`procedure tbPolygonClick(Sender: TObject);`
	`procedure tbRectangleClick(Sender: TObject);`
	`procedure tbSelectClick(Sender: TObject);`
	`procedure tbSelectPointClick(Sender: TObject);`
	`procedure tbShellClick(Sender: TObject);`
	`procedure tbStraightLineClick(Sender: TObject);`
	`procedure tbZoomClick(Sender: TObject);`
	`procedure tbZoomOutClick(Sender: TObject);`
	`procedure ToolButtonMouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);`
	`procedure SetGridLineDrawingChoice(Sender: TObject);`
	`function ModelUpToDate(const FileName: string; CorrectDate: TDateTime): boolean;`
	`function ModflowUpToDate: boolean;`
	`function Mf2005UpToDate: boolean;`
	`function MfNwtUpToDate: boolean;`
	`function MfLgrUpToDate: boolean;`
	`function ModpathUpToDate(Model: TCustomModel): boolean;`
	`function ZoneBudgetUpToDate: boolean;`
	`function ModelMateUpToDate: boolean;`
	`procedure Invalidate3DView(Sender: TObject);`
	`procedure GetZoomBox(Sender: TObject; VD: TViewDirection; var ZoomBox: TQrbwZoomBox2);`
	`procedure GetCurrentScreenObject (Sender: TObject; VD: TViewDirection; var ScreenObject: TScreenObject);`
	`procedure ConvertPoint(Sender: TObject; VD: TViewDirection; const RealPoint: TPoint2D; var ScreenCoordinate: TPoint);`
	`procedure ScreenObjectSelectionChange(Sender: TObject);`
	`procedure CheckScreenObject(Sender: TObject; ScreenObject: TScreenObject; var IsACurrentScreenObject: boolean);`
	`procedure AddMostRecentlyUsedFile(const FileName: string);`
	`procedure AdjustToolbarPositions(FirstToolBar, SecondToolBar: TToolBar);`
	`procedure BringFormsToFront(Sender: TObject);`
	`function CheckModel: boolean;`
	`procedure ClearSelectedNodes;`
	`procedure DrawAddColRowCursor(const AnImage: TBitmap; Angle: real; const CursorComponent: TRbwDynamicCursor);`
	`procedure DrawMoveColRowCursor(const AnImage: TBitmap; Angle: real; const CursorComponent: TRbwDynamicCursor);`
	`procedure DrawSubdivideCursor(const AnImage: TBitmap; Angle: real; const CursorComponent: TRbwDynamicCursor);`
	`procedure ExportFile(const FileName: string; RunModel: boolean);`
	`procedure FillButtonList(AList: TList);`
	`function GetPhastGrid: TPhastGrid;`
	`function IsOverStatusPanelDivider(const X: integer): boolean;`
	`procedure SaveAFile(FileName: string);`
	`procedure SelectDefaultButton;`
	`procedure SetActionChecked(Sender: TObject);`
	`procedure SetButtonsUp(const CurrentButton: TObject);`
	`procedure SetCurrentTool(const Value: TCustomInteractiveTool);`
	`procedure SetCursorGrid(const Value: TCursorGrid);`
	`procedure SetFileFormat(const Value: TFileFormat);`
	`procedure SetFrontScreenObjectsChanged(const Value: boolean);`
	`procedure SetSideScreenObjectsChanged(const Value: boolean);`
	`procedure SetTopScreenObjectsChanged(const Value: boolean);`
	`procedure SetZB_Cursors(const ACursor: TCursor);`
	`procedure ShowHint(Sender: TObject);`
	`function GetModflowGrid: TModflowGrid;`
	`function GetGrid: TCustomModelGrid;`
	`procedure InvalidateViewOfModel;`
	`function GetModelSelection: TModelSelection;`
	`procedure SetModelSelection(const Value: TModelSelection);`
	`procedure NewPosition(Sender: TObject; NewPosition: TPositionStorage);`
	`procedure CheckInternet;`
	`procedure SaveModelMateProject;`
	`procedure SetChangingSelection(const Value: boolean);`
	`procedure OnOpenFile(Sender: TObject);`
	`procedure SetCanDraw(const Value: boolean);`
	`function GetObservationFileName(SD: TSaveDialog): string;`
	`function GetPredictionFileName(SD: TSaveDialog): string;`
	`function GetCanDraw: boolean;`
	`procedure InitializeModflowLgrInputDialog;`
	`procedure DeleteLastPointInRuler;`
	`function TestMt3dmsLocationOK(Model: TCustomModel): Boolean;`
	`function Mt3dmsUpToDate: boolean;`
	`procedure ScreenOnActiveFormChange(Sender: TObject);`
	`procedure ExportMt3dFromCommandLine(FileName: string);`
	`function GetSutraMesh: TSutraMesh3D;`
	`procedure OnAppIdle(Sender: TObject; var Done: Boolean);`
	`procedure UpdateFrontCubeForSutraCrossSection(Sender: TObject);`
	`procedure UpdateVerticalExaggeration(VerticalExaggeration: Double);`
	`procedure EnableMeshRenumbering;`
	`procedure InvalidateImage32AllViews;`
	`procedure EnableHufMenuItems;`
	`procedure EnableMt3dmsMenuItems;`
	`procedure EnableManageFlowObservations;`
	`procedure EnableManageHeadObservations;`
	`procedure ReadIniFile;`
	`procedure WriteIniFile;`
	`procedure SynchronizeViews(SourceView: TViewDirection);`
	`procedure ReDrawAllViews(Sender: TObject);`
	`procedure EnableLinkStreams;`
	`procedure AdjustScales;`
	`procedure BeginSuppressDrawing;`
	`procedure EndSupressDrawing;`
	`function DefaultVE: Real;`
	`procedure EditScreenObjects;`
	`procedure InvalidateDataSets;`
	`procedure InvalidateAllViews;`
	`procedure InvalidateFront;`
	`procedure InvalidateModel;`
	`procedure InvalidateSide;`
	`procedure InvalidateTop;`
	`procedure InitializeView(ModelXWidth, ModelYWidth, ModelHeight: Real);`
	`procedure OpenAFile(const FileName: string);`
	`function ResetSelectedScreenObjects: boolean;`
	`procedure ResizeZoomBoxes(Sender: TObject);`
	`procedure ScreenObjectsChanged(Sender: TObject);`
	`procedure UpdateDataSetDimensions;`
	`procedure UpdateModelSelection;`
	`procedure ModelSelectionChange(Sender: TObject);`
	`procedure EnableInvertSelection;`
	`procedure InvalidateGrid;`
	`procedure EnableVisualization;`
	`procedure UpdateModelCubeBreaks;`

Properties

	`property CreateArchive: Boolean read FCreateArchive write SetCreateArchive;`
	`property FileFormat: TFileFormat read FFileFormat write SetFileFormat;`
	`property ChangingSelection: boolean read FChangingSelection write SetChangingSelection;`
	`property CanDraw: boolean read GetCanDraw write SetCanDraw;`
	`property CanEdit: boolean read FCanEdit write FCanEdit;`
	`property ClickedRuler: TObject read FClickedRuler write FClickedRuler;`
	`property CurrentTool: TCustomInteractiveTool read FCurrentTool write SetCurrentTool;`
	`property CursorGrid: TCursorGrid read FCursorGrid write SetCursorGrid;`
	`property CursorX: integer read FCursorX write FCursorX;`
	`property CursorY: integer read FCursorY write FCursorY;`
	`property FrontDiscretizationChanged: boolean read FFrontDiscretizationChanged write FFrontDiscretizationChanged;`
	`property FrontScreenObjectsChanged: boolean read FFrontScreenObjectsChanged write SetFrontScreenObjectsChanged;`
	`property Grid: TCustomModelGrid read GetGrid;`
	`property SutraMesh: TSutraMesh3D read GetSutraMesh;`
	`property IniFile: TMemInifile read FIniFile;`
	`property ModflowGrid: TModflowGrid read GetModflowGrid;`
	`property PhastModel: TPhastModel read FPhastModel write FPhastModel;`
	`property OldHeight: integer read FOldHeight;`
	`property OldWidth: integer read FOldWidth;`
	`property PhastGrid: TPhastGrid read GetPhastGrid;`
	`property SideDiscretizationChanged: boolean read FSideDiscretizationChanged write FSideDiscretizationChanged;`
	`property SideScreenObjectsChanged: boolean read FSideScreenObjectsChanged write SetSideScreenObjectsChanged;`
	`property TopDiscretizationChanged: boolean read FTopDiscretizationChanged write FTopDiscretizationChanged;`
	`property TopScreenObjectsChanged: boolean read FTopScreenObjectsChanged write SetTopScreenObjectsChanged;`
	`property ModelSelection: TModelSelection read GetModelSelection write SetModelSelection;`
	`property CreateNewCompositeBudgetFile: boolean read FCreateNewCompositeBudgetFile write FCreateNewCompositeBudgetFile;`
	`property ObservationFileName[SD:TSaveDialog]: string read GetObservationFileName;`
	`property PredictionFileName[SD:TSaveDialog]: string read GetPredictionFileName;`

Description

Fields

	`cbControlBar: TControlBar;`

	`tbarEdit: TToolBar;`

	`tbCut: TToolButton;`

	`tbCopy: TToolButton;`

	`tbPaste: TToolButton;`

	`tbUndo: TToolButton;`

	`tbRedo: TToolButton;`

	`tbarFile: TToolBar;`

	`tbSave: TToolButton;`

	`tbOpen: TToolButton;`

	`tbPrint: TToolButton;`

	`tbNew: TToolButton;`

	`tbarEditScreenObjects: TToolBar;`

	`tbSeparator1: TToolButton;`

	`tbInsertPoint: TToolButton;`

	`tbDeleteSegment: TToolButton;`

	`tbLasso: TToolButton;`

	`tbSelectPoint: TToolButton;`

	`tbSelect: TToolButton;`

	`tbSeparator2: TToolButton;`

	`tbShowHideObjects: TToolButton;`

	`tbarView: TToolBar;`

	`tbZoom: TToolButton;`

	`tbZoomOut: TToolButton;`

	`tbZoomIn: TToolButton;`

	`tbPan: TToolButton;`

	`tbarEditGrid: TToolBar;`

	`tbDeleteColumnRow: TToolButton;`

	`tbMove: TToolButton;`

	`tbAddVerticalBoundary: TToolButton;`

	`tbAddHorizontalBoundary: TToolButton;`

	`tbSubdivide: TToolButton;`

	`tbGridAngle: TToolButton;`

	`tbSpacing: TToolButton;`

	`tbGenerateGrid: TToolButton;`

	`tbarCreateScreenObject: TToolBar;`

	`tbStraightLine: TToolButton;`

	`tbLine: TToolButton;`

	`tbPolygon: TToolButton;`

	`tbRectangle: TToolButton;`

	`tbPoint: TToolButton;`

	`tbarView3D: TToolBar;`

	`tbShell: TToolButton;`

	`tbTopGrid: TToolButton;`

	`tbFrontGrid: TToolButton;`

	`tbSideGrid: TToolButton;`

	`tb3DColors: TToolButton;`

	`tb3DObjects: TToolButton;`

	`MostRecentlyUsed: TvRbwMostRecentlyUsed;`

	`Model1: TMenuItem;`

	`miModflow: TMenuItem;`

	`miPhast: TMenuItem;`

	`acModflowActive: TAction;`

	`acPhastActive: TAction;`

	`miNewModflowModel: TMenuItem;`

	`miNewPHASTModel: TMenuItem;`

	`acFileNewPhastModel: TAction;`

	`miLayers: TMenuItem;`

	`acLayers: TAction;`

	`miGeneral: TMenuItem;`

	`tbSelectColRowLayer: TToolButton;`

	`acSelectColRowLay: TAction;`

	`miSelectColRowLayer: TMenuItem;`

	`miTime: TMenuItem;`

	`miOutputControl: TMenuItem;`

	`sdModflowInput: TSaveDialog;`

	`miExport: TMenuItem;`

	`miExportModflow: TMenuItem;`

	`WarningsandErrors1: TMenuItem;`

	`miInvertSelection: TMenuItem;`

	`miSelectAllTop: TMenuItem;`

	`acSelectAllFront: TAction;`

	`acSelectAllSide: TAction;`

	`miSelectAllFront: TMenuItem;`

	`miSelectAllSide: TMenuItem;`

	`miShowGridValues: TMenuItem;`

	`miPackages: TMenuItem;`

	`miProgramLocations: TMenuItem;`

	`N7: TMenuItem;`

	`miEditGlobalVariables: TMenuItem;`

	`AddPartstoObject1: TMenuItem;`

	`tbAddPartsToObject: TToolButton;`

	`acAddPolygonsToObject: TAction;`

	`tbSeparator3: TToolButton;`

	`tbAddLinesToObjects: TToolButton;`

	`acAddLinesToObject: TAction;`

	`AddLinesToObject1: TMenuItem;`

	`tbAddPointsToObject: TToolButton;`

	`acAddPointsToObject: TAction;`

	`AddPointstoObject1: TMenuItem;`

	`ShallAllObjects1: TMenuItem;`

	`HideAllObjects1: TMenuItem;`

	`N8: TMenuItem;`

	`miFilesToArchive: TMenuItem;`

	`ModflowReference1: TMenuItem;`

	`miLinkSFRStreams: TMenuItem;`

	`IntroductoryVideo1: TMenuItem;`

	`comboZCount: TComboBox;`

	`miExportShapefile: TMenuItem;`

	`miModflow2005Model: TMenuItem;`

	`ilImageList: TImageList;`

	`miModelResults: TMenuItem;`

	`miScaleRotateorMoveObjects: TMenuItem;`

	`miMergeObjects: TMenuItem;`

	`tbShow2DGrid: TToolButton;`

	`miShow2DGridlines: TMenuItem;`

	`splitVertTop: TJvNetscapeSplitter;`
`splitVertTop` separates frameSideView from frameTopView and can be used to resize them. See splitVertTopMoved.

	`splitVertBottom: TJvNetscapeSplitter;`
`splitVertBottom` separates frame3DView from frameFrontView and can be used to resize them. See splitVertBottomMoved.

	`splitHoriz: TJvNetscapeSplitter;`
`splitHoriz` separates pnlBottom from pnlTop and can be used to resize them. See splitHorizMoved.

	`miModflowNameFile: TMenuItem;`

	`miReverseSelectedObjects: TMenuItem;`

	`acRunModflow: TAction;`

	`RestoreDefault2DView1: TMenuItem;`

	`tbRestoreDefault2DView: TToolButton;`

	`tbPositionUndo: TToolButton;`

	`tbPositionRedo: TToolButton;`

	`acPositionForward: TAction;`

	`acPositionBackward: TAction;`

	`miUndoPosition: TMenuItem;`

	`RedoPosition: TMenuItem;`

	`miGriddedData: TMenuItem;`

	`miExportModpath: TMenuItem;`

	`acExportModpath: TAction;`

	`sdModpathInput: TSaveDialog;`

	`miManageFluxObservations: TMenuItem;`

	`Create1: TMenuItem;`

	`Edit1: TMenuItem;`

	`Navigation1: TMenuItem;`

	`miAllVideos: TMenuItem;`

	`miShowVideoTips: TMenuItem;`

	`N2: TMenuItem;`

	`N9: TMenuItem;`

	`acExportModelMate: TAction;`

	`ModelMateFile1: TMenuItem;`

	`acImportModelMate: TAction;`

	`odModelMate: TOpenDialog;`

	`miImportModelMate: TMenuItem;`

	`miObservationType: TMenuItem;`

	`miObservations: TMenuItem;`

	`miPredictions: TMenuItem;`

	`acEditSelecteObjects: TAction;`

	`miMF_HydrogeologicUnits: TMenuItem;`

	`miBatchFileAdditions: TMenuItem;`

	`miSelectObjectsforEditing: TMenuItem;`

	`miDisplayDataSetValues: TMenuItem;`

	`miObjectstoShapefile: TMenuItem;`

	`miDeleteImage: TMenuItem;`

	`miPHASTProgramLocation: TMenuItem;`

	`SurferGridFile1: TMenuItem;`

	`SampleDEMData1: TMenuItem;`

	`miZONEBUDGETInputFiles: TMenuItem;`

	`sdZonebudgetInput: TSaveDialog;`

	`tbVertexValue: TToolButton;`

	`acVertexValue: TAction;`

	`EditVertexValues1: TMenuItem;`

	`sdModelMate: TSaveDialog;`

	`menuGridLineChoice: TPopupMenu;`

	`Showall1: TMenuItem;`

	`Showexterior1: TMenuItem;`

	`Showactive1: TMenuItem;`

	`ShowAll2: TMenuItem;`

	`Showexterior2: TMenuItem;`

	`Showactive2: TMenuItem;`

	`acShowAllGridLines: TAction;`

	`acShowExteriorGridLines: TAction;`

	`acShowActiveGridLines: TAction;`

	`Showactiveedge1: TMenuItem;`

	`acShowActiveEdge: TAction;`

	`Showactiveedge2: TMenuItem;`

	`acRestoreDefault2DView: TAction;`

	`acExportImage: TAction;`

	`ExportImage1: TMenuItem;`

	`miManageParameters: TMenuItem;`

	`miManageHeadObservations: TMenuItem;`

	`miContourstoShapefile: TMenuItem;`

	`sdShapefile: TSaveDialog;`

	`miShapefile: TMenuItem;`

	`miPathlinestoShapefile: TMenuItem;`

	`miEndpointsatStartingLocationstoShapefile: TMenuItem;`

	`miEndpointsatEndingLocationstoShapefile: TMenuItem;`

	`miTimeSeriestoShapefile: TMenuItem;`

	`miDataSetstoCSV: TMenuItem;`

	`tbShowGridValues: TToolButton;`

	`acShowGridValues: TAction;`

	`acModflowLgrActive: TAction;`

	`miModflowLgr: TMenuItem;`

	`miChildModels: TMenuItem;`

	`miASCII_RasterFile: TMenuItem;`

	`tbImportModelResults: TToolButton;`

	`acImportModelResults: TAction;`

	`acRunModflowLgr: TAction;`

	`sdModflowLgr: TSaveDialog;`

	`miExportModflowLgr: TMenuItem;`

	`miInvertSelectedVertices: TMenuItem;`

	`miSplitSelectedObjects: TMenuItem;`

	`miMakeSelectedVerticesASeparateObject: TMenuItem;`

	`miSplitObjectAtSelectedVertices: TMenuItem;`

	`acUndo: TAction;`

	`acRedo: TAction;`

	`miModflowNwt: TMenuItem;`

	`acModflowNwtActive: TAction;`

	`acRunModflowNwt: TAction;`

	`miExportModflowNwt: TMenuItem;`

	`acMeasure: TAction;`

	`tbMeasure: TToolButton;`

	`hntMeasure: TJvHint;`

	`miMeasure: TMenuItem;`

	`miLockSelectedObjects: TMenuItem;`

	`miUnlockSelectedObjects: TMenuItem;`

	`btnDisplayData: TToolButton;`

	`acDisplayData: TAction;`

	`miDisplayData: TMenuItem;`

	`miClearUndoRedostack: TMenuItem;`

	`acRunMt3dms: TAction;`

	`dlgSaveMt3dms: TSaveDialog;`

	`miRunMt3dms: TMenuItem;`

	`btnRunModel: TJvArrowButton;`

	`acExportZoneBudget: TAction;`

	`pmExportModel: TPopupMenu;`

	`miExportModpathPopUp: TMenuItem;`

	`miExportZoneBudgetPopup: TMenuItem;`

	`miRunMt3dmsPopup: TMenuItem;`

	`acSutraActive: TAction;`

	`miSUTRA: TMenuItem;`

	`acSutraLayers: TAction;`

	`N10: TMenuItem;`

	`miSUTRALayerGroups: TMenuItem;`

	`tlbMesh: TToolBar;`

	`tbCrossSection: TToolButton;`

	`acSutraOptions: TAction;`

	`miSutraOptions: TMenuItem;`

	`acSutraTimes: TAction;`

	`miSutraTimes: TMenuItem;`

	`acRunSutra: TAction;`

	`sdSutraInput: TSaveDialog;`

	`acRunSutra1: TMenuItem;`

	`acSutraOutputControl: TAction;`

	`miSutraOutputControl: TMenuItem;`

	`miSutraProgramLocations: TMenuItem;`

	`acSutraProgramLocations: TAction;`

	`acImportTprogs: TAction;`

	`ImportTPROGSBinaryGridFile1: TMenuItem;`

	`miCustomizeSutraMesh: TMenuItem;`

	`tbRotateCrossSection: TToolButton;`

	`acImportSutraModelResults: TAction;`

	`miMesh: TMenuItem;`

	`miSpecifyCrossSection: TMenuItem;`

	`miMeshGenerationControls: TMenuItem;`

	`miRenumberMesh: TMenuItem;`

	`tbMoveNodes: TToolButton;`

	`btnGenerateMesh: TToolButton;`

	`tlb3dViewMesh: TToolBar;`

	`acShowTopMesh: TAction;`

	`acShowFrontMesh: TAction;`

	`btnShowTopMesh: TToolButton;`

	`btnShowFrontMesh: TToolButton;`

	`ShowTopMesh1: TMenuItem;`

	`ShowFrontMesh1: TMenuItem;`

	`acNewSutraModel: TAction;`

	`acNewSutraModel1: TMenuItem;`

	`btnFishnet: TToolButton;`

	`acFishnet: TAction;`

	`miViewMeshInformation1: TMenuItem;`

	`FCreateArchive: Boolean;`

	`CreateArchiveSet: boolean;`

	`FCreatingMainForm: Boolean;`

	`miHint: TMenuItemHint;`

	`FSaveModelForm: TfrmSaveArchive;`

	`FOtherSplitterMoving: Boolean;`

	`FSynchronizeCount: integer;`

	`FRunModflowForm: TfrmRunModflow;`

	`FRunModpathForm: TfrmRunModpath;`

	`FRunZoneBudgetForm: TfrmRunZoneBudget;`

	`FRunModflow: Boolean;`

	`FRunModpath: Boolean;`

	`FCreateNewCompositeBudgetFile: boolean;`

	`FRunZoneBudget: Boolean;`

	`FRunPhastForm: TfrmRunPhast;`

	`FRunSutraFrom: TfrmRunPhast;`

	`FRunPhast: boolean;`

	`FRunSutra: Boolean;`

	`FPositionList: TPositionList;`

	`FBrowser: string;`

	`FStartTime: TDateTime;`

	`FFileStream: TFileStream;`

	`FFileSize: Int64;`

	`FRunModelMateForm: TfrmRunModelMate;`

	`FRunModelMate: boolean;`

	`FObservationFileName: string;`

	`FPredictionFileName: string;`

	`FReadingFile: Boolean;`

	`FSizeWarningDisplayed: Boolean;`

	`FRunModelSelection: Integer;`

	`FSupressDrawing: Integer;`

	`FLastMoveTime: TDateTime;`

	`FRunMt3dmsForm: TfrmRunMt3dms;`

	`FRunMt3dms: boolean;`

	`FRunModpathModelSelection: integer;`

	`FExportModpathShapefileForm: TfrmExportModpathShapefile;`

	`FExportModpathShapeFileModelChoice: Integer;`

	`FRenumberMethod: integer;`

	`acAddColumn: TAction;`
`acAddColumn` is the TAction for miAddVerticalGridLine and tbAddVerticalBoundary. See tbAddVerticalBoundaryClick.

	`acAddRow: TAction;`
`acAddRow` is the TAction for miAddHorizontalGridLine and tbAddHorizontalBoundary. See tbAddHorizontalBoundaryClick.

	`acColor: TAction;`
`acColor` is the TAction for miColor and tb3DColors. See acColorExecute.

	`acColoredGrid: TAction;`
`acColoredGrid` is the TAction for miShowColoredGrid and tb3DColors. See tb3DColorsClick.

	`acCopy: TAction;`
`acCopy` is the TAction for miCopy and tbCopy. `acCopy` is not yet used.

	`acCreateLine: TAction;`
`acCreateLine` is the TAction for miCreateLine and tbLine. See tbLineClick.

	`acCreatePoint: TAction;`
`acCreatePoint` is the TAction for miCreatePoint and tbPoint. See tbPointClick.

	`acCreatePolygon: TAction;`
`acCreatePolygon` is the TAction for miCreatePolygon and tbPolygon. See tbPolygonClick.

	`acCreateRectangle: TAction;`
`acCreateRectangle` is the TAction for miCreateRectangle and tbRectangle. See tbRectangleClick.

	`acCreateStraightLine: TAction;`
`acCreateStraightLine` is the TAction for miCreateStraightLine and tbStraightLine. See tbStraightLineClick.

	`acCut: TAction;`
`acCut` is the TAction for miCut and tbCut. `acCut` is not yet used.

	`acDeleteColumnRow: TAction;`
`acDeleteColumnRow` is the TAction for miDeleteGridLine and tbDeleteColumnRow. See acDeleteColumnRowExecute.

	`acDeleteSegment: TAction;`
`acDeleteSegment` is the TAction for miDeleteSegment and tbDeleteSegment. See tbDeleteSegmentClick.

	`acEditDataSets: TAction;`
`acEditDataSets` is the TAction for miEditDataSet. See acEditDataSetsExecute.

	`acEditGridLines: TAction;`
`acEditGridLines` is the TAction for miEditGridLines. See acEditGridLinesExecute.

	`acEditVerticalExaggeration: TAction;`
`acEditVerticalExaggeration` is the TAction for miVerticalExaggeration. See miVerticalExaggerationClick.

	`acExit: TAction;`
`acExit` is the TAction for miExit. See acExitExecute.

	`acExportPhastInputFile: TAction;`
`acExportPhastInputFile` is the TAction for miExportPhast. See acExportPhastInputFileExecute.

	`acFileNewModflowModel: TAction;`

	`acFileOpen: TAction;`
`acFileOpen` is the TAction for miOpen and tbOpen. See acFileOpenExecute.

	`acFilePrint: TAction;`
`acFilePrint` is the TAction for miPrint and tbPrint. `acFilePrint` is not yet used.

	`acFileSave: TAction;`
`acFileSave` is the TAction for miSave and tbSave. See acFileSaveExecute.

	`acFileSaveAs: TAction;`
`acFileSaveAs` is the TAction for miSaveAs. See acFileSaveAsExecute.

	`acFont: TAction;`
`acFont` is the TAction for miFont. See acFontExecute.

	`acGenerateGrid: TAction;`
`acGenerateGrid` is the TAction for miGenerateGrid and tbGenerateGrid. See acGenerateGridExecute.

	`acGridAngle: TAction;`
`acGridAngle` is the TAction for miGridAngle. See acGridAngleExecute.

	`acGridDragRotate: TAction;`
`acGridDragRotate` is the TAction for miDragtoRotate and tbGridAngle. See tbGridAngleClick.

	`acHelpContents: THelpContents;`
`acHelpContents` is the TAction for miContents. See acHelpContentsExecute.

	`acInsertNode: TAction;`
`acInsertNode` is the TAction for miInsertNode and tbInsertPoint. See tbInsertPointClick.

	`acMoveColumnOrRow: TAction;`
`acMoveColumnOrRow` is the TAction for miMoveColumnOrRow and tbMove. See acMoveColumnOrRowExecute.

	`acMoveTo: TAction;`
`acMoveTo` is the TAction for miGoTo. See acMoveToExecute.

	`acPan: TAction;`
`acPan` is the TAction for miPan and tbPan. See tbPanClick.

	`acPaste: TAction;`
`acPaste` is the TAction for miPaste and tbPaste. `acPaste` is not used yet.

	`acRestoreDefaultView: TAction;`
`acRestoreDefaultView` is the TAction for miRestoreDefaultView. See acRestoreDefaultViewExecute.

	`acSelectAllTop: TAction;`

	`acSelectNode: TAction;`
`acSelectNode` is the TAction for miSelectNodes and tbSelectPoint. See tbSelectPointClick.

	`acSelectObjects: TAction;`
`acSelectObjects` is the TAction for miSelectObjects and tbSelect. See tbSelectClick.

	`acSelectWithLasso: TAction;`
`acSelectWithLasso` is the TAction for miSelectWithLasso and tbLasso. See tbLassoClick.

	`acSetSpacing: TAction;`
`acSetSpacing` is the TAction for miSetSpacing and tbSpacing. See acSetSpacingExecute.

	`acShow3DObjects: TAction;`
`acShow3DObjects` is the TAction for miShow3DObjects and tb3DObjects. See tb3DObjectsClick.

	`acShowFrontGrid: TAction;`
`acShowFrontGrid` is the TAction for miShowFrontGrid and tbFrontGrid. See acShowFrontGridExecute.

	`acShowGridShell: TAction;`
`acShowGridShell` is the TAction for miShowGridShell and tbShell. See acShowGridShellExecute.

	`acShowHideObjects: TAction;`
`acShowHideObjects` is the action for showing or hiding frmShowHideObjects. See miShowHideObjectsClick.

	`acShowSideGrid: TAction;`
`acShowSideGrid` is the TAction for miShowSideGrid and tbSideGrid. See acShowSideGridExecute.

	`acShowTopGrid: TAction;`
`acShowTopGrid` is the TAction for miShowTopGrid and tbTopGrid. See acShowTopGridExecute.

	`acSmoothGrid: TAction;`
`acSmoothGrid` is the TAction for miSmoothGrid. See acSmoothGridExecute.

	`acSubdivide: TAction;`
`acSubdivide` is the TAction for miSubdivide and tbSubdivide. See acSubdivideExecute.

	`acZoom: TAction;`
`acZoom` is the TAction for miZoom and tbZoom. See tbZoomClick.

	`acZoomIn: TAction;`
`acZoomIn` is the TAction for miZoomIn and tbZoomIn. See miZoomInClick.

	`acZoomOut: TAction;`
`acZoomOut` is the TAction for miZoomOut and tbZoomOut. See tbZoomOutClick.

	`alActionList: TActionList;`
`alActionList` holds the instances of TAction in GoPhast.

	`cdColorDialog: TColorDialog;`
`cdColorDialog` is used to pick the background color for GoPhast in acColorExecute.

	`dcAddColCursor: TRbwDynamicCursor;`
`dcAddColCursor` is used to draw a rotated version of the AddColumn cursor in the top view of the model.

	`dcAddRowCursor: TRbwDynamicCursor;`
`dcAddRowCursor` is used to draw a rotated version of the AddRow cursor in the top view of the model.

	`dcMoveColCursor: TRbwDynamicCursor;`
`dcMoveColCursor` is used to draw a rotated version of the MoveColumn cursor in the top view of the model.

	`dcMoveRowCursor: TRbwDynamicCursor;`
`dcMoveRowCursor` is used to draw a rotated version of the MoveRow cursor in the top view of the model.

	`dcSetSpacing: TRbwDynamicCursor;`
`dcSetSpacing` is used to draw a rotated version of the SetCellSpacing cursor in the top view of the model.

	`dcSubdivide: TRbwDynamicCursor;`
`dcSubdivide` is used to draw a rotated version of the Subdivide cursor in the top view of the model.

	`fdFontDialog: TFontDialog;`
`fdFontDialog` is used to pick the font for GoPhast in acFontExecute.

	`frame3DView: Tframe3DView;`
`frame3DView` displays a 3D view of the model and handles interaction with the 3D view.

	`frameFrontView: TframeView;`
`frameFrontView` displays a front view of the model and handles interaction with the front view.

	`frameSideView: TframeView;`
`frameSideView` displays a side view of the model and handles interaction with the side view.

	`frameTopView: TframeView;`
`frameTopView` displays a top view of the model and handles interaction with the top view.

	`ilDisabledImageList: TImageList;`

	`mi3D_Colors: TMenuItem;`
See mi3D_ColorsClick.

	`miAbout: TMenuItem;`
See miAboutClick.

	`miAddHorizontalGridLine: TMenuItem;`
See tbAddHorizontalBoundaryClick and acAddRow.

	`miAddVerticalGridLine: TMenuItem;`
See tbAddVerticalBoundaryClick and acAddColumn.

	`miChemistryOptions: TMenuItem;`
See miChemistryOptionsClick.

	`miColor: TMenuItem;`
See acColorExecute and acColor.

	`miContents: TMenuItem;`
See acHelpContentsExecute and acHelpContents.

	`miCopy: TMenuItem;`
See acCopy.

	`miCreateLine: TMenuItem;`
See tbLineClick and acCreateLine.

	`miCreatePoint: TMenuItem;`
See tbPointClick and acCreatePoint.

	`miCreatePolygon: TMenuItem;`
See tbPolygonClick and acCreatePolygon.

	`miCreateRectangle: TMenuItem;`
See tbRectangleClick and acCreateRectangle.

	`miCreateStraightLine: TMenuItem;`
See tbStraightLineClick and acCreateStraightLine.

	`miCustomize: TMenuItem;`
`miCustomize` holds the miFont, miColor, miHintDelay, and miRulerFormat menu items.

	`miCut: TMenuItem;`
See acCut.

	`miData: TMenuItem;`
`miData` holds the miEditDataSet, miEditGlobalVariables, miDisplayData, miShowGridValues and miDisplayDataSetValues menu items.

	`miDeleteGridLine: TMenuItem;`
See acDeleteColumnRowExecute and acDeleteColumnRow.

	`miDeleteSegment: TMenuItem;`
See tbDeleteSegmentClick and acDeleteSegment.

	`miDragtoRotate: TMenuItem;`
See tbGridAngleClick and acGridDragRotate.

	`miEdit: TMenuItem;`
`miEdit` holds the miUndo, miRedo, miCut, miCopy, miPaste, miSelectAll, miEditBitmaps, and miShowHideBitmaps menu items.

	`miEditBitmaps: TMenuItem;`
See miEditBitmapsClick.

	`miEditDataSet: TMenuItem;`
See acEditDataSetsExecute and acEditDataSets.

	`miEditGridLines: TMenuItem;`
See acEditGridLinesExecute and acEditGridLines.

miEditSelectedObjects: TMenuItem;

This TMenuItem [Object|Edit Selected Object(s)], allows the user to edit the properties of the selected objects by displaying the TfrmScreenObjectProperties dialog box.

Methods

	`procedure tbUndoClick(Sender: TObject);`

	`procedure acUndoExecute(Sender: TObject);`

	`procedure tbRedoClick(Sender: TObject);`

	`procedure acPhastActiveExecute(Sender: TObject);`

	`procedure acModflowActiveExecute(Sender: TObject);`

	`procedure acLayersExecute(Sender: TObject);`

	`procedure miGeneralClick(Sender: TObject);`

	`procedure acSelectColRowLayExecute(Sender: TObject);`

	`procedure miTimeClick(Sender: TObject);`

	`procedure miOutputControlClick(Sender: TObject);`

	`procedure miExportModflowClick(Sender: TObject);`

	`procedure WarningsandErrors1Click(Sender: TObject);`

	`procedure miInvertSelectionClick(Sender: TObject);`

	`procedure acSelectAllTopExecute(Sender: TObject);`

	`procedure acSelectAllFrontExecute(Sender: TObject);`

	`procedure acSelectAllSideExecute(Sender: TObject);`

	`procedure acShowGridValuesClick(Sender: TObject);`

	`procedure miPackagesClick(Sender: TObject);`

	`procedure miProgramLocationsClick(Sender: TObject);`

	`procedure miEditGlobalVariablesClick(Sender: TObject);`

	`procedure acAddPolygonsToObjectExecute(Sender: TObject);`

	`procedure acAddLinesToObjectExecute(Sender: TObject);`

	`procedure acAddPointsToObjectExecute(Sender: TObject);`

	`procedure ShallAllObjects1Click(Sender: TObject);`

	`procedure HideAllObjects1Click(Sender: TObject);`

	`procedure miFilesToArchiveClick(Sender: TObject);`

	`procedure sdSaveDialogClose(Sender: TObject);`

	`procedure sdSaveDialogShow(Sender: TObject);`

	`procedure ModflowReference1Click(Sender: TObject);`

	`procedure miLinkSFRStreamsClick(Sender: TObject);`

	`procedure IntroductoryVideo1Click(Sender: TObject);`

	`procedure miExportShapefileClick(Sender: TObject);`

	`procedure sdSaveDialogTypeChange(Sender: TObject);`

	`procedure miModelResultsClick(Sender: TObject);`

	`procedure miScaleRotateorMoveObjectsClick(Sender: TObject);`

	`procedure miMergeObjectsClick(Sender: TObject);`

	`procedure miModflowNameFileClick(Sender: TObject);`

	`procedure miReverseSelectedObjectsClick(Sender: TObject);`

	`procedure RestoreDefault2DView1Click(Sender: TObject);`

	`procedure sdModflowInputShow(Sender: TObject);`

	`procedure sdModflowInputClose(Sender: TObject);`

	`procedure sdPhastInputShow(Sender: TObject);`

	`procedure sdPhastInputClose(Sender: TObject);`

	`procedure acPositionForwardExecute(Sender: TObject);`

	`procedure acPositionBackwardExecute(Sender: TObject);`

	`procedure miGriddedDataClick(Sender: TObject);`

	`procedure sdModpathInputShow(Sender: TObject);`

	`procedure sdModpathInputClose(Sender: TObject);`

	`procedure acExportModpathExecute(Sender: TObject);`

	`procedure miFileClick(Sender: TObject);`

	`procedure miManageFluxObservationsClick(Sender: TObject);`

	`procedure miAllVideosClick(Sender: TObject);`

	`procedure miShowVideoTipsClick(Sender: TObject);`

	`procedure acCopyExecute(Sender: TObject);`

	`procedure acCutExecute(Sender: TObject);`

	`procedure acPasteExecute(Sender: TObject);`

	`procedure FormActivate(Sender: TObject);`

	`procedure FormDeactivate(Sender: TObject);`

	`procedure acExportModelMateExecute(Sender: TObject);`

	`procedure acImportModelMateExecute(Sender: TObject);`

	`procedure miObservationsClick(Sender: TObject);`

	`procedure miMF_HydrogeologicUnitsClick(Sender: TObject);`

	`procedure miBatchFileAdditionsClick(Sender: TObject);`

	`procedure miSelectObjectsforEditingClick(Sender: TObject);`

	`procedure miDisplayDataSetValuesClick(Sender: TObject);`

	`procedure miObjectstoShapefileClick(Sender: TObject);`

	`procedure miDeleteImageClick(Sender: TObject);`

	`procedure miPHASTProgramLocationClick(Sender: TObject);`

	`procedure SurferGridFile1Click(Sender: TObject);`

	`procedure sbMainDrawPanel(StatusBar: TStatusBar; Panel: TStatusPanel; const Rect: TRect);`

	`procedure SampleDEMData1Click(Sender: TObject);`

	`procedure miZONEBUDGETInputFilesClick(Sender: TObject);`

	`procedure sdZonebudgetInputShow(Sender: TObject);`

	`procedure sdZonebudgetInputClose(Sender: TObject);`

	`procedure acVertexValueExecute(Sender: TObject);`

	`procedure acExportImageExecute(Sender: TObject);`

	`procedure miManageParametersClick(Sender: TObject);`

	`procedure miManageHeadObservationsClick(Sender: TObject);`

	`procedure sdModelMateShow(Sender: TObject);`

	`procedure sdModelMateClose(Sender: TObject);`

	`procedure miContourstoShapefileClick(Sender: TObject);`

	`procedure miPathlinestoShapefileClick(Sender: TObject);`

	`procedure miEndpointsatStartingLocationstoShapefileClick(Sender: TObject);`

	`procedure miEndpointsatEndingLocationstoShapefileClick(Sender: TObject);`

	`procedure miTimeSeriestoShapefileClick(Sender: TObject);`

	`procedure miDataSetstoCSVClick(Sender: TObject);`

	`procedure acModflowLgrActiveExecute(Sender: TObject);`

	`procedure miChildModelsClick(Sender: TObject);`

	`procedure miASCII_RasterFileClick(Sender: TObject);`

	`procedure acRunModflowLgrExecute(Sender: TObject);`

	`procedure miInvertSelectedVerticesClick(Sender: TObject);`

	`procedure miSplitSelectedObjectsClick(Sender: TObject);`

	`procedure miMakeSelectedVerticesASeparateObjectClick(Sender: TObject);`

	`procedure miSplitObjectAtSelectedVerticesClick(Sender: TObject);`

	`procedure acModflowNwtActiveExecute(Sender: TObject);`

	`procedure acRunModflowNwtExecute(Sender: TObject);`

	`procedure acMeasureExecute(Sender: TObject);`

	`procedure miLockSelectedObjectsClick(Sender: TObject);`

	`procedure miUnlockSelectedObjectsClick(Sender: TObject);`

	`procedure acDisplayDataExecute(Sender: TObject);`

	`procedure FormMouseWheel(Sender: TObject; Shift: TShiftState; WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean);`

	`procedure miClearUndoRedostackClick(Sender: TObject);`

	`procedure acRunMt3dmsExecute(Sender: TObject);`

	`procedure dlgSaveMt3dmsShow(Sender: TObject);`

	`procedure dlgSaveMt3dmsClose(Sender: TObject);`

	`procedure acSutraActiveExecute(Sender: TObject);`

	`procedure sdShapefileShow(Sender: TObject);`

	`procedure sdShapefileClose(Sender: TObject);`

	`procedure acSutraLayersExecute(Sender: TObject);`

	`procedure tbCrossSectionClick(Sender: TObject);`

	`procedure acSutraOptionsExecute(Sender: TObject);`

	`procedure AllowDrawing(Sender: TObject);`

	`procedure FormShow(Sender: TObject);`

	`procedure acSutraTimesExecute(Sender: TObject);`

	`procedure acRunSutraExecute(Sender: TObject);`

	`procedure acSutraOutputControlExecute(Sender: TObject);`

	`procedure acSutraProgramLocationsExecute(Sender: TObject);`

	`procedure acImportTprogsExecute(Sender: TObject);`

	`procedure sdSutraInputShow(Sender: TObject);`

	`procedure sdSutraInputClose(Sender: TObject);`

	`procedure miCustomizeSutraMeshClick(Sender: TObject);`

	`procedure tbRotateCrossSectionClick(Sender: TObject);`

	`procedure miSpecifyCrossSectionClick(Sender: TObject);`

	`procedure miMeshGenerationControlsClick(Sender: TObject);`

	`procedure miRenumberMeshClick(Sender: TObject);`

	`procedure tbMoveNodesClick(Sender: TObject);`

	`procedure acShowTopMeshExecute(Sender: TObject);`

	`procedure acShowFrontMeshExecute(Sender: TObject);`

	`procedure acFishnetExecute(Sender: TObject);`

	`procedure miViewMeshInformation1Click(Sender: TObject);`

	`procedure SetCreateArchive(const Value: Boolean);`

	`procedure WMMenuSelect(var Msg: TWMMenuSelect); message WM_MENUSELECT;`

	`procedure DeleteLastPointInScreenObject;`
`DeleteLastPointInScreenObject` deletes the last point the the current TScreenObject. If there is no current TScreenObject, it deletes the selected TScreenObject(s).

	`procedure DeleteSelectedNodesOrSelectedScreenObjects;`
`DeleteSelectedNodesOrSelectedScreenObjects` deletes the selected TScreenObject(s).

	`procedure CreatePhastModel;`

	`procedure UpdateDisplay(Sender: TObject);`

	`procedure UpdatePermanantDialogBoxAppearances;`

	`procedure ShowOrHideAllScreenObjects(ShowAll: Boolean);`

	`procedure PlayIntroductoryVideo;`

	`procedure StoreInitalPosition;`

	`procedure ReadModelMateProject(FileName: string; ModelMateProject: TProject);`

	`procedure InitializeModflowInputDialog;`

	`procedure EnableDeleteImage;`

	`procedure CancelCurrentScreenObject;`

	`procedure InternalSaveFile(FileName: string);`

	`procedure GetProgramLocations(Model: TCustomModel);`

	`function TestModpathLocationOK(Model: TCustomModel): Boolean;`

	`function TestZoneBudgetLocationOK(Model: TCustomModel): Boolean;`

	`procedure MenuItemsSetEnabled(AValue: Boolean);`

	`procedure ClearFileSaveDialogBoxNames;`

	`procedure HandleCommandLineParameters(FileName: string);`

	`procedure ExportFromCommandLine(FileName: string);`

	`procedure ImportPvalFile(PValFile: string);`

	`procedure ImportGlobalVariablesFile(GloVarFile: string);`

	`procedure ExportSutra(ShouldRunSutra: Boolean; const FileName: string);`

	`procedure acColorExecute(Sender: TObject);`
`acColorExecute` changes the background color of GoPhast.

	`procedure acDeleteColumnRowExecute(Sender: TObject);`
`acDeleteColumnRowExecute` sets CurrentTool to DeleteGridBoundaryTool.

	`procedure acEditDataSetsExecute(Sender: TObject);`
`acEditDataSetsExecute` allows the user to edit data sets by showing TfrmDataSets.

	`procedure acEditGridLinesExecute(Sender: TObject);`
`acEditGridLinesExecute` allows the user to edit grid lines by showing TfrmGridSpacing.

	`procedure acExitExecute(Sender: TObject);`
`acExitExecute` closes GoPhast.

	`procedure acExportPhastInputFileExecute(Sender: TObject);`
`acExportPhastInputFileExecute` exports the transport input file for PHAST.

	`procedure acFileNewModflowModelExecute(Sender: TObject);`
`acFileNewModflowModelExecute` creates a new model.

	`procedure acFileOpenExecute(Sender: TObject);`
`acFileOpenExecute` reads an existing file from the disk.

	`procedure acFileSaveAsExecute(Sender: TObject);`
`acFileSaveAsExecute` saves a file to the disk with a user-specified name.

	`procedure acFileSaveExecute(Sender: TObject);`
`acFileSaveExecute` saves a file to the disk with the existing file name.

	`procedure acFontExecute(Sender: TObject);`
`acFontExecute` sets the font of GoPhast.

	`procedure acGenerateGridExecute(Sender: TObject);`
`acGenerateGridExecute` generates a grid by showing TfrmGenerateGrid.

	`procedure acGridAngleExecute(Sender: TObject);`
`acGridAngleExecute` allows the user to set the grid angle using TfrmGridAngle.

	`procedure acHelpContentsExecute(Sender: TObject);`
`acHelpContentsExecute` looks for help for HelpKeyword. Displays the Help contents for GoPhast.

	`procedure acMoveColumnOrRowExecute(Sender: TObject);`
`acMoveColumnOrRowExecute` sets CurrentTool to MovingGridBoundaryTool.

	`procedure acMoveToExecute(Sender: TObject);`
`acMoveToExecute` allows the user to move to a location, object, cell or element by showing TfrmGoTo.

	`procedure acRestoreDefaultViewExecute(Sender: TObject);`
`acRestoreDefaultViewExecute` restores the 3D view to its default orientation and magnification.

	`procedure acSetSpacingExecute(Sender: TObject);`
`acSetSpacingExecute` sets CurrentTool to SpacingGridTool.

	`procedure acShowFrontGridExecute(Sender: TObject);`
`acShowFrontGridExecute` allows the user to show or hide the front grid in the 3D view.

	`procedure acShowGridShellExecute(Sender: TObject);`
`acShowGridShellExecute` allows the user to show or hide the grid shell in the 3D view.

	`procedure acShowSideGridExecute(Sender: TObject);`
`acShowSideGridExecute` allows the user to show or hide the side grid in the 3D view.

	`procedure acShowTopGridExecute(Sender: TObject);`
`acShowTopGridExecute` allows the user to show or hide the top grid in the 3D view.

	`procedure acSmoothGridExecute(Sender: TObject);`
`acSmoothGridExecute` allows the user to adjust row, column, or layer widths by showing TfrmSmoothGrid.

	`procedure acSubdivideExecute(Sender: TObject);`
`acSubdivideExecute` sets CurrentTool to SubdivideGridTool.

	`procedure dcAddColCursorDrawCursor(Sender: TObject; const ABitMap, AMask: TBitmap);`
`dcAddColCursorDrawCursor` is used to draw a rotated version of the AddColumn cursor in the top view of the model.

	`procedure dcAddRowCursorDrawCursor(Sender: TObject; const ABitMap, AMask: TBitmap);`
`dcAddRowCursorDrawCursor` is used to draw a rotated version of the AddRow cursor in the top view of the model.

	`procedure dcMoveColCursorDrawCursor(Sender: TObject; const ABitMap, AMask: TBitmap);`
`dcMoveColCursorDrawCursor` is used to draw a rotated version of the MoveColumn cursor in the top view of the model.

	`procedure dcMoveRowCursorDrawCursor(Sender: TObject; const ABitMap, AMask: TBitmap);`
`dcMoveRowCursorDrawCursor` is used to draw a rotated version of the MoveRow cursor in the top view of the model.

	`procedure dcSetSpacingDrawCursor(Sender: TObject; const ABitMap, AMask: TBitmap);`
`dcSetSpacingDrawCursor` is used to draw a rotated version of the SetCellSpacing cursor in the top view of the model.

	`procedure dcSubdivideDrawCursor(Sender: TObject; const ABitMap, AMask: TBitmap);`
`dcSubdivideDrawCursor` is used to draw a rotated version of the Subdivide cursor in the top view of the model.

	`procedure FormClose(Sender: TObject; var Action: TCloseAction);`
`FormClose` checks that the model has closed and allows the user an chance to save it if it hasn't been saved.

	`procedure FormCreate(Sender: TObject); override;`
`FormCreate` does the following 1. It creates the observer list which is used to notify objects when they are out of date. 2. It creates an initial model. 3. It adds PHAST specific functions to each TRbwParser. 4. It sets up the initial view of the model. 5. It update the cursors. 6. It sets some properties of the Application object.

	`procedure FormDestroy(Sender: TObject); override;`
`FormDestroy` cleans up by destroying the model and other objects.

	`procedure FormResize(Sender: TObject);`
When the form is resized, synchronize the rulers with the views of the model.

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

FormKeyUp responds to the Escape, Return, Delete, PageUp, PageDown and arrow keys.

Escape: delete the last point in a TScreenObject that is being created.
Return: finish any TScreenObjects.
Delete: delete the selected TScreenObject or the selected vertices in the selected TScreenObject.
Left arrow: increase the selected column.
Right arrow: decrease the selected column.
Up arrow: increase the selected row.
Down arrow: decrease the selected row.
Page Up: increase the selected layer.
Page Down: decrease the selected layer.

FormKeyUp also implements the shortcuts of the TMenuItems. It should not need to do that; CLX should do it but does not.

	`procedure mi3D_ColorsClick(Sender: TObject);`
`mi3D_ColorsClick` shows frmColors to allow the user to specify the color of the light in the 3D view.

	`procedure miAboutClick(Sender: TObject);`
`miAboutClick` shows the About form for GoPhast. See link(frmAbout) and TfrmAbout.

	`procedure miChemistryOptionsClick(Sender: TObject);`
`miChemistryOptionsClick` allows the user to set the options related to chemistry in PHAST via TfrmChemistryOptions.

	`procedure miEditBitmapsClick(Sender: TObject);`
`miEditBitmapsClick` allows the user to edit the position of bitmaps in GoPhast via TfrmImportBitmap.

procedure miEditSelectedObjectsClick(Sender: TObject);

miEditSelectedObjectsClick edits TScreenObjects by calling EditScreenObjects.

Parameters

Sender: is the TToolButton that has been depressed.

	`procedure tbPolygonClick(Sender: TObject);`
`tbPolygonClick` allows the user to create a polygon TScreenObject. `tbPolygonClick` sets CurrentTool to CreateLineScreenObjectTool.

	`procedure tbRectangleClick(Sender: TObject);`
`tbRectangleClick` allows the user to create a rectangle TScreenObject. `tbRectangleClick` sets CurrentTool to CreateRectangleScreenObjectTool.

	`procedure tbSelectClick(Sender: TObject);`
`tbSelectClick` allows the user to select a TScreenObject by clicking on it. `tbSelectClick` sets CurrentTool to SelectScreenObjectTool.

	`procedure tbSelectPointClick(Sender: TObject);`
`tbSelectPointClick` allows the user to select a node in a TScreenObject by clicking on it. `tbSelectPointClick` sets CurrentTool to SelectPointTool.

	`procedure tbShellClick(Sender: TObject);`
`tbShellClick` shows or hides the grid shell in the 3D view of the model.

	`procedure tbStraightLineClick(Sender: TObject);`
`tbStraightLineClick` allows the user to create a straight-line TScreenObject. `tbStraightLineClick` sets CurrentTool to CreateStraightLineScreenObjectTool.

	`procedure tbZoomClick(Sender: TObject);`
`tbZoomClick` allows the user to zoom in on a particular region by selecting it with the mouse. `tbZoomClick` sets CurrentTool to ZoomTool.

	`procedure tbZoomOutClick(Sender: TObject);`
`tbZoomOutClick` allows the user to zoom out from a particular region. `tbZoomOutClick` sets CurrentTool to ZoomOutTool.

	`procedure ToolButtonMouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);`
When handling the OnMouseUp event, `ToolButtonMouseUp` checks that the user released the mouse while it was over the TToolButton. If so, ToolButton.Down is set to false and CurrentTool is set to `Nil`.

	`procedure SetGridLineDrawingChoice(Sender: TObject);`

	`function ModelUpToDate(const FileName: string; CorrectDate: TDateTime): boolean;`

	`function ModflowUpToDate: boolean;`

	`function Mf2005UpToDate: boolean;`

	`function MfNwtUpToDate: boolean;`

	`function MfLgrUpToDate: boolean;`

	`function ModpathUpToDate(Model: TCustomModel): boolean;`

	`function ZoneBudgetUpToDate: boolean;`

	`function ModelMateUpToDate: boolean;`

	`procedure Invalidate3DView(Sender: TObject);`
`Invalidate3DView` is the event handler for On3DViewChanged. It Invalidates glWidModelView.

procedure GetZoomBox(Sender: TObject; VD: TViewDirection; var ZoomBox: TQrbwZoomBox2);

GetZoomBox is the event handler for OnGetZoomBox.

Parameters

VD: VD indicates which TQRbwZoomBox2 is desired.
ZoomBox: ZoomBox is the TQRbwZoomBox2 in the TframeView indicated by VD.

procedure GetCurrentScreenObject (Sender: TObject; VD: TViewDirection; var ScreenObject: TScreenObject);

GetCurrentScreenObject is the event handler for OnGetCurrentScreenObject.

Parameters

VD: VD indicates which TframeView to check for the CurrentScreenObject.
ScreenObject: ScreenObject is the CurrentScreenObject in the TframeView indicated by VD.

procedure ConvertPoint(Sender: TObject; VD: TViewDirection; const RealPoint: TPoint2D; var ScreenCoordinate: TPoint);

ConvertPoint is the event handler for OnConvertPoint.

Parameters

VD: VD indicates which TframeView that will be used for the conversion.
RealPoint: RealPoint is the TPoint2D to be converted.
ScreenCoordinate: ScreenCoordinate is the TPoint corresponding to RealPoint.

	`procedure ScreenObjectSelectionChange(Sender: TObject);`
`ScreenObjectSelectionChange` is the event handler for OnScreenObjectSelected and OnScreenObjectUnSelected. It enables or disables miEditSelectedObjects, acAddPolygonsToObject, acAddLinesToObject, and acAddPointsToObject.

	`procedure CheckScreenObject(Sender: TObject; ScreenObject: TScreenObject; var IsACurrentScreenObject: boolean);`
`CheckScreenObject` is the event handler for OnCheckScreenObject. `CheckScreenObject` sets IsACurrentScreenObject to true if ScreenObject is the CurrentScreenObject on any TframeView.

	`procedure AddMostRecentlyUsedFile(const FileName: string);`
`AddMostRecentlyUsedFile` adds FileName to MostRecentlyUsed.

	`procedure AdjustToolbarPositions(FirstToolBar, SecondToolBar: TToolBar);`
`AdjustToolbarPositions` adjusts SecondToolBar.Left so that is just to the right of FirstToolBar. It is assumed that FirstToolBar and SecondToolBar are on the same row.

	`procedure BringFormsToFront(Sender: TObject);`
If frmProgressMM, frmSelectedObjects, or frmColors are visible, `BringFormsToFront` brings them to the front. `BringFormsToFront` is the Application.OnActivate event handler.

	`function CheckModel: boolean;`
`CheckModel` checks that the model has closed and allows the user an chance to save it if it hasn't been saved.

	`procedure ClearSelectedNodes;`
If any individual vertices in a TScreenObject are selected `ClearSelectedNodes` deselects them. `ClearSelectedNodes` is used in tbSelectClick.

	`procedure DrawAddColRowCursor(const AnImage: TBitmap; Angle: real; const CursorComponent: TRbwDynamicCursor);`
`DrawAddColRowCursor` is used to draw the bitmaps for the add-column or add-row cursor for the top view. It is also used to help draw the subdivide cursor. The cursor is drawn with lines that are parallel to the grid.

	`procedure DrawMoveColRowCursor(const AnImage: TBitmap; Angle: real; const CursorComponent: TRbwDynamicCursor);`
`DrawMoveColRowCursor` is used to draw the bitmaps for the move-column or move-row cursor for the top view. The cursor is drawn with lines that are parallel to the grid.

	`procedure DrawSubdivideCursor(const AnImage: TBitmap; Angle: real; const CursorComponent: TRbwDynamicCursor);`
`DrawSubdivideCursor` is used to help draw the bitmaps for the subdivide cursor for the top view. The cursor is drawn with lines that are parallel to the grid.

	`procedure ExportFile(const FileName: string; RunModel: boolean);`
`ExportFile` writes the transport input file for PHAST. The work is delegated to WritePhastInput.

	`procedure FillButtonList(AList: TList);`
`FillButtonList` fills AList with the buttons that can't all be down at the same time.

	`function GetPhastGrid: TPhastGrid;`
See PhastGrid.

	`function IsOverStatusPanelDivider(const X: integer): boolean;`
`IsOverStatusPanelDivider` returns true if X indicates that the mouse is over one of the dividers between panels on sbMain. `IsOverStatusPanelDivider` is called from sbMainMouseMove.

	`procedure SaveAFile(FileName: string);`
`SaveAFile` saves the file named FileName.

	`procedure SelectDefaultButton;`
If none of the buttons for creating TScreenObjects, editing the grid or other similar activities is Down. `SelectDefaultButton` sets tbSelect down.

procedure SetActionChecked(Sender: TObject);

SetActionChecked toggles the checked state of an action or the action associated with a control.

Parameters

Sender: must be the action or control whose state is to be toggled for SetActionChecked to do anything. If it isn't, SetActionChecked does nothing.

procedure SetButtonsUp(const CurrentButton: TObject);

SetButtonsUp sets the Down property of all buttons related to CurrentButton to false.

Parameters

CurrentButton: is the button that should remain down.

	`procedure SetCurrentTool(const Value: TCustomInteractiveTool);`
See CurrentTool.

	`procedure SetCursorGrid(const Value: TCursorGrid);`
See CursorGrid.

	`procedure SetFileFormat(const Value: TFileFormat);`
See FileFormat.

	`procedure SetFrontScreenObjectsChanged(const Value: boolean);`
See FrontScreenObjectsChanged.

	`procedure SetSideScreenObjectsChanged(const Value: boolean);`
See SideScreenObjectsChanged.

	`procedure SetTopScreenObjectsChanged(const Value: boolean);`
See TopScreenObjectsChanged.

	`procedure SetZB_Cursors(const ACursor: TCursor);`
`SetZB_Cursors` sets TframeView..ZoomBox.Cursor and TframeView.ZoomBox.ImageBox32.Cursor to ACursor in frameTopView, frameFrontView, and frameSideView.

	`procedure ShowHint(Sender: TObject);`
`ShowHint` is the event-handler for Application.OnHint. `ShowHint` shows a long version of the hint on the status bar (sbMain).

	`function GetModflowGrid: TModflowGrid;`

	`function GetGrid: TCustomModelGrid;`

	`procedure InvalidateViewOfModel;`

	`function GetModelSelection: TModelSelection;`

	`procedure SetModelSelection(const Value: TModelSelection);`

	`procedure NewPosition(Sender: TObject; NewPosition: TPositionStorage);`

	`procedure CheckInternet;`

	`procedure SaveModelMateProject;`

	`procedure SetChangingSelection(const Value: boolean);`

	`procedure OnOpenFile(Sender: TObject);`

	`procedure SetCanDraw(const Value: boolean);`

	`function GetObservationFileName(SD: TSaveDialog): string;`

	`function GetPredictionFileName(SD: TSaveDialog): string;`

	`function GetCanDraw: boolean;`

	`procedure InitializeModflowLgrInputDialog;`

	`procedure DeleteLastPointInRuler;`

	`function TestMt3dmsLocationOK(Model: TCustomModel): Boolean;`

	`function Mt3dmsUpToDate: boolean;`

	`procedure ScreenOnActiveFormChange(Sender: TObject);`

	`procedure ExportMt3dFromCommandLine(FileName: string);`

	`function GetSutraMesh: TSutraMesh3D;`

	`procedure OnAppIdle(Sender: TObject; var Done: Boolean);`
`OnAppIdle` assigns the event handlers to the undo/redo buttons and undo/redo menu items.

	`procedure UpdateFrontCubeForSutraCrossSection(Sender: TObject);`

	`procedure UpdateVerticalExaggeration(VerticalExaggeration: Double);`

	`procedure EnableMeshRenumbering;`

	`procedure InvalidateImage32AllViews;`

	`procedure EnableHufMenuItems;`

	`procedure EnableMt3dmsMenuItems;`

	`procedure EnableManageFlowObservations;`

	`procedure EnableManageHeadObservations;`

procedure ReadIniFile;

ReadIniFile reads an ini file containing the most recently used files and also other settings that will be set by the user for all models rather than being saved in the model.

Parameters

FileName: is the name of the file that is to be read.

	`function ResetSelectedScreenObjects: boolean;`
`ResetSelectedScreenObjects` sets the Selected property of all TScreenObjects to false. `ResetSelectedScreenObjects` returns true if any of them were selected.

	`procedure ResizeZoomBoxes(Sender: TObject);`
`ResizeZoomBoxes` causes the ZoomBoxes to be resized. `ResizeZoomBoxes` is set to be the OnTimer event handler of timTimer in TframeView.ZoomBoxResize.

	`procedure ScreenObjectsChanged(Sender: TObject);`
`ScreenObjectsChanged` is the event handler of OnScreenObjectsChanged. `ScreenObjectsChanged` is used to update all views of the model.

	`procedure UpdateDataSetDimensions;`
`UpdateDataSetDimensions` tells all the TDataArrays what the new grid dimensions are.

	`procedure UpdateModelSelection;`

	`procedure ModelSelectionChange(Sender: TObject);`

	`procedure EnableInvertSelection;`

	`procedure InvalidateGrid;`

	`procedure EnableVisualization;`

	`procedure UpdateModelCubeBreaks;`

Properties

	`property CreateArchive: Boolean read FCreateArchive write SetCreateArchive;`

	`property FileFormat: TFileFormat read FFileFormat write SetFileFormat;`
`FileFormat` is used to specify the format of the files that can be opened or saved by GoPhast.

	`property ChangingSelection: boolean read FChangingSelection write SetChangingSelection;`

	`property CanDraw: boolean read GetCanDraw write SetCanDraw;`
Setting `CanDraw` to False causes TframeView.Paint and glWidModelViewRender to exit immediately without doing anything.

	`property CanEdit: boolean read FCanEdit write FCanEdit;`
`CanEdit` is used to prevent editing of two or more sets of TScreenObjects at one time.

	`property ClickedRuler: TObject read FClickedRuler write FClickedRuler;`
`ClickedRuler` is set to the TRbwRuler in TframeView.rulerDblClick It determines which tab of TfrmRulerOptions will be visible when it is first displayed.

	`property CurrentTool: TCustomInteractiveTool read FCurrentTool write SetCurrentTool;`
`CurrentTool` is the TCustomInteractiveTool that is currently being used to handle the user interaction with TframeView.ZoomBox.

	`property CursorGrid: TCursorGrid read FCursorGrid write SetCursorGrid;`
`CursorGrid` is used to indicate which view of the model, if any, the mouse is over.

	`property CursorX: integer read FCursorX write FCursorX;`
`CursorX` is used to store the X-coordinate of the current mouse position in the current TframeView.ZoomBox.

	`property CursorY: integer read FCursorY write FCursorY;`
`CursorY` is used to store the Y-coordinate of the current mouse position in the current TframeView.ZoomBox.

	`property FrontDiscretizationChanged: boolean read FFrontDiscretizationChanged write FFrontDiscretizationChanged;`
`FrontDiscretizationChanged` is used to indicate that a change has been made to the grid in the front view of the model so that the view of the model needs to be redrawn.

	`property FrontScreenObjectsChanged: boolean read FFrontScreenObjectsChanged write SetFrontScreenObjectsChanged;`
Setting `FrontScreenObjectsChanged` to true causes the front view of the model to be redrawn.

	`property Grid: TCustomModelGrid read GetGrid;`
`Grid` is the ini file for GoPhast. It stores a list of the most recently opened files.

	`property SutraMesh: TSutraMesh3D read GetSutraMesh;`

	`property IniFile: TMemInifile read FIniFile;`
`IniFile` is the name of a file containing the initialization data for the program. It contains the names of the most recently opened files.

	`property ModflowGrid: TModflowGrid read GetModflowGrid;`

	`property PhastModel: TPhastModel read FPhastModel write FPhastModel;`
`PhastModel` is the TPhastModel that is being edited in GoPhast.

	`property OldHeight: integer read FOldHeight;`
`OldHeight` represents the height of the main form in GoPhast when it is not minimized. It is used in TPhastModel.Height.

	`property OldWidth: integer read FOldWidth;`
`OldWidth` represents the width of the main form in GoPhast when it is not minimized. It is used in TPhastModel.Width.

	`property PhastGrid: TPhastGrid read GetPhastGrid;`
`PhastGrid` is the PhastGrid of PhastModel.

	`property SideDiscretizationChanged: boolean read FSideDiscretizationChanged write FSideDiscretizationChanged;`
`SideDiscretizationChanged` is used to indicate that a change has been made to the grid in the side view of the model so that the view of the model needs to be redrawn.

	`property SideScreenObjectsChanged: boolean read FSideScreenObjectsChanged write SetSideScreenObjectsChanged;`
Setting `SideScreenObjectsChanged` to true causes the side view of the model to be redrawn.

	`property TopDiscretizationChanged: boolean read FTopDiscretizationChanged write FTopDiscretizationChanged;`
`TopDiscretizationChanged` is used to indicate that a change has been made to the grid in the top view of the model so that the view of the model needs to be redrawn.

	`property TopScreenObjectsChanged: boolean read FTopScreenObjectsChanged write SetTopScreenObjectsChanged;`
Setting `TopScreenObjectsChanged` to true causes the top view of the model to be redrawn.

property ModelSelection: TModelSelection read GetModelSelection write SetModelSelection;

Class TfrmGoPhast

Unit

Declaration

Description

Hierarchy

Overview

Fields

Methods

Properties

Description

Fields

See also

See also

See also

Methods

See also

Parameters

Parameters

Parameters

Parameters

Parameters

Parameters

See also

See also

Parameters

Properties

See also

	`miExamples: TMenuItem;`
The OnClick event for `miExamples`, miExamplesClick, opens the default web browser with the web page for the instructions for recreating the examples.

	`miExportPhast: TMenuItem;`
See acExportPhastInputFileExecute and acExportPhastInputFile.

	`miFile: TMenuItem;`
`miFile` holds the miNew, miOpen, miSave, miSaveAs, miImport, miExport, miPrint, and miExit menu items.

	`miGenerateGrid: TMenuItem;`
See acGenerateGridExecute and acGenerateGrid.

	`miGrid: TMenuItem;`
`miGrid` holds the miDeleteGridLine, miMoveColumnOrRow, miAddVerticalGridLine, miAddHorizontalGridLine, miSubdivide, miSetSpacing, miDragtoRotate, miGridAngle, miGenerateGrid, miEditGridLines, miSmoothGrid, and miSetSelectedColRowLayer menu items.

	`miGridAngle: TMenuItem;`
See acGridAngleExecute and acGridAngle.

	`miHelp: TMenuItem;`
`miHelp` holds the miContents, miHelpOnMainWindow, miExamples, and miAbout menu items.

	`miHelpOnMainWindow: TMenuItem;`
`miHelpOnMainWindow` provides help on the main window of GoPhast.

	`miImport: TMenuItem;`
`miImport` holds the miImportDistributedDatabyZone, miImportShapefile, miImportDXFFile, and miImportBitmap menu items. `miImport` is under the miFile menu item.

	`miImportDistributedDatabyZone: TMenuItem;`
See miImportDistributedDatabyZoneClick.

	`miInsertNode: TMenuItem;`
See tbInsertPointClick and acInsertNode.

	`miMoveColumnOrRow: TMenuItem;`
See acMoveColumnOrRowExecute and acMoveColumnOrRow.

	`miNew: TMenuItem;`
`miNew` holds miNewModflowModel and miNewPHASTModel.

	`miObject: TMenuItem;`
`miObject` holds the miSelectObjects, miSelectNodes, miSelectWithLasso, N4, miCreatePoint, miCreateLine, miCreatePolygon, miCreateStraightLine, miCreateRectangle, miInsertNode, miDeleteSegment, miRearrangeObjects, N1, miSearchForObject, miShowSelectedObjects, miShowHideObjects, miSelectObjectsByName, and mi3D_Colors menu items.

	`miRearrangeObjects: TMenuItem;`
See miRearrangeObjectsClick.

	`miRestoreDefaultView: TMenuItem;`
See acRestoreDefaultViewExecute and acRestoreDefaultView.

	`miSaveAs: TMenuItem;`
See acFileSaveAsExecute and acFileSaveAs.

	`miSelectAll: TMenuItem;`
`miSelectAll` is the parent menu item for miSelectAllTop, miSelectAllFront, and miSelectAllSide.

	`miSelectNodes: TMenuItem;`
See tbSelectPointClick and acSelectNode.

	`miSelectObjects: TMenuItem;`
See tbSelectClick and acSelectObjects.

	`miSelectObjectsByName: TMenuItem;`
See miSelectObjectsByNameClick.

	`miSelectWithLasso: TMenuItem;`
See tbLassoClick and acSelectWithLasso.

	`miSetSelectedColRowLayer: TMenuItem;`
See miSetSelectedColRowLayerClick.

	`miSetSpacing: TMenuItem;`
See acSetSpacingExecute and acSetSpacing.

	`miShow3DObjects: TMenuItem;`
See tb3DObjectsClick and acShow3DObjects.

	`miShowColoredGrid: TMenuItem;`
See tb3DColorsClick and acColoredGrid.

	`miShowFormulaErrors: TMenuItem;`
See miShowFormulaErrorsClick.

	`miShowFrontGrid: TMenuItem;`
See acShowFrontGridExecute and acShowFrontGrid.

	`miShowGridShell: TMenuItem;`
See acShowGridShellExecute and acShowGridShell.

	`miShowSelectedObjects: TMenuItem;`
See miShowSelectedObjectsClick.