Class TSimpleLine

DescriptionHierarchyFieldsMethodsProperties

Unit

SelectUnit

Declaration

type TSimpleLine = class(TObject)

Description

Hierarchy

Overview

Fields

Private FCount: integer;
Private FPoints: TPolyLine2D;
Private FZoomBox: TQRbwZoomBox2;

Methods

Private function GetPoint(const Index: integer): TPoint2D;
Private procedure SetPoint(const Index: integer; const Value: TPoint2D);
Public Constructor Create(AZoomBox: TQRbwZoomBox2);
Public procedure AddPoint(const APoint: TPoint2D);
Public procedure Draw(const BitMap: TBitmap32);
Public function LineLength: double;
Public procedure DeleteNextToLastPoint;

Properties

Public property Count: integer read FCount write FCount;
Public property Points[constIndex:integer]: TPoint2D read GetPoint write SetPoint;
Public property ZoomBox: TQRbwZoomBox2 read FZoomBox;

Description

Fields

Private FCount: integer;

See Count.

Private FPoints: TPolyLine2D;

See Points

Private FZoomBox: TQRbwZoomBox2;
 

Methods

Private function GetPoint(const Index: integer): TPoint2D;

See Points.

Private procedure SetPoint(const Index: integer; const Value: TPoint2D);
 
Public Constructor Create(AZoomBox: TQRbwZoomBox2);
 
Public procedure AddPoint(const APoint: TPoint2D);

AddPoint adds a new point to the end of TSimpleLine

Public procedure Draw(const BitMap: TBitmap32);

Draw draws TSimpleLine on BitMap as a polygon.

Public function LineLength: double;
 
Public procedure DeleteNextToLastPoint;
 

Properties

Public property Count: integer read FCount write FCount;

Count is the number of locations in Points that is used by this TSimpleLine.

Public property Points[constIndex:integer]: TPoint2D read GetPoint write SetPoint;

property Points: TPointArray read FPoints write SetPoints;

Public property ZoomBox: TQRbwZoomBox2 read FZoomBox;
 
Generated by PasDoc 0.12.1 on 2013-05-13 15:42:03