Delphi中Peter Below的代码是否存在内存泄漏问题?