JZTXT

常用函数

发布时间 2023-04-20 15:41:14作者: 德琪

Assigned函数

--->该函数用于测试指定的对象是否为空。

语法 function Assigned(const P):Boolean;

部分 说明
P 任何类型的对象或变量

说明：

​ 如果对一个没有被构造或者已经被释放的对象进行操作将产生异常，使程序中断，所以对某个对象操作之前，应该对这个对象进行检测，使用该函数就能进行判断。

  if Assigned(AVS) then      //如果AVS存在且不为Nil，将执行下面的代码
    MList.Lines.Add('类名为'+AVS.ClassName+'的对象存在！')
  else
    MList.Lines.Add('对象为空！');

FreeAndNil过程

--->该函数用于释放指定对象，并设置其为空。

语法
procedure FreeAndNil(var Obj);

部分 说明
Obj 任何类的实例

说明：

​ 如果某个对象已经没有任何价值，可以将其释放，通常使用该对象的Free方法来完成该操作。Free方法将销毁对象，并且该对象销段后将不能被继续引用。但是如果使用FreeAndNil函数将对象释放后，该对象仍然存在，不过其值为Nil，如果需要继续使用，则可以再次调用构造函数来为其分配空间。