44、深入探究 TObject 类与 System 单元

深入探究 TObject 类与 System 单元

1. TObject 类的更多方法

TObject 类作为所有类的公共祖先类，其方法可应用于任何对象，甚至类或类引用（因为部分是类方法）。以下是部分方法及其简要描述：
| 方法名 | 描述 |
| ---- | ---- |
| ClassName | 返回类名的字符串，用于显示 |
| ClassNameIs | 检查类名是否与给定值匹配 |
| ClassParent | 返回当前类或对象类的父类引用，可逐级向上导航至 TObject 类（此时返回 nil） |
| ClassInfo | 返回类的内部低级运行时类型信息（RTTI）指针 |
| ClassType | 返回对象类的引用（只能用于对象，不能直接用于类） |
| InheritsFrom | 测试类是否（直接或间接）继承自给定基类，与 is 运算符类似且是其最终实现方式 |
| InstanceSize | 返回对象数据的字节大小，包括字段和一些特殊保留字节 |
| UnitName | 返回定义类的单元名，有助于描述类，因为类名在系统中不唯一，只有限定类名（单元名和类名用点分隔）在应用中唯一 |
| QualifiedClassName | 返回单元名和类名的组合，在运行系统中唯一 |

以下是使用这些方法访问类信息的示例代码：

procedure TSenderForm.ShowSender(Sender: TObject);
begin
  Memo1.Lin