Question

我想将一些字符串数据存储到堆栈。

Delphi Documentation for System.Generics.Collections.TStack适用于Delphi XE4。

我在Missing units (IcePack, Generics.Collections)

中读到了赫弗南先生的回答

除数组之外，堆栈有哪些替代方案？

Answer 1

可能您正在尝试使用非通用堆栈（位于System.Contnrs）以下是通用TStack<>的完整工作示例：

program ProjectC;
{$APPTYPE CONSOLE}
uses
  System.SysUtils,
  System.Generics.Collections;

var
  Stack: TStack<Integer>;

begin
  Stack := TStack<Integer>.Create;
  try
    Stack.Push(1);
    Stack.Push(2);
    while Stack.Count > 0 do
      Writeln(Stack.Pop);
  finally
    Stack.Free;
  end;
  Readln;
end.

Generics Collections TStack有哪些替代方案？

1 个答案: