Home  |  Delphi .net Home  |  System.Collections.SortedList  |  RemoveAt Method
  
RemoveAt  
Method  
Remove a key-value entry from the current SortedList at the specified Index
SortedList Class
System.Collections NameSpace
CF1.  Procedure RemoveAt ( Index : Integer ) ;
CF : Methods with this mark are Compact Framework Compatible
Description
The key-value entry at the specified Index position in the sorted Key sequence is removed. The Count is decremented.
Microsoft MSDN Links
System.Collections
System.Collections.SortedList
 Author links

 Buy Website Traffic at
 Buywebsitetrafficexperts.com

 Buy Proxies at
 Buyproxies.io
 
 
 
A simple example
program Project1;
{$APPTYPE CONSOLE}

uses
  System.Collections;

var
  MyList    : System.Collections.SortedList;
  DictEntry  : DictionaryEntry;
  Enumerator : IEnumerator;

begin
  // Create our sorted list
  MyList := SortedList.Create;

  // Add entries to it
  MyList['Name']     := 'Neil Moffatt';
  MyList['Birthday'] := DateTime.Create(1957, 2, 18);
  MyList['Age']      := TObject(47);

  // Display the list contents
  Console.WriteLine('MyList at the start :');
  Console.WriteLine;
  Enumerator := MyList.GetEnumerator;
  while Enumerator.MoveNext do
  begin
    DictEntry := DictionaryEntry(Enumerator.Current);
    Console.WriteLine('{0} = {1}',
                      DictEntry.Key.ToString,
                      DictEntry.Value.ToString);
  end;

  // Now remove the Birthday entry : index = 1 (0-based)
  MyList.RemoveAt(1);

  // Display the list contents
  Console.WriteLine;
  Console.WriteLine('MyList after removing index 1 entry :');
  Console.WriteLine;
  Enumerator := MyList.GetEnumerator;
  while Enumerator.MoveNext do
  begin
    DictEntry := DictionaryEntry(Enumerator.Current);
    Console.WriteLine('{0} = {1}',
                      DictEntry.Key.ToString,
                      DictEntry.Value.ToString);
  end;

  Console.Readline;
end.
   MyList at the start :
  
   Age = 47
   Birthday = 18/02/1957 00:00:00
   Name = Neil Moffatt
  
   MyList after removing index 1 entry :
  
   Age = 47
   Name = Neil Moffatt
 
 
Delphi Programming Neil Moffatt 2002 - 2017. All rights reserved.  |  Contact the author