Delphi中如何使用Assigned函数

在Delphi中，Assigned函数用于检查指定的援用是否是已分配了内存。它通经常使用于检查对象援用是否是为空。Assigned函数的语法以下：

function Assigned(Obj: TObject): Boolean;

示例用法以下：

var
  MyObject: TObject;
begin
  MyObject := TObject.Create;
  
  if Assigned(MyObject) then
    ShowMessage('MyObject has been allocated');
  else
    ShowMessage('MyObject has not been allocated');
end;

在以上示例中，我们首先创建了一个TObject类型的对象MyObject，并使用Assigned函数检查该对象是否是已分配了内存。如果对象已被分配了内存，则显示’MyObject has been allocated’，否则显示’MyObject has not been allocated’。