Class TUndoGeneralOptions

Unit

frmModflowOptionsUnit

Declaration

type TUndoGeneralOptions = class(TCustomCreateRequiredDataSetsUndo)

Description

Public declarations

Hierarchy

• TObject
• TUndoItem
• TCustomUndo
• TCustomCreateRequiredDataSetsUndo
• TUndoGeneralOptions

Overview

Fields

	FNewOptionsCollection: TModelOptionsCollection;
	FOldOptionsCollection: TModelOptionsCollection;
	FOldMassUnits: string;
	FNewMassUnits: string;

Methods

	procedure SetMassUnit(MassUnit: string);
	function Description: string; override;
	Constructor Create(var NewOptionsCollection: TModelOptionsCollection; const MassUnit: string);
	destructor Destroy; override;
	procedure DoCommand; override;
	procedure Undo; override;

Description

Fields

	FNewOptionsCollection: TModelOptionsCollection;

	FOldOptionsCollection: TModelOptionsCollection;

	FOldMassUnits: string;

	FNewMassUnits: string;

Methods

	procedure SetMassUnit(MassUnit: string);

	function Description: string; override;

	Constructor Create(var NewOptionsCollection: TModelOptionsCollection; const MassUnit: string);

	destructor Destroy; override;

	procedure DoCommand; override;

	procedure Undo; override;