Class TUndoVerticalExaggeration

Properties

Unit

Declaration

type TUndoVerticalExaggeration = class(TCustomUndo)

Description

TUndoVerticalExaggeration is used to change the vertical exaggeration

Hierarchy

TObject
TUndoItem
TCustomUndo
TUndoVerticalExaggeration

Overview

Fields

	`FOldVerticalExaggeration: real;`
	`FNewVerticalExaggeration: real;`

Methods

	`procedure SetVE(VerticalExaggeration: real);`
	`function Description: string; override;`
	`constructor Create(const ANewVerticalExaggeration: real);`
	`procedure DoCommand; override;`
	`class function GetOldVE: real;`
	`procedure Undo; override;`

Description

Fields

	`FOldVerticalExaggeration: real;`
`FOldVerticalExaggeration`: real; `FOldVerticalExaggeration` is the old vertical exaggeration.

	`FNewVerticalExaggeration: real;`
`FNewVerticalExaggeration`: real; `FNewVerticalExaggeration` is the new vertical exaggeration.

Methods

	`procedure SetVE(VerticalExaggeration: real);`
`SetVE` sets the VerticalExaggeration.

	`function Description: string; override;`
See TCustomUndo.Description.

	`constructor Create(const ANewVerticalExaggeration: real);`
`Create` creates an instance of `TUndoVerticalExaggeration`.

	`procedure DoCommand; override;`
`DoCommand` sets the new vertical exaggeration.

	`class function GetOldVE: real;`
`GetOldVE` gets the existing vertical exaggeration.

	`procedure Undo; override;`
`Undo` restores the old vertical exaggeration.

Generated by PasDoc 0.12.1 on 2013-05-13 15:42:06