Class TUndoFilesToArchive

Unit

frmFilesToArchiveUnit

Declaration

type TUndoFilesToArchive = class(TCustomUndo)

Description

Public declarations

Hierarchy

• TObject
• TUndoItem
• TCustomUndo
• TUndoFilesToArchive

Overview

Fields

	FFilesToAdd: TStrings;
	FFilesToDelete: TStrings;
	FOriginalFilesToArchive: TStrings;
	FNewFilesToArchive: TStrings;
	FOriginalFileName: string;
	FNewFileName: string;
	FOriginalModelFiles: TStrings;
	FNewModelFiles: TStrings;
	FOriginalAllFiles: TStrings;

Methods

	function Description: string; override;
	constructor Create(UpdatedFiles: TStrings);
	destructor Destroy; override;
	procedure DoCommand; override;
	procedure Undo; override;
	function Changed: boolean;

Description

Fields

	FFilesToAdd: TStrings;

	FFilesToDelete: TStrings;

	FOriginalFilesToArchive: TStrings;

	FNewFilesToArchive: TStrings;

	FOriginalFileName: string;

	FNewFileName: string;

	FOriginalModelFiles: TStrings;

	FNewModelFiles: TStrings;

	FOriginalAllFiles: TStrings;

Methods

	function Description: string; override;

	constructor Create(UpdatedFiles: TStrings);

	destructor Destroy; override;

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

	procedure Undo; override;
Undo undoes the command.

	function Changed: boolean;