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’。