码迷,mamicode.com
首页 > 其他好文 > 详细

一窥kbmmw中的 smart service

时间:2017-01-31 20:59:11      阅读:245      评论:0      收藏:0      [点我收藏+]

标签:size   actor   report   调用   eve   oms   使用   绑定   produced   

在kbmmw 的新版中(还没有发布),将会有一个叫做smart service 的服务。这种服务的属性基于服务器端,
并且可以自动注册服务名,下面就是一个简单例子代码。这个服务里面有有三个发布的函数:echostring,
EchoReversedString和AddNumbers。这些函数使用一些声明变量,包括“魔法”参数变量,以便访问不同的
客户端标识值。




Attribute based server side code with auto registration. This example shows a smart service with 3 published functions named EchoString, EchoReversedString and AddNumbers. The functions takes a number of arguments, including magic arguments to provide access to various client identity values.
 [kbmMW_Service(SMARTDEMO)]
  TkbmMWCustomService2 = class(TkbmMWCustomSmartService)
  private
  protected
  public
     [kbmMW_Method]
     function EchoString(const AString:string):string;

     [kbmMW_Method(EchoReversedString)]
     function ReverseString(const AString:string;
                         [kbmMW_Arg(mwatClientIdentity)]
                         const AClientIdentity:TkbmMWClientIdentity
                           ):string;

     [kbmMW_Method]
     function AddNumbers(const AValue1,AValue2:integer;
                         [kbmMW_Arg(mwatRemoteLocation)]
                         const ARemoteLocation:string
                        ):integer;
  end;

...
function TkbmMWCustomService2.EchoString(const AString:string):string;
begin
     Result:=AString;
end;

function TkbmMWCustomService2.ReverseString(const AString:string;
         const AClientIdentity:TkbmMWClientIdentity):string;
begin
     Result:=StrUtils.ReverseString(AString);
end;

function TkbmMWCustomService2.AddNumbers(const AValue1,AValue2:integer;
         const ARemoteLocation:string):integer;
begin
     Result:=AValue1+AValue2;

     // ARemoveLocation contains the reported remote location
     // for the client.
end;

initialization
  // Make sure that RTTI is produced for the service class.
  TkbmMWRTTI.EnableRTTI(TkbmMWCustomService2);

 

以上代码毫无疑问可以执行,但是最理想的是如何让他非常方便的增加新的函数,并且不用繁琐的加入
注册代码,并且让客户端访问。
可以通过调用kbmMWServer1.AutoRegisterServices来自动注册kbmMW_Service中定义的服务。

没有使用kbmMW_Arg绑定的声明自动的被看作声明值,并接受调用者传来的值。

例如
[kbmMW_Method] function EchoString(const AString:string):string; 与一下代码相同 [kbmMW_Method] function EchoString([kbmMW_Arg] const AString:string):string; 与一下代码也相同 [kbmMW_Method] function EchoString([kbmMW_Arg(mwatValue)] const AString:string ):string; 在客户端调用时的代码就如下:

    s:=client.Request(SMARTDEMO,‘‘,echostring,[abc]);
     s:=client.Request(SMARTDEMO,‘‘,EchoReversedString,[abc]);
     i:=client.Request(SMARTDEMO,‘‘,addnumbers,[10,20]);

还有更方便的客户端调用方法

procedure TForm1.Button1Click(Sender: TObject);
var
   c:TkbmMWSmartClient;
   s:string;
   i:integer;
begin
     // New smart client.
     c:=TkbmMWSmartClientFactory.GetClient(Transport,SMARTDEMO);
     s:=c.EchoString(abc);
     s:=c.EchoReversedString(abc);
     i:=c.AddNumbers(34,7);

     // Traditional client.
     s:=client.Request(SMARTDEMO,‘‘,echostring,[abc]);
     s:=client.Request(SMARTDEMO,‘‘,EchoReversedString,[abc]);
     i:=client.Request(SMARTDEMO,‘‘,addnumbers,[10,20]);
end;

由于目前新版还没有发布,目前只有这些内容。

 

一窥kbmmw中的 smart service

标签:size   actor   report   调用   eve   oms   使用   绑定   produced   

原文地址:http://www.cnblogs.com/xalion/p/6359035.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!