Class TUndoSetScreenObjectProperties

DescriptionHierarchyFieldsMethodsProperties

Unit

Declaration

type TUndoSetScreenObjectProperties = class(TCustomUndo)

Description

TUndoSetScreenObjectProperties is used to set or undo the setting of a TScreenObject.

Hierarchy

Overview

Fields

Private FOldCellSize: array of real;
Private FOldCellSizeUsed: array of boolean;
Private FOldColorLine: TBooleanDynArray;
Private FOldDataSets: TObjectList;
Private FOldElevationCount: array of TElevationCount;
Private FOldElevationFunction: array of string;
Private FOldEvaluatedAt: array of TEvaluatedAt;
Private FOldFillColor: array of TColor;
Private FOldFillScreenObject: TBooleanDynArray;
Private FOldFunctions: TObjectList;
Private FOldHigherElevationFunction: array of string;
Private FOldLineColor: array of TColor;
Private FOldLowerElevationFunction: array of string;
Private FOldName: string;
Private FOldPoints: TRealPointArray;
Private FOldSetPropertiesByInterpolation: TBooleanDynArray;
Private FOldSetPropertiesOfEnclosedCells: TBooleanDynArray;
Private FOldSetPropertiesOfIntersectedCells: TBooleanDynArray;
Protected FListOfScreenObjects: TList;
Public FNameChanged: boolean;
Public FNewCellSize: real;
Public FNewCellSizeUsed: boolean;
Public FNewColorLine: boolean;
Public FNewDataSets: TObjectList;
Public FNewElevationCount: TElevationCount;
Public FNewElevationFunction: string;
Public FNewEvaluatedAt: TEvaluatedAt;
Public FNewFillColor: TColor;
Public FNewFillScreenObject: boolean;
Public FNewFunctions: TObjectList;
Public FNewHigherElevationFunction: string;
Public FNewLineColor: TColor;
Public FNewLowerElevationFunction: string;
Public FNewName: string;
Public FNewPoints: TRealPointArray;
Public FNewSetPropertiesByInterpolation: boolean;
Public FNewSetPropertiesOfEnclosedCells: boolean;
Public FNewSetPropertiesOfIntersectedCells: boolean;
Public FSetCellsColor: boolean;
Public FSetCellSize: boolean;
Public FSetCellSizeUsed: boolean;
Public FSetColorLine: boolean;
Public FSetElevationCount: boolean;
Public FSetElevationFunction: boolean;
Public FSetEvaluatedAt: boolean;
Public FSetFillColor: boolean;
Public FSetFillScreenObject: boolean;
Public FSetHigherElevationFunction: boolean;
Public FSetLineColor: boolean;
Public FSetLowerElevationFunction: boolean;
Public FSetPoints: boolean;
Public FSet_SetPropertiesByInterpolation: boolean;
Public FSet_SetPropertiesOfEnclosedCells: boolean;
Public FSet_SetPropertiesOfIntersectedCells: boolean;

Methods

Protected function Description: string; override;
Protected procedure ResetScreenObjectDataSetSubscriptions; virtual;
Public procedure DoCommand; override;
Public procedure Undo; override;
Public constructor Create(const AListOfScreenObjects: TList);
Public destructor Destroy; override;

Description

Fields

Private FOldCellSize: array of real;

FOldCellSize: array of real; For each TScreenObjects, FOldCellSize contains a the CellSize value for that TScreenObject.

Private FOldCellSizeUsed: array of boolean;

FOldCellSizeUsed: array of boolean; For each TScreenObjects, FOldCellSizeUsed contains a the CellSizeUsed value for that TScreenObject.

Private FOldColorLine: TBooleanDynArray;

FOldColorLine: TBooleanDynArray; For each TScreenObjects, FOldColorLine contains a the ColorLine value for that TScreenObject.

Private FOldDataSets: TObjectList;

FOldDataSets: TObjectList; For all the TScreenObjects, FOldDataSets contains a list of the data sets affected by the TScreenObjects.

Private FOldElevationCount: array of TElevationCount;

FOldElevationCount: array of TElevationCount; For each TScreenObjects, FOldElevationCount contains a the ElevationCount value for that TScreenObject.

Private FOldElevationFunction: array of string;

FOldElevationFunction: array of string; For each TScreenObjects, FOldElevationFunction contains a the ElevationFunction value for that TScreenObject.

Private FOldEvaluatedAt: array of TEvaluatedAt;

FOldEvaluatedAt: array of TEvaluatedAt; For each TScreenObjects, FOldEvaluatedAt contains a the EvaluatedAt value for that TScreenObject.

Private FOldFillColor: array of TColor;

FOldFillColor: array of TColor; For each TScreenObjects, FOldFillColor contains a the FillColor value for that TScreenObject.

Private FOldFillScreenObject: TBooleanDynArray;

FOldFillScreenObject: TBooleanDynArray; For each TScreenObjects, FOldFillScreenObject contains a the FillScreenObject value for that TScreenObject.

Private FOldFunctions: TObjectList;

FOldFunctions: TObjectList; For each TScreenObjects, FOldFunctions contains a TStringList containing the formulas for the data sets affected by the TScreenObject. See DataSetFormulas.

Private FOldHigherElevationFunction: array of string;

FOldHigherElevationFunction: array of string; For each TScreenObjects, FOldHigherElevationFunction contains a the HigherElevationFunction value for that TScreenObject.

Private FOldLineColor: array of TColor;

FOldLineColor: array of TColor; For each TScreenObjects, FOldLineColor contains a the LineColor value for that TScreenObject.

Private FOldLowerElevationFunction: array of string;

FOldLowerElevationFunction: array of string; For each TScreenObjects, FOldLowerElevationFunction contains a the LowerElevationFunction value for that TScreenObject.

Private FOldName: string;

FOldName: string; If the number of TScreenObjects affected by this TUndoSetScreenObjectProperties equals 1, FOldName contains the Name of that TScreenObject. If the number of TScreenObjects affected by this TUndoSetScreenObjectProperties is not equal 1, FOldName is not used.

Private FOldPoints: TRealPointArray;

FOldPoints: TRealPointArray; If the number of TScreenObjects affected by this TUndoSetScreenObjectProperties equals 1, FOldPoints contains the Points of that TScreenObject. If the number of TScreenObjects affected by this TUndoSetScreenObjectProperties is not equal 1, FOldPoints is not used.

Private FOldSetPropertiesByInterpolation: TBooleanDynArray;

FOldSetPropertiesByInterpolation: TBooleanDynArray; For each TScreenObjects, FOldSetPropertiesByInterpolation contains a the SetPropertiesByInterpolation value for that TScreenObject.

Private FOldSetPropertiesOfEnclosedCells: TBooleanDynArray;

FOldSetPropertiesOfEnclosedCells: TBooleanDynArray; For each TScreenObjects, FOldSetPropertiesOfEnclosedCells contains a the SetPropertiesOfEnclosedCells value for that TScreenObject.

Private FOldSetPropertiesOfIntersectedCells: TBooleanDynArray;

FOldSetPropertiesOfIntersectedCells: TBooleanDynArray; For each TScreenObjects, FOldSetPropertiesOfIntersectedCells contains a the SetPropertiesOfIntersectedCells value for that TScreenObject.

Protected FListOfScreenObjects: TList;

FListOfScreenObjects: TList; FListOfScreenObjects contains all the TScreenObject's whose properties are being changed.

Public FNameChanged: boolean;

FNameChanged: boolean; FNameChanged determines whether or not the TUndoSetScreenObjectProperties will change Name.

Public FNewCellSize: real;

FNewCellSize: real; FNewCellSize is the new CellSize of the TScreenObject.

Public FNewCellSizeUsed: boolean;

FNewCellSizeUsed: boolean; FNewCellSizeUsed is the new CellSizeUsed of the TScreenObject.

Public FNewColorLine: boolean;

FNewColorLine: boolean; FNewColorLine determines whether the TScreenObject's line will be colored. See ColorLine.

Public FNewDataSets: TObjectList;

FNewDataSets: TObjectList; FNewDataSets contains a list of data sets for each TScreenObject. See DataSets.

Public FNewElevationCount: TElevationCount;

FNewElevationCount: TElevationCount; FNewElevationCount sets the ElevationCount of the TScreenObjects.

Public FNewElevationFunction: string;

FNewElevationFunction: string; FNewElevationFunction sets the ElevationFunction of the TScreenObjects.

Public FNewEvaluatedAt: TEvaluatedAt;

FNewEvaluatedAt: TEvaluatedAt; FNewEvaluatedAt is the new EvaluatedAt of the TScreenObject.

Public FNewFillColor: TColor;

FNewFillColor: TColor; FNewFillColor is the color with which the TScreenObject's interior will be drawn. See FillColor.

Public FNewFillScreenObject: boolean;

FNewFillScreenObject: boolean; FNewFillScreenObject determines whether the TScreenObject's interior will be colored. See FillScreenObject.

Public FNewFunctions: TObjectList;

FNewFunctions: TObjectList; FNewFunctions contains a TStringList for each TScreenObject with the formulas for its data sets. See DataSetFormulas.

Public FNewHigherElevationFunction: string;

FNewHigherElevationFunction: string; FNewHigherElevationFunction sets the HigherElevationFunction of the TScreenObjects.

Public FNewLineColor: TColor;

FNewLineColor: TColor; FNewLineColor is the color with which the TScreenObject's line will be drawn. See LineColor.

Public FNewLowerElevationFunction: string;

FNewLowerElevationFunction: string; FNewLowerElevationFunction sets the LowerElevationFunction of the TScreenObjects.

Public FNewName: string;

FNewName: string; FNewName is the new Name of the TScreenObject.

Public FNewPoints: TRealPointArray;

FNewPoints: TRealPointArray; FNewPoints is the new locations of all the points in the TScreenObject. NewPoints is only used if the TUndoSetScreenObjectProperties affects only a single TScreenObject. See Points.

Public FNewSetPropertiesByInterpolation: boolean;

FNewSetPropertiesByInterpolation: boolean; FNewSetPropertiesByInterpolation determines whether the TScreenObject's will affect the values of cells via interpolation. See SetPropertiesByInterpolation.

Public FNewSetPropertiesOfEnclosedCells: boolean;

FNewSetPropertiesOfEnclosedCells: boolean; FNewSetPropertiesOfEnclosedCells determines whether the TScreenObject's will affect the values of enclosed cells. See SetPropertiesOfEnclosedCells.

Public FNewSetPropertiesOfIntersectedCells: boolean;

FNewSetPropertiesOfIntersectedCells: boolean; FNewSetPropertiesOfIntersectedCells determines whether the TScreenObject's will affect the values of intersected cells. See SetPropertiesOfIntersectedCells.

Public FSetCellsColor: boolean;

FSetCellsColor: boolean; FSetCellsColor determines whether or not the TUndoSetScreenObjectProperties will need to notify the grid that the colors of the cells needs to be updated.

Public FSetCellSize: boolean;

FSetCellSize: boolean; FSetCellSize determines whether or not the TUndoSetScreenObjectProperties will change CellSize.

Public FSetCellSizeUsed: boolean;

FSetCellSizeUsed: boolean; FSetCellSizeUsed determines whether or not the TUndoSetScreenObjectProperties will change CellSizeUsed.

Public FSetColorLine: boolean;

FSetColorLine: boolean; FSetColorLine determines whether or not the TUndoSetScreenObjectProperties will change ColorLine.

Public FSetElevationCount: boolean;

FSetElevationCount: boolean; FSetElevationCount determines whether or not the TUndoSetScreenObjectProperties will change ElevationCount.

Public FSetElevationFunction: boolean;

FSetElevationFunction: boolean; FSetElevationFunction determines whether or not the TUndoSetScreenObjectProperties will change ElevationFunction.

Public FSetEvaluatedAt: boolean;

FSetEvaluatedAt: boolean; FSetEvaluatedAt determines whether or not the TUndoSetScreenObjectProperties will change EvaluatedAt.

Public FSetFillColor: boolean;

FSetFillColor: boolean; FSetFillColor determines whether or not the TUndoSetScreenObjectProperties will change FillColor.

Public FSetFillScreenObject: boolean;

FSetFillScreenObject: boolean; FSetFillScreenObject determines whether or not the TUndoSetScreenObjectProperties will change FillScreenObject.

Public FSetHigherElevationFunction: boolean;

FSetHigherElevationFunction: boolean; FSetHigherElevationFunction determines whether or not the TUndoSetScreenObjectProperties will change HigherElevationFunction.

Public FSetLineColor: boolean;

FSetLineColor: boolean; FSetLineColor determines whether or not the TUndoSetScreenObjectProperties will change LineColor.

Public FSetLowerElevationFunction: boolean;

FSetLowerElevationFunction: boolean; FSetLowerElevationFunction determines whether or not the TUndoSetScreenObjectProperties will change LowerElevationFunction.

Public FSetPoints: boolean;

FSetPoints: boolean; FSetPoints determines whether or not the TUndoSetScreenObjectProperties will change Points.

Public FSet_SetPropertiesByInterpolation: boolean;

FSet_SetPropertiesByInterpolation: boolean; FSet_SetPropertiesByInterpolation determines whether or not the TUndoSetScreenObjectProperties will change SetPropertiesByInterpolation.

Public FSet_SetPropertiesOfEnclosedCells: boolean;

FSet_SetPropertiesOfEnclosedCells: boolean; FSet_SetPropertiesOfEnclosedCells determines whether or not the TUndoSetScreenObjectProperties will change SetPropertiesOfEnclosedCells.

Public FSet_SetPropertiesOfIntersectedCells: boolean;

FSet_SetPropertiesOfIntersectedCells: boolean; FSet_SetPropertiesOfIntersectedCells determines whether or not the TUndoSetScreenObjectProperties will change SetPropertiesOfEnclosedCells.

Methods

Protected function Description: string; override;

Description describes what this TCustomUndo does for display in a menu or hing.

Protected procedure ResetScreenObjectDataSetSubscriptions; virtual;

ResetScreenObjectDataSetSubscriptions is called to make sure each TScreenObject's subscriptions are set appropriately.

Public procedure DoCommand; override;

DoCommand assigns the new values to the TScreenObjects.

Public procedure Undo; override;

Undo restores the old values to the TScreenObjects.

Public constructor Create(const AListOfScreenObjects: TList);

Create stores the TScreenObjects in AListOfScreenObjects and reads and stores their properties.

Public destructor Destroy; override;

Destroy destroys the TUndoSetScreenObjectProperties and releases its memory.


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