我在三层中定义了多个接口,我怎样得到我想要的接口(50分)

  • 主题发起人 主题发起人 socket
  • 开始时间 开始时间
S

socket

Unregistered / Unconfirmed
GUEST, unregistred user!
我在三层中定义了多个接口,我怎样得到我想要的接口,因为我想要调用该接口中的方法
 
你自己定义的接口,自己都不知道吗?
 
调用方式 远程数据模块.接口名.方法名 (类似:Form.close)
 
对接口声明一个变量,通过变量就可以找见了。
 
我用的是TSocketconnection连接服务器,
用SocketConnection1.AppServer.Get_xxxInfo ;只能调用默认接口中的方法,
但我要调用服务端定义的其它接口中的方法,怎么做呢
 
SocketConnection1.AppServer.你的接口;
//注,这里“你的接口”直接写上,没code Insight(就是按点号,不出来提示)功能的
 
用它吧!Supports
procedure TForm1.Button1Click(Sender: TObject);
var
MyObject:TMyObject;
MyObject2:TMyObject2;
Intf1:IMyInterface;
Intf2:IMyInterface2;
V:Variant;
begin
MyObject:=TMyObject.Create;
MyObject.FDelgateObj:=TMyObject2.Create;
V:=(MyObject as IInterface);
if Supports(V,IMyInterface,Intf1) then
ShowMessage(Intf1.SayHello);
if Supports(V,IMyInterface2,Intf2) then
ShowMessage(Intf2.SayHello2);
end;
 
to shaga
假如接口是Ihh,是这样子写吗?
SocketConnection1.AppServer.Ihh.Get_xx_info ;
 
是CMO+的吗?
是的话在系统里注册一下
就可以在组件服务中获取到方法名称了
 
//to shaga
//假如接口是Ihh,是这样子写吗?
//SocketConnection1.AppServer.Ihh.Get_xx_info ;
SocketConnection1.AppServer.Get_xx_info;就可以了
 
to shiningplus
不行,因为Ihh不是默认接口
 
没人知道吗
 
我也遇到了和你一样的问题,提前
 
to yj_119
那你是怎么解决的?
 
(SocketConnection1.AppServer as Ihh).Get_xx_info
Ihh(SocketConnection1.AppServer).Get_xx_info
 
to Sunny18
你的方法不行呀
难道就没人会吗?????????????????????
 
为了系统发布和维护的方便性,建议使用统一的标准接口!
 
多人接受答案了。
 
后退
顶部