我正在使用 Generics.Collections 中的 Delphi TStack（在 Delphi XE 下）实现一个堆栈，并注意到当我调用 pop 时，弹出的对象被释放，这对我来说似乎没有意义，因为我现在无法使用弹出的对象。相反，我发现我可以使用似乎有效的 Extract。我的问题是，有什么办法可以使用 pop 代替，因为它有助于代码的可读性。有没有办法阻止它释放弹出的对象？
附带说明一下，我曾想过使用 TObjectStack，因为它可以让我控制谁拥有对象，但后来我发现 TObjectStack pop 是一种实际上不返回弹出内容的方法，因此它不是很有用。