idemo塞尔维亚语 delphi中接口的定义和使用?
delphi中接口的定义和使用?Define interface idemotypeidemo=interface function a(I:integer):integerend接口中的方法不能有方
delphi中接口的定义和使用?
Define interface idemotypeidemo=interface function a(I:integer):integerend接口中的方法不能有方法体,只能有声明。然后可以使用接口对象或继承接口typetdemo=class(tcomponent,IDEO)publicfunctiona(I:integer):integerend,然后构造functiontdemo。A(I:integer):integerbeginresult:=I*2end表示类中方法的方法体。也可以将对象转换为接口,例如:变量impl:IDemoTImpl:tDemoBeginTempl:=TDemo.创建(nil)IImpl:=IImpl(TImpl)结束