关于接口
iame 2001-09-17 03:04:35 在Delphi中自定义一个接口
IMyInterface=interface
procedure f1;
end;
然后定义一个类实现它:
TMyClass=class(TObject,IMyInterface)
procedure f1;
end;
编译时,报错说没有实现IUnknow的三个方法
如果上述类定义为:
TMyForm=class(TForm,IMyInterface)
procedure
end;
就可以编译通过。为什么?是不是TFrom已经实现了IUnknown接口?但在TForm及其父类的源码中也找不到实现IUnknow接口的痕迹。怎么回事?