TIfList
Unit: ifs_utl.pas
TIfList is used to store pointers. It does not destroy them when you remove of clear them.
TIfList = {$IFDEF CBUILDER}class{$ELSE}object{$ENDIF}
function Count: LongInt;
Return the number of items in the list.
function GetItem(Nr: LongInt): Pointer;
Return item no (nr)
procedure SetItem(Nr: LongInt; P: Pointer);
Set item no (nr)
procedure Add(P: Pointer);
Add an item.
procedure Remove(P: Pointer);
Remove item P.
procedure Delete(Nr: Longint);
Remove item no (nr)
procedure Clear;
Clear the list.
constructor Create;
Create the list. Must be called also in object mode.
destructor Destroy; {$IFDEF CBUILDER}Override; {$ENDIF}
Destroy the list. Must be called also in object mode.
end;