根据 nneonneo 的方法完成的 Delphi 版的程序。他的程序总是用了泛型，Delphi 是从 201…