ListView Data befüllen?

[SneakyBagels]

Delphi-Quellcode:

// Dictionary erzeugen mit OwnsValues = True, damit Values bei Dictionary-Clear freigegeben werden
aListViewData_List := TObjectDictionary<string, TListViewData>.Create([doOwnsValues]);

// Dictionary leeren und alle Objekte freigeben
aListViewData_List.Clear;

// Dictionary freigeben
aListViewData_List.Free;

Und wieder zwei Codezeilen weniger. Da ich das Freigeben der Values sogar in eine Prozedur gepackt hätte sind es sechs Zeilen weniger.