Class TUndoFreeSurface

DescriptionHierarchyFieldsMethodsProperties

Unit

UndoItems

Declaration

type TUndoFreeSurface = class(TCustomUndo)

Description

TUndoFreeSurface is used to set TPhastModel.FreeSurface and TPhastModel.UseWaterTable.

Hierarchy

Overview

Fields

Private FNewFreeSurface: boolean;
Private FNewInitialWaterTable: boolean;
Private FOldFreeSurface: boolean;
Private FOldInitialWaterTable: boolean;

Methods

Protected function Description: string; override;
Public function Changed: boolean;
Public constructor Create;
Public procedure DoCommand; override;
Public procedure Undo; override;

Properties

Public property NewFreeSurface: boolean read FNewFreeSurface write FNewFreeSurface;
Public property NewInitialWaterTable: boolean read FNewInitialWaterTable write FNewInitialWaterTable;

Description

Fields

Private FNewFreeSurface: boolean;

FNewFreeSurface: boolean; FNewFreeSurface is the TPhastModel.FreeSurface that will be set.

Private FNewInitialWaterTable: boolean;

FNewInitialWaterTable: boolean; FNewInitialWaterTable is the TPhastModel.UseWaterTable that will be set.

Private FOldFreeSurface: boolean;

FOldFreeSurface: boolean; FOldFreeSurface is the existing TPhastModel.FreeSurface

Private FOldInitialWaterTable: boolean;

FOldInitialWaterTable: boolean; FOldInitialWaterTable is the existing TPhastModel.UseWaterTable

Methods

Protected function Description: string; override;

See TCustomUndo.Description.

Public function Changed: boolean;

Changed is used to determine if this TUndoFreeSurface will change anything. if not, there is no reason to use it.

Public constructor Create;

Create creates an instance of TUndoFreeSurface.

Public procedure DoCommand; override;

DoCommand sets TPhastModel.FreeSurface and TPhastModel.UseWaterTable. Set NewFreeSurface and NewInitialWaterTable before DoCommand is called.

Public procedure Undo; override;

Undo restores TPhastModel.FreeSurface and TPhastModel.UseWaterTable.

Properties

Public property NewFreeSurface: boolean read FNewFreeSurface write FNewFreeSurface;

NewFreeSurface is the TPhastModel.FreeSurface to be set in DoCommand.

Public property NewInitialWaterTable: boolean read FNewInitialWaterTable write FNewInitialWaterTable;

NewInitialWaterTable is the TPhastModel.UseWaterTable to be set in DoCommand.

Generated by PasDoc 0.10.0 on 2006-10-31 09:56:47