Delphi Dictionary Сортировка

Delphi-словарь (TDictionary) — это класс хранилища данных, который используется для хранения значений, связанных со специальным ключом.

TDictionary предоставляет функционал поиска, добавления и удаления элементов, а также возможность итерации по коллекции с использованием перечислителя TPair. Когда происходит добавление нового элемента, он автоматически упорядочивается по ключу.

Для доступа к элементу словаря необходимо знать ключ, связанный с ним. Для обхода элементов словаря можно использовать следующий код:

var  Dict: TDictionary;  Pair: TPair;begin  Dict := TDictionary.Create;  try    Dict.Add(1, 'one');    Dict.Add(2, 'two');    Dict.Add(3, 'three');    // Обход элементов словаря    for Pair in Dict do      ShowMessage(IntToStr(Pair.Key) + ' ' + Pair.Value);  finally    Dict.Free;  end;end;

Сортировка элементов словаря TDictionary по ключу возможна с использованием стандартных функций языка Delphi. Например, для сортировки словаря по возрастанию ключа можно использовать функцию Sort:

var  Dict: TDictionary;  KeyList: TList;  I: Integer;begin  Dict := TDictionary.Create;  KeyList := TList.Create;  try    Dict.Add(2, 'two');    Dict.Add(1, 'one');    Dict.Add(3, 'three');    // Получение списка ключей    KeyList.AddRange(Dict.Keys);    // Сортировка    KeyList.Sort;    // Вывод элементов словаря в отсортированном порядке    for I := 0 to KeyList.Count - 1 do      ShowMessage(IntToStr(KeyList[I]) + ' ' + Dict[KeyList[I]]);  finally    Dict.Free;    KeyList.Free;  end;end;

Данный пример отсортирует элементы словаря по возрастанию ключа и выведет их в отсортированном порядке (1, 'one'), (2, 'two'), (3, 'three').