Class TUndoTitleAndUnits

DescriptionHierarchyFieldsMethodsProperties

Unit

frmUnitsUnit

Declaration

type TUndoTitleAndUnits = class(TCustomUndo)

Description

TUndoTitleAndUnits is used to set or undo the setting of frmGoPhast.Model.Title and frmGoPhast.Model.Units.

Hierarchy

Overview

Fields

Protected FOldTitle: TStringList;
Protected FOldUnits: TUnits;
Public FNewTitle: TStringList;
Public FNewUnits: TUnits;

Methods

Protected function Description: string; override;
Public constructor Create;
Public destructor Destroy; override;
Public procedure DoCommand; override;
Public procedure Undo; override;

Description

Fields

Protected FOldTitle: TStringList;

FOldTitle: TStringList; FOldTitle is a copy of frmGoPhast.Model.Title as it was when this instance of TUndoTitleAndUnits was created.

Protected FOldUnits: TUnits;

FOldUnits: TUnits; FOldUnits is a copy of frmGoPhast.Model.Units as it was when this instance of TUndoTitleAndUnits was created.

Public FNewTitle: TStringList;

FNewTitle: TStringList; FNewTitle is a new version of frmGoPhast.Model.Title.

Public FNewUnits: TUnits;

FNewUnits: TUnits; FNewUnits is a new version of frmGoPhast.Model.Units.

Methods

Protected function Description: string; override;

Description tells what TUndoTitleAndUnits does.

Public constructor Create;

Create creates a new instance of TUndoTitleAndUnits. Create creates FOldTitle, FOldUnits, FNewTitle, and FNewUnits. Create assigns frmGoPhast.Model.Title to FOldTitle and frmGoPhast.Model.Units to FOldUnits.

Public destructor Destroy; override;

Destroy destroys the current instance of TUndoTitleAndUnits. Do not call Destroy directly. Call Free instead.

Public procedure DoCommand; override;

DoCommand assigns FNewTitle to frmGoPhast.Model.Title and FNewUnits to frmGoPhast.Model.Units.

Public procedure Undo; override;

Undo assigns FOldTitle to frmGoPhast.Model.Title and FOldUnits to frmGoPhast.Model.Units.

Generated by PasDoc 0.12.1 on 2013-05-13 15:41:41