在 delphi 中，判断一个对象的实例是否创建成功，通常可以参考以下代码：
if not Assigned(ClassA) thenbegin //...end;
if ClassA = nil thenbegin //...end;
需要提示的是，当对象被注销时，建议将对象指针设置为 nil，或是使用 FreeAndNil 函数。
