TIfStringList

Unit: ifs_utl.pas
TIfStringList is a small class or object that implements a list of strings. Not depending on eachother, so you can use all chars in it. It has a maximum length of 255 per string.

TIfStringList = {$IFDEF CBUILDER}class{$ELSE}object{$ENDIF}
function Count: LongInt;
{Return the number of items.

function GetItem(Nr: LongInt): string;
Return item number (nr)

procedure SetItem(Nr: LongInt; const s: string);
Set item number (nr)

procedure Add(const P: string);
Add an item to the list.

procedure Delete(NR: LongInt);
Delete item no (nr)

procedure Clear;
Clear the list.

constructor Create;
Create an instance of it. (must be called also with objects)

destructor Destroy; {$IFDEF CBUILDER}Override; {$ENDIF}
Destroy the instance of it. (must be called also with objects)

end;