diff --git a/designer/udesignerproject.tsf b/designer/udesignerproject.tsf index d7a00d6..edd6b72 100644 --- a/designer/udesignerproject.tsf +++ b/designer/udesignerproject.tsf @@ -1048,6 +1048,16 @@ type %s=class(%s) begin inherited; end + function Recycling();override; //回收变量 + begin + inherited; + ci := self.classinfo(); //将成员变量赋值为nil避免循环引用 + for i,v in ci["members"] do + begin + if v["static"] then continue; + invoke(self,v["name"],nil); + end + end end