UNITS
CLASSES, INTERFACES, OBJECTS
TYPES
VARIABLES
CONSTANTS
FUNCTIONS, PROCEDURES
IDENTIFIERS

Class TXYPointList

Unit

UXYPointList

Declaration

type TXYPointList = class(TObject)

Description

Definition of the 2 dimensionsl polygon object with TDouble prec.

Fields

None.

Methods

Overview

Constructor Create;
Constructor CreateByPoints(aPointList: TXYPointList);
Destructor Destroy; Override;
Procedure Add(aPoint: TXYPoint);
Procedure Assign(aPointList: TXYPointList);
Function CheckTopography(Var IndexA,IndexB,IndexC:TInt32):TXYPointListTopError;
Procedure Clear;
Procedure Delete(Index: TInt32);
Procedure Extent(aMin, aMax: TXYPoint);
Function Get(Index: TInt32): TXYPoint; Virtual;
Function HeavyPoint: TXYPoint;
Procedure Insert(Index: TInt32; aPoint: TXYPoint);
Procedure List(Port: TStrings);
Function PolyLength: TDouble;
Procedure Put(Index: TInt32; aPoint: TXYPoint); Virtual;
Procedure Read(Port: TReader);
Procedure Transform(Trfm: TAffinTransform; Var aMin, aMax: TXYPoint);
Procedure Write(Port: TWriter);

Description

Constructor Create;

Standard constructor

Constructor CreateByPoints(aPointList: TXYPointList);

Standard constructor

Destructor Destroy; Override;

Standard desstructor

Procedure Add(aPoint: TXYPoint);

Append a point at the end of the current list

Procedure Assign(aPointList: TXYPointList);

Create a copy of aPolygon

Function CheckTopography(Var IndexA,IndexB,IndexC:TInt32):TXYPointListTopError;

Check topographical errors.

Procedure Clear;

Clear the current list

Procedure Delete(Index: TInt32);

Delete a point at the index of the current list

Procedure Extent(aMin, aMax: TXYPoint);

Extent of the Polygon.

Function Get(Index: TInt32): TXYPoint; Virtual;

Get the data of point at the index of the current list

Function HeavyPoint: TXYPoint;

Position of the geometrical center (in german Schwerpunkt).

Procedure Insert(Index: TInt32; aPoint: TXYPoint);

Insert a point at the index of the current list

Procedure List(Port: TStrings);

Textrual writing to a stringlist.

Function PolyLength: TDouble;

Length of a polygon.

Procedure Put(Index: TInt32; aPoint: TXYPoint); Virtual;

Substitute a point at the index of the current list

Procedure Read(Port: TReader);

Binary reading of the polygon

Procedure Transform(Trfm: TAffinTransform; Var aMin, aMax: TXYPoint);

Affine transformation of a point and recalculation of it's extention

Procedure Write(Port: TWriter);

Binary writing of the polygon

Properties

Overview

MaxPoint:
Points[index: TInt32]:

Description

MaxPoint:

Number of elements of a Polygonset.

Points[index: TInt32]:

Linear encapsulation of the polygonset. The index starts with 1 and ends with Maxpoints.


Generated by pasdoc 0.6.20 on Mon 18 Feb 2002 20:55:35