如何使用自定义的接口

[chenxix]

我在使用自定义接口时，定义好了接口，也实现了接口，可是不知道如何调用已实现的接口，请高手帮忙

[jabmoon]

接口应该是用相应的类来调用吧

[墨梅无痕]

定义：
type
IMyMessage = interface(IUnknown)
function ReturnMsg: string;
end;

TMyMessage = class(TInterfacedObject, IMyMessage)
protected
function ReturnMsg: string;
end;

使用：
var
intfMyMsg: IMyMessage;

begin
intfMyMsg := TMyMessage.Create;
ShowMessage(intfMyMsg.ReturnMsg);
intfMyMsg := nil;
end;

[墨梅无痕]

这是使用接口的一种方式！还有其他的方式。

[largewang]

对
intfMyMsg := TMyMessage.Create;//增加引用记数
ShowMessage(intfMyMsg.ReturnMsg);
intfMyMsg := nil;//减少引用记数，为0时释放对象