Class TScreenObjectItem

DescriptionHierarchyFieldsMethodsProperties

Unit

Declaration

type TScreenObjectItem = class(TCollectionItem)

Description

TScreenObjectItem is used in reading a TScreenObject from or writing it to a stream.

When saving data to a stream, the data is read from FScreenObject. When reading data from a stream, the data is stored in private fields. It is transferred to a TScreenObject in UpdateScreenObject.

Hierarchy

Overview

Fields

Private FDataSetNames: TStrings;
Private FDataSetFormulas: TStrings;
Private FElevationFormula: string;
Private FHigherElevationFormula: string;
Private FLowerElevationFormula: string;
Private FMixtureFormulas: TStrings;
Private FPoints: TPointCollection;
Private FScreenObject: TScreenObject;
Private FSelectedVertexCollection: TSelectedVertexCollection;

Methods

Private function GetClassType: string;
Private function GetDataSetFormulas: TStrings;
Private function GetDataSetNames: TStrings;
Private function GetElevationFormula: string;
Private function GetHigherElevationFormula: string;
Private function GetLowerElevationFormula: string;
Private function GetMixtureFormulas: TStrings;
Private procedure SetClassType(Value: string);
Protected procedure UpdateScreenObject;
Public constructor Create(Collection: TCollection); override;
Public destructor Destroy; override;
Public procedure SetScreenObject(const Value: TScreenObject);

Properties

Published property ClassTypeName: string read GetClassType write SetClassType;
Published property DataSetNames: TStrings read GetDataSetNames write FDataSetNames;
Published property DataSetFormulas: TStrings read GetDataSetFormulas write FDataSetFormulas;
Published property ElevationFunction: string read GetElevationFormula write FElevationFormula stored False;
Published property ElevationFormula: string read GetElevationFormula write FElevationFormula;
Published property HigherElevationFunction: string read GetHigherElevationFormula write FHigherElevationFormula stored False;
Published property HigherElevationFormula: string read GetHigherElevationFormula write FHigherElevationFormula;
Published property LowerElevationFunction: string read GetLowerElevationFormula write FLowerElevationFormula stored False;
Published property LowerElevationFormula: string read GetLowerElevationFormula write FLowerElevationFormula;
Published property Points: TPointCollection read FPoints write FPoints;
Published property ScreenObject: TScreenObject read FScreenObject;
Published property SelectedVertices: TSelectedVertexCollection read FSelectedVertexCollection write FSelectedVertexCollection;
Published property MixtureFormulas: TStrings read GetMixtureFormulas write FMixtureFormulas;

Description

Fields

Private FDataSetNames: TStrings;

See DataSetNames.

Private FDataSetFormulas: TStrings;

See DataSetFormulas.

Private FElevationFormula: string;

See ElevationFormula.

Private FHigherElevationFormula: string;

See HigherElevationFormula.

Private FLowerElevationFormula: string;

See LowerElevationFormula.

Private FMixtureFormulas: TStrings;

FMixtureFormulas stores the formulas for mixtures in the TScreenObject.

Private FPoints: TPointCollection;

See Points.

Private FScreenObject: TScreenObject;

See ScreenObject.

Private FSelectedVertexCollection: TSelectedVertexCollection;

See SelectedVertices.

Methods

Private function GetClassType: string;

See ClassTypeName.

Private function GetDataSetFormulas: TStrings;

See DataSetFormulas.

Private function GetDataSetNames: TStrings;

See DataSetNames.

Private function GetElevationFormula: string;

See ElevationFormula.

Private function GetHigherElevationFormula: string;

See HigherElevationFormula.

Private function GetLowerElevationFormula: string;

See LowerElevationFormula.

Private function GetMixtureFormulas: TStrings;

GetMixtureFormulas fills FMixtureFormulas with the formulas for mixtures in the TScreenObject and then returns FMixtureFormulas.

Private procedure SetClassType(Value: string);

See ClassTypeName.

Protected procedure UpdateScreenObject;

UpdateScreenObject updates ScreenObject with the values read from the stream and stored in private data fields. After a TScreenObject has been read, UpdateScreenObject is called to update its formulas for mixtures.

Public constructor Create(Collection: TCollection); override;

Create creates an instance of TScreenObjectItem.

Public destructor Destroy; override;

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

Public procedure SetScreenObject(const Value: TScreenObject);

see ScreenObject.

Properties

Published property ClassTypeName: string read GetClassType write SetClassType;

ClassTypeName must be before ScreenObject or Contour. Setting ClassTypeName causes ScreenObject to be created.

Published property DataSetNames: TStrings read GetDataSetNames write FDataSetNames;

DataSetNames is the data sets whose values are set by ScreenObject.

Published property DataSetFormulas: TStrings read GetDataSetFormulas write FDataSetFormulas;

DataSetFormulas has the formulas for the data sets whose values are set by ScreenObject.

Published property ElevationFunction: string read GetElevationFormula write FElevationFormula stored False;

ElevationFunction is the ElevationFormula of ScreenObject.

Published property ElevationFormula: string read GetElevationFormula write FElevationFormula;
 
Published property HigherElevationFunction: string read GetHigherElevationFormula write FHigherElevationFormula stored False;

HigherElevationFunction is the HigherElevationFormula formula of ScreenObject.

Published property HigherElevationFormula: string read GetHigherElevationFormula write FHigherElevationFormula;
 
Published property LowerElevationFunction: string read GetLowerElevationFormula write FLowerElevationFormula stored False;

LowerElevationFunction is the LowerElevationFormula formula of ScreenObject.

Published property LowerElevationFormula: string read GetLowerElevationFormula write FLowerElevationFormula;
 
Published property Points: TPointCollection read FPoints write FPoints;

Points stores the Points of ScreenObject.

Published property ScreenObject: TScreenObject read FScreenObject;

ScreenObject is set to a subcomponent in SetScreenObject. This is required to have the properties of TScreenObject saved to file. It can be set through SetScreenObject.

Published property SelectedVertices: TSelectedVertexCollection read FSelectedVertexCollection write FSelectedVertexCollection;

SelectedVertices stores the SelectedVertices of ScreenObject.

Published property MixtureFormulas: TStrings read GetMixtureFormulas write FMixtureFormulas;

MixtureFormulas is used for reading and storing formulas for mixtures. When it is being read, the value is read from the associated TScreenObject. When it is being written, it is stored in the private field (FMixtureFormulas) and is later transfered to the TScreenObject in the protected method UpdateScreenObject.


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