Class TUndoDefineSutraLayers

Unit

frmSutraLayersUnit

Declaration

type TUndoDefineSutraLayers = class(TCustomCreateRequiredDataSetsUndo)

Description

Public declarations

Hierarchy

• TObject
• TUndoItem
• TCustomUndo
• TCustomCreateRequiredDataSetsUndo
• TUndoDefineSutraLayers

Overview

Fields

	FNewLayerStructure: TSutraLayerStructure;
	FOldLayerStructure: TSutraLayerStructure;
	FNewDataSets: TList;

Methods

	function Description: string; override;
	constructor Create(var NewLayerStructure: TSutraLayerStructure);
	Destructor Destroy; override;
	procedure DoCommand; override;
	procedure Undo; override;

Description

Fields

	FNewLayerStructure: TSutraLayerStructure;

	FOldLayerStructure: TSutraLayerStructure;

	FNewDataSets: TList;

Methods

	function Description: string; override;

	constructor Create(var NewLayerStructure: TSutraLayerStructure);

	Destructor Destroy; override;

	procedure DoCommand; override;

	procedure Undo; override;