Class TPointList

Unit

Delaunay

Declaration

type TPointList = class(TObject)

Description

Hierarchy

• TObject
• TPointList

Overview

Fields

	FItems: array of TDelaunayPoint;
	FCount: longint;
	FCapacity: longint;

Methods

	procedure Grow;
	procedure SetCapacity(const Value: integer);
	procedure DeleteLast;
	function GetItem(index: Integer): TDelaunayPoint;
	procedure SetCount(const Value: longint);
	procedure SetItem(index: Integer; const Value: TDelaunayPoint);
	function Last : TDelaunayPoint;
	procedure Add(item : TDelaunayPoint);
	constructor Create;
	destructor Destroy; override;

Properties

	property Capacity : integer read FCapacity write SetCapacity;
	property Count : longint read FCount write SetCount;
	property Items[index:longint]: TDelaunayPoint read GetItem write SetItem;

Description

Fields

	FItems: array of TDelaunayPoint;

	FCount: longint;

	FCapacity: longint;

Methods

	procedure Grow;

	procedure SetCapacity(const Value: integer);

	procedure DeleteLast;

	function GetItem(index: Integer): TDelaunayPoint;

	procedure SetCount(const Value: longint);

	procedure SetItem(index: Integer; const Value: TDelaunayPoint);

	function Last : TDelaunayPoint;

	procedure Add(item : TDelaunayPoint);

	constructor Create;

	destructor Destroy; override;

Properties

	property Capacity : integer read FCapacity write SetCapacity;

	property Count : longint read FCount write SetCount;

	property Items[index:longint]: TDelaunayPoint read GetItem write SetItem;