Class TUndoImportModelResults

Unit

frmSelectResultToImportUnit

Declaration

type TUndoImportModelResults = class(TCustomUndo)

Description

TCustomUndo is an abstract base class used as an ancestor of all TUndoItems in ModelMuse.

Hierarchy

• TObject
• TUndoItem
• TCustomUndo
• TUndoImportModelResults

Overview

Fields

	FNewTopDataSet: TDataArray;
	FNewFrontDataSet: TDataArray;
	FNewSideDataSet: TDataArray;
	FNew3DDataSet: TDataArray;
	FNewTopContourDataSet: TDataArray;
	FNewFrontContourDataSet: TDataArray;
	FNewSideContourDataSet: TDataArray;
	FNew3DContourDataSet: TDataArray;
	FNewEdgeDisplay: TCustomModflowGridEdgeDisplay;
	FNewThreeDTimeList: TCustomTimeList;
	FNewTopTimeList: TCustomTimeList;
	FNewFrontTimeList: TCustomTimeList;
	FNewSideTimeList: TCustomTimeList;
	FOldTopDataSet: TDataArray;
	FOldFrontDataSet: TDataArray;
	FOldSideDataSet: TDataArray;
	FOld3DDataSet: TDataArray;
	FOldTopContourDataSet: TDataArray;
	FOldFrontContourDataSet: TDataArray;
	FOldSideContourDataSet: TDataArray;
	FOld3DContourDataSet: TDataArray;
	FOldEdgeDisplay: TCustomModflowGridEdgeDisplay;
	FOldThreeDTimeList: TCustomTimeList;
	FOldTopTimeList: TCustomTimeList;
	FOldFrontTimeList: TCustomTimeList;
	FOldSideTimeList: TCustomTimeList;
	FContainedUndos: TList;
	FNewDataSets: TList;
	FOldComments: TStringList;
	FNewComments: TStringList;
	FModel: TCustomModel;

Methods

	procedure SetComments(Comments: TStringList);
	function Description: string; override;
	Constructor Create(NewDataSets: TList; DataSetNames, OldComments: TStringList; DisplayDataSet: TDataArray; DisplayChoice: TDisplayChoice; AModel: TCustomModel);
	Destructor Destroy; override;
	procedure DoCommand; override;
	procedure Undo; override;

Description

Fields

	FNewTopDataSet: TDataArray;

	FNewFrontDataSet: TDataArray;

	FNewSideDataSet: TDataArray;

	FNew3DDataSet: TDataArray;

	FNewTopContourDataSet: TDataArray;

	FNewFrontContourDataSet: TDataArray;

	FNewSideContourDataSet: TDataArray;

	FNew3DContourDataSet: TDataArray;

	FNewEdgeDisplay: TCustomModflowGridEdgeDisplay;

	FNewThreeDTimeList: TCustomTimeList;

	FNewTopTimeList: TCustomTimeList;

	FNewFrontTimeList: TCustomTimeList;

	FNewSideTimeList: TCustomTimeList;

	FOldTopDataSet: TDataArray;

	FOldFrontDataSet: TDataArray;

	FOldSideDataSet: TDataArray;

	FOld3DDataSet: TDataArray;

	FOldTopContourDataSet: TDataArray;

	FOldFrontContourDataSet: TDataArray;

	FOldSideContourDataSet: TDataArray;

	FOld3DContourDataSet: TDataArray;

	FOldEdgeDisplay: TCustomModflowGridEdgeDisplay;

	FOldThreeDTimeList: TCustomTimeList;

	FOldTopTimeList: TCustomTimeList;

	FOldFrontTimeList: TCustomTimeList;

	FOldSideTimeList: TCustomTimeList;

	FContainedUndos: TList;

	FNewDataSets: TList;

	FOldComments: TStringList;

	FNewComments: TStringList;

	FModel: TCustomModel;

Methods

	procedure SetComments(Comments: TStringList);

	function Description: string; override;

	Constructor Create(NewDataSets: TList; DataSetNames, OldComments: TStringList; DisplayDataSet: TDataArray; DisplayChoice: TDisplayChoice; AModel: TCustomModel);

	Destructor Destroy; override;

	procedure DoCommand; override;
DoCommand does the command for the first time.

	procedure Undo; override;
Undo undoes the command.