Устранение Проблемы с Nil-Значениями в TDictionary при Использовании TList в Delphi 9

Delphi , Компоненты и Классы , Списки

При работе с коллекциями в Delphi 9, разработчики часто сталкиваются с особенностями управления памятью и передачей объектов по ссылке. Одной из таких проблем является ситуация, когда при добавлении объекта TList в TDictionary значения в списке становятся nil после повторного использования одного и того же экземпляра TList.

Описание Проблемы

Рассмотрим типичный случай, когда разработчик использует TDictionary для хранения данных. В коде используется следующая структура:

g_FileHandlers : TDictionary<String, TList<String>>;
g_FileHandlers := TDictionary<String, TList<String>>.Create;

Также создается TList:

g_FilePaths := TList<String>.Create;

В процессе работы с файлами данные заполняют TList и TDictionary. Однако при повторном использовании одного и того же TList для добавления в TDictionary значения в списке становятся nil. Это происходит из-за того, что объекты в коллекциях передаются по ссылке, и при очистке или переиспользовании списка, ссылки теряются.

Пример Кода, Вызывающего Проблему

for i := 0 to g_FileList.Count - 1 do
begin
  // ...
  if AnsiCompareText(g_HandlerName, g_PreviousHandlerName) <> 0 then
  begin
    g_FileHandlers.Add(g_PreviousHandlerName, g_FilePaths);
    g_FilePaths.Clear; // Обнуление списка приводит к потере данных
    // ...
  end;
  // ...
  if i = g_FileList.Count - 1 then
    g_FileHandlers.Add(g_HandlerName, g_FilePaths);
end;
g_FilePaths.Free;

Подходы к Решению

Чтобы решить проблему, необходимо создать новый экземпляр TList для каждого элемента, который вы хотите добавить в TDictionary. Это предотвратит потерю ссылок и гарантирует, что данные будут сохранены.

Подтвержденный Ответ

При добавлении TList в TDictionary, фактически передается ссылка на объект, а не его копия. Следовательно, при изменении состояния TList (например, при очистке), данные в TDictionary также становятся недоступными.

Альтернативный Ответ

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

g_FileHandlers : TObjectDictionary<String, TList<String>>;
g_FileHandlers := TObjectDictionary<String, TList<String>>.Create(True);

Этот подход позволит избежать ручного создания новых экземпляров TList на каждом шаге и автоматически управлять жизненным циклом объектов.

Выводы

Для корректной работы с TDictionary и TList в Delphi 9 важно понимать, что коллекции работают с объектами по ссылке. Для предотвращения потери данных необходимо создавать новый экземпляр TList для каждого элемента, который добавляется в TDictionary. Альтернативой может служить использование TObjectDictionary с параметром doOwnsValues, что упростит управление памятью и уменьшит вероятность ошибок.

Создано по материалам из источника по ссылке.

При работе с `TDictionary` в Delphi 9 для избежания потери данных при добавлении `TList` необходимо создавать новый экземпляр списка или использовать `TObjectDictionary` с автоматическим управлением владением объектами.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Списки ::