说明:
TObject:所有的 VCL 类和控件的祖先类
• 对象实例的创建、维护、和销毁时的内存管理
• 响应对象实例的创建和销毁
• 提供返回对象的类型 (class-type) 和实例信息 (instance information),
支持返回 __published: 属性的运行时类型信息 (RTTI, runtime type information)。
• 支持消息处理
• 支持接口的实现 (interfaces implemented)
• TObject 和从 TObject 继承来的类不能直接定义为对象,必须定义为指针,用 new 创建出来;
• TObject 是一个抽象类,虽然在程序代码上没有限制直接创建一个 TObject 实例;
• 属性 • 方法 • 事件
头文件:
#include <System.hpp>
命名空间:
System
继承关系:
无
例:几个按钮共用一个点击事件 ButtonsClick 通过 Tag 属性给这些按钮编号,在点击事件里面判断点击的是哪个按钮
void __fastcall TForm1::ButtonsClick(TObject *Sender)
{
TButton *lpButton = dynamic_cast<TButton *>(Sender);
if(lpButton)
{
switch(lpButton->Tag)
{
case 1: break; // 编号为 1 的按钮
case 2: break; // 编号为 2 的按钮
}
}
} |
|