Delphi的这个Peter Below代码,是内存泄漏吗?