[Overview][Constants][Types][Classes][Procedures and functions][Variables][Index] |
Insert a new string in the collection.
Source position: objects.pp line 488
procedure TUnSortedStrCollection.Insert( |
Item: Pointer |
); virtual; |
Insert inserts a string at the end of the collection, instead of on it's alphabetical place, resulting in an unsorted collection of strings.
None.
|
Insert a new item in the collection at the end. |
Program ex39; { Program to demonstrate the TUnsortedStrCollection.Insert method } Uses Objects,Strings; Var C : PUnsortedStrCollection; S : String; I : longint; P : Pchar; begin Randomize; C:=New(PUnsortedStrCollection,Init(120,10)); Writeln ('Inserting 100 records at random places.'); For I:=1 to 100 do begin Str(Random(100),S); S:='String with value '+S; C^.Insert(NewStr(S)); end; For I:=0 to 99 do Writeln (I:2,': ',PString(C^.At(i))^ ); Dispose(C,Done); end.