Abstract (抽象类)类是下面的可实例化类的框架, 那么我们可以操作其中的抽象类的成员, 从而达到控制可实例化类中相关的成员?对否?
解决方案 »
- 关于dat类型数据库的问题
- 欢迎大家来谈谈,QQ是怎样广播系统消息的. 本人开发的三层系统需要类似的功能,请大家给点思路,谢谢
- 怎样取得当前表的主键字段的名称?
- 请问Delphi有没有封装‘security.dll’或者 'secur32.dll' 这个模块?
- 关于数据库的检索问题
- 有没有人利用可执行文件进行注册软件的?请求帮忙
- 哪里有DevExpress.ExpressQuantumGrid3.2.1 for delphi6下载
- WINSOCK问题:gethostbyname怎么用?
- 转贴:网络媒体营销,准确是关键。
- SQL问题,急!
- 大家进来看一下这个问题!值得思考的。
- 接口问题~~~请各位高手帮帮忙~~
子孙类实现了的成员才能使用
例
type
TAbstractClass=class(TObject)
protected
procedure method1;virtual;abstract;
procedure method2;virtual;abstract;
end;
TMyClass=class(TAbstractClass)
public
procedure method2;override;
end;
procedure TMyClass.method2;
begin
showmessage('ok');
end;
procedure TForm1.Button1Click(Sender: TObject);
var
MyInstance:TAbstractClass;
begin
MyInstance:=TMyClass.Create;
MyInstance.method2; //允许
MyInstance.method1; // 出错,因为它没有被实现
MyInstance.Free;
end;