调用kbmMW服务端方法经验一则

2020-08-29 16:01:39 阅读：204 来源： 互联网

标签：... begin 调用 end string kbmMW OK 服务端

基于kbmMW实作项目，难免要在服务端实现方法供客户端调用，在这里有条重要的经验分享。

假设服务端有个方法，并反回一个字符串。

Procedure TQueryService.ValidUser:string
begin
  ...
  result:='OK';
end;

上面服务端方法返回串OK，表示用户合法。

那客户端我们这样调用：

procedure TUser.ValidateUser(LoginCode, password: string);
var
    r: string;
begin
   ...
    r := c.Request(...);
    if (r = 'OK') then
    begin
         //用户合法
    end
    else
      ...
end;

正常情况下没有问题，应用会按预期执行。而一但因网路或其他问题，造成客户端请求不能正常执行，问题就来了：

c.Request返回的是个Variant，当不能正常执行时，会返回Variant类型的NULL，将之转换为一个string，会产生异常。

procedure TUser.ValidateUser(LoginCode, password: string);
var
    r: variant;
begin
   ...
    r := c.Request(...);
    if ((not VarIsNull(r)) and (r = 'OK')) then
    begin
         //用户合法
    end
    else
      ...
end;

标签：...,begin,调用,end,string,kbmMW,OK,服务端
来源： https://www.cnblogs.com/kinglandsoft/p/13582492.html

本站声明： 1. iCode9 技术分享网（下文简称本站）提供的所有内容，仅供技术学习、探讨和分享；
2. 关于本站的所有留言、评论、转载及引用，纯属内容发起人的个人观点，与本站观点和立场无关；
3. 关于本站的所有言论和文字，纯属内容发起人的个人观点，与本站观点和立场无关；
4. 本站文章均是网友提供，不完全保证技术分享内容的完整性、准确性、时效性、风险性和版权归属；如您发现该文章侵犯了您的权益，可联系我们第一时间进行删除；
5. 本站为非盈利性的个人网站，所有内容不会用来进行牟利，也不会利用任何形式的广告来间接获益，纯粹是为了广大技术爱好者提供技术内容和技术思想的分享性交流网站。

ICode9

调用kbmMW服务端方法经验一则