Description | Hierarchy | Fields | Methods | Properties |
type TUndoHufLayers = class(TCustomCreateRequiredDataSetsUndo)
Public declarations
FNewHydrogeologicUnits: THydrogeologicUnits; |
|
FOldHydrogeologicUnits: THydrogeologicUnits; |
|
FNewDataSets: TList; |
procedure AssignNewHufUnits(AModel: TBaseModel); |
|
procedure AssignOldHufUnits(AModel: TBaseModel); |
|
function Description: string; override; |
|
Constructor Create(var NewHydrogeologicUnits: THydrogeologicUnits); |
|
Destructor Destroy; override; |
|
procedure DoCommand; override; |
|
procedure Undo; override; |
FNewHydrogeologicUnits: THydrogeologicUnits; |
|
FOldHydrogeologicUnits: THydrogeologicUnits; |
|
FNewDataSets: TList; |
|
procedure AssignNewHufUnits(AModel: TBaseModel); |
|
procedure AssignOldHufUnits(AModel: TBaseModel); |
|
function Description: string; override; |
|
Constructor Create(var NewHydrogeologicUnits: THydrogeologicUnits); |
|
Destructor Destroy; override; |
|
procedure DoCommand; override; |
|
procedure Undo; override; |
|