Class TLongIntList (unit mwPCharList)

Inherits from

TObject

Constructors


constructor Create;

TLongIntList } { TLongIntList constructor and destructor +++++++++++++++++++++++++++++++++++++


Functions

function Add(Item: LongInt): Integer;

SetItems } { TLongIntList public +++++++++++++++++++++++++++++++++++++++++++++++++++++++++

procedure Clear;

Add

procedure Delete(Index: Integer);

Clear

procedure DeleteGroup(StartIndex: LongInt; GroupCount: LongInt);

Delete

destructor Destroy;

Create

procedure Exchange(Index1, Index2: Integer);

DeleteGroup

function First: LongInt;

Exchange

function IndexOf(Item: LongInt): Integer;

First

procedure Insert(Index: Integer; Item: LongInt);

IndexOf

function Last: LongInt;

Insert

procedure Move(CurIndex, NewIndex: Integer);

Last

function Remove(Item: LongInt): Integer;

Move

function GetItems(Index: Integer): LongInt;

Destroy } { TLongIntList protected ++++++++++++++++++++++++++++++++++++++++++++++++++++++

procedure SetCapacity(NewCapacity: Integer);

GetItems

procedure SetCount(NewCount: Integer);

SetCapacity

procedure SetItems(Index: Integer; Item: LongInt);

SetCount

Properties

property Capacity : Integer


property Count : Integer


property Items : LongInt


property LongIntList : PLongIntArray


Events

Variables

FCapacity : Integer;


FCount : Integer;


FLongIntList : PLongIntArray;



Constructors


constructor Create;

TLongIntList } { TLongIntList constructor and destructor +++++++++++++++++++++++++++++++++++++


Functions


function Add(Item: LongInt): Integer;

SetItems } { TLongIntList public +++++++++++++++++++++++++++++++++++++++++++++++++++++++++


procedure Clear;

Add


procedure Delete(Index: Integer);

Clear


procedure DeleteGroup(StartIndex: LongInt; GroupCount: LongInt);

Delete


destructor Destroy;

Create


procedure Exchange(Index1, Index2: Integer);

DeleteGroup


function First: LongInt;

Exchange


function IndexOf(Item: LongInt): Integer;

First


procedure Insert(Index: Integer; Item: LongInt);

IndexOf


function Last: LongInt;

Insert


procedure Move(CurIndex, NewIndex: Integer);

Last


function Remove(Item: LongInt): Integer;

Move


function GetItems(Index: Integer): LongInt;

Destroy } { TLongIntList protected ++++++++++++++++++++++++++++++++++++++++++++++++++++++


procedure SetCapacity(NewCapacity: Integer);

GetItems


procedure SetCount(NewCount: Integer);

SetCapacity


procedure SetItems(Index: Integer; Item: LongInt);

SetCount


Properties


property Capacity : Integer


property Count : Integer


property Items : LongInt


property LongIntList : PLongIntArray


Events


Variables


FCapacity : Integer;


FCount : Integer;


FLongIntList : PLongIntArray;