Class TBatchFileAdditionsUndo

Unit

frmBatchFileAdditionsUnit

Declaration

type TBatchFileAdditionsUndo = class(TCustomUndo)

Description

Public declarations

Hierarchy

• TObject
• TUndoItem
• TCustomUndo
• TBatchFileAdditionsUndo

Overview

Fields

	FOldBeforeAdditions: TStrings;
	FOldAfterAdditions: TStrings;
	FNewBeforeAdditions: TStrings;
	FNewAfterAdditions: TStrings;
	FModel: TCustomModel;

Methods

	function Description: string; override;
	Constructor Create(Model: TCustomModel; NewBeforeAdditions, NewAfterAdditions: TStrings);
	Destructor Destroy; override;
	procedure DoCommand; override;
	procedure Undo; override;

Description

Fields

	FOldBeforeAdditions: TStrings;

	FOldAfterAdditions: TStrings;

	FNewBeforeAdditions: TStrings;

	FNewAfterAdditions: TStrings;

	FModel: TCustomModel;

Methods

	function Description: string; override;

	Constructor Create(Model: TCustomModel; NewBeforeAdditions, NewAfterAdditions: TStrings);

	Destructor Destroy; override;

	procedure DoCommand; override;

	procedure Undo; override;