Delphi FreeAndNil 是一个过程,并不是函数,看源代码就知道,它的主要作用是清空并释放对象
procedure FreeAndNil(var Obj); var Temp: TObject; begin Temp := TObject(Obj); Pointer(Obj) := nil; Temp.Free; end;
看代码的执行顺序,先置空,再释放
置空 清空指针指向内存的地址。
释放 释放实例占用的所有资源。Free后,指针不能再使用
更新时间:2019.12.27
来源于:https://www.cnblogs.com/guorongtao/p/12107245.html
原文地址:https://www.cnblogs.com/guorongtao/p/12107245.html
时间: 2024-10-11 05:17:57