superobject.pas 其他人修改的 https://blog.csdn.net/joiedavidow/article/details/81660987 https://www.cnblogs.com/delphi2006/p/9962928.html