Class TfrmProgramLocations

Unit

frmProgramLocationsUnit

Declaration

type TfrmProgramLocations = class(TfrmCustomGoPhast)

Description

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
• TfrmProgramLocations

Overview

Fields

	fedModflow: TJvFilenameEdit;
	pnlBottom: TPanel;
	btnHelp: TBitBtn;
	btnOK: TBitBtn;
	btnCancel: TBitBtn;
	Panel1: TPanel;
	lblModflow: TLabel;
	htlblModflow: TJvHTLabel;
	fedTextEditor: TJvFilenameEdit;
	lblTextEditor: TLabel;
	htlblModPath: TJvHTLabel;
	lblModpath: TLabel;
	fedModpath: TJvFilenameEdit;
	lblModelMonitor: TLabel;
	fedModelMonitor: TJvFilenameEdit;
	htlblZoneBudger: TJvHTLabel;
	fedZonebudget: TJvFilenameEdit;
	lblZoneBudget: TLabel;
	lblModelMate: TLabel;
	fedModelMate: TJvFilenameEdit;
	Label1: TLabel;
	JvHTLabel1: TJvHTLabel;
	fedModflowLgr: TJvFilenameEdit;
	htlblModelMate: TJvHTLabel;
	lblModflowNWT: TLabel;
	htlblModflowNWT: TJvHTLabel;
	fedModflowNWT: TJvFilenameEdit;
	lblMt3dms: TLabel;
	htlblMt3dms: TJvHTLabel;
	fedMt3dms: TJvFilenameEdit;
	FModel: TCustomModel;

Methods

	procedure fedModflowChange(Sender: TObject);
	procedure btnOKClick(Sender: TObject);
	procedure SetData;
	procedure HighlightControls;
	Procedure GetData(Model: TCustomModel);

Description

Fields

	fedModflow: TJvFilenameEdit;

	pnlBottom: TPanel;

	btnHelp: TBitBtn;

	btnOK: TBitBtn;

	btnCancel: TBitBtn;

	Panel1: TPanel;

	lblModflow: TLabel;

	htlblModflow: TJvHTLabel;

	fedTextEditor: TJvFilenameEdit;

	lblTextEditor: TLabel;

	htlblModPath: TJvHTLabel;

	lblModpath: TLabel;

	fedModpath: TJvFilenameEdit;

	lblModelMonitor: TLabel;

	fedModelMonitor: TJvFilenameEdit;

	htlblZoneBudger: TJvHTLabel;

	fedZonebudget: TJvFilenameEdit;

	lblZoneBudget: TLabel;

	lblModelMate: TLabel;

	fedModelMate: TJvFilenameEdit;

	Label1: TLabel;

	JvHTLabel1: TJvHTLabel;

	fedModflowLgr: TJvFilenameEdit;

	htlblModelMate: TJvHTLabel;

	lblModflowNWT: TLabel;

	htlblModflowNWT: TJvHTLabel;

	fedModflowNWT: TJvFilenameEdit;

	lblMt3dms: TLabel;

	htlblMt3dms: TJvHTLabel;

	fedMt3dms: TJvFilenameEdit;

	FModel: TCustomModel;

Methods

	procedure fedModflowChange(Sender: TObject);

	procedure btnOKClick(Sender: TObject);

	procedure SetData;

	procedure HighlightControls;

	Procedure GetData(Model: TCustomModel);
Private declarations