delphi - TStringList 是否可以自动释放附加到其项目的对象？

Question

我正在向TObjecta 添加一些后代TStringList，例如通过调用AddObject. 我希望在释放列表对象时释放它们。有什么办法可以做到这一点？

Answer 1

的OwnsObjects属性TStringList应该设置为True，以便列表在被销毁时释放其对象。这可以通过调用接收OwnsObjects参数的构造函数重载来实现，也可以通过在创建后显式设置属性来实现。最好设置OwnsObjects为对象构造的一部分。

该文档描述了这样的属性：

OwnsObjects属性指定字符串列表是否拥有存储的对象。如果OwnsObjects属性设置为 True，则 Destroy 析构函数将释放为这些对象分配的内存。