使用delphi 开发多层应用(十六)使用XMLRPC 实现basic4android 远程调用RTC服务

简介: RealThinClient (以下简称RTC) 也是一款delphi 多层开发的框架,由于其底层通讯协议是自己封装SOCK 库,抛弃了 大家诟病的indy,因此表现的非常稳定,效率也非常高,深受很多人的追捧。

    RealThinClient (以下简称RTC) 也是一款delphi 多层开发的框架,由于其底层通讯协议是自己封装SOCK 库,抛弃了

大家诟病的indy,因此表现的非常稳定,效率也非常高,深受很多人的追捧。由于RTC 是从底层通讯做起的,因此通讯层的

功能非常强,但是在中间层数据库功能虽然有所实现,但是没有kbmmw 和RO 强,但是对于普通的远程调用做的非常优雅。

同时它重点在于使用http 协议实现功能调用,因此与kbmmw 的适合场合不完全一样。

   由于RTC 可以非常快速的建立一个webserver, 因此要实现basic4android 程序访问RTC 的http 非常方便,但是由于直接访问

http 文本,服务器端与客户端都要做解析,不但编码起来麻烦,而且容易出问题。RTC 没有提供和KBMMW 一样的Java 客户端,

只能通过别的方式使basic4android 直接访问RTC 的远程函数,经过研究,发现RTC 支持XMLRPC远程调用,好,就拿这个开刀吧。

找了一下basic4android 的网站,呵呵,找到我们要的东西了,XMLRPC Library。  下载后解包,放到basic4android 的lib 目录。

   现在回到delphi 里面,先做一个简单RTC 应用服务器。

在form 上放置四个rtc 的控件

   server: TRtcHttpServer;
    RtcServerModule1: TRtcServerModule;
    RtcFunctionGroup1: TRtcFunctionGroup;
    RtcFunction1: TRtcFunction;

并放置一个按钮

对应的属性:

注意要设置ModuleFileName 为test.

procedure TForm1.Button1Click(Sender: TObject);
begin
   server.Listen();
   Button1.Caption:='已启动';
   Button1.Enabled:=False;
end;

 rtcfunction1 的执行代码为

procedure TForm2.RtcFunction1Execute(Sender: TRtcConnection;
  Param: TRtcFunctionInfo; Result: TRtcValue);
var
  num,allnum:integer;
  mynum:TRtcArray;
  i: Integer;
begin
    mynum:=param.asArray['params'];
    num:=mynum[0];
    allnum:=0;
    for i := 1 to num do
     allnum:=allnum+i;
    result.asInteger:=allnum;

end;

好了,服务器代码完成,编译运行,并点击启动按钮。

客户端,我们就利用XMLRPC Library自身所带的 例子,稍微改动一下,以便于对应我们的服务器。

Sub Activity_Create(FirstTime As Boolean)
    If FirstTime Then
        XMLRPC1.Initialize("XMLRPC1")
    End If
    
    Activity.AddMenuItem("initXMLRPC","mnuXMLRPC")
    Activity.AddMenuItem("Call Method","mnuMethod")
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

Sub mnuXMLRPC_Click
    XMLRPC1.initXMLRPCClient("http://192.168.1.105/test")
End Sub

Sub mnuMethod_Click
    'check whether x Is inside range 4..10
    Dim x As Int
    x = 100
    s=XMLRPC1.intCall("sumall",x)
   Msgbox(s,"")
    
    
     ' XMLRPC1.booleanCall3("isInside", x, 4, 10)
End Sub

好了,运行android 客户端,点击菜单,就会出现下面的界面。

 

好了,打完收工。

 

 

 

目录
相关文章
|
5天前
|
开发框架 前端开发 Android开发
安卓与iOS开发中的跨平台策略
在移动应用开发的战场上,安卓和iOS两大阵营各据一方。随着技术的演进,跨平台开发框架成为开发者的新宠,旨在实现一次编码、多平台部署的梦想。本文将探讨跨平台开发的优势与挑战,并分享实用的开发技巧,帮助开发者在安卓和iOS的世界中游刃有余。
|
10天前
|
搜索推荐 Android开发 开发者
探索安卓开发中的自定义视图:打造个性化UI组件
【10月更文挑战第39天】在安卓开发的世界中,自定义视图是实现独特界面设计的关键。本文将引导你理解自定义视图的概念、创建流程,以及如何通过它们增强应用的用户体验。我们将从基础出发,逐步深入,最终让你能够自信地设计和实现专属的UI组件。
|
12天前
|
Android开发 Swift iOS开发
探索安卓与iOS开发的差异和挑战
【10月更文挑战第37天】在移动应用开发的广阔舞台上,安卓和iOS这两大操作系统扮演着主角。它们各自拥有独特的特性、优势以及面临的开发挑战。本文将深入探讨这两个平台在开发过程中的主要差异,从编程语言到用户界面设计,再到市场分布的不同影响,旨在为开发者提供一个全面的视角,帮助他们更好地理解并应对在不同平台上进行应用开发时可能遇到的难题和机遇。
|
12天前
|
存储 API 开发工具
探索安卓开发:从基础到进阶
【10月更文挑战第37天】在这篇文章中,我们将一起探索安卓开发的奥秘。无论你是初学者还是有经验的开发者,这篇文章都将为你提供有价值的信息和建议。我们将从安卓开发的基础开始,逐步深入到更复杂的主题,如自定义组件、性能优化等。最后,我们将通过一个代码示例来展示如何实现一个简单的安卓应用。让我们一起开始吧!
|
13天前
|
存储 XML JSON
探索安卓开发:从新手到专家的旅程
【10月更文挑战第36天】在这篇文章中,我们将一起踏上一段激动人心的旅程,从零基础开始,逐步深入安卓开发的奥秘。无论你是编程新手,还是希望扩展技能的老手,这里都有适合你的知识宝藏等待发掘。通过实际的代码示例和深入浅出的解释,我们将解锁安卓开发的关键技能,让你能够构建自己的应用程序,甚至贡献于开源社区。准备好了吗?让我们开始吧!
24 2
|
14天前
|
XML 存储 Java
探索安卓开发之旅:从新手到专家
【10月更文挑战第35天】在数字化时代,安卓应用的开发成为了一个热门话题。本文旨在通过浅显易懂的语言,带领初学者了解安卓开发的基础知识,同时为有一定经验的开发者提供进阶技巧。我们将一起探讨如何从零开始构建第一个安卓应用,并逐步深入到性能优化和高级功能的实现。无论你是编程新手还是希望提升技能的开发者,这篇文章都将为你提供有价值的指导和灵感。
|
14天前
|
Android开发
布谷语音软件开发:android端语音软件搭建开发教程
语音软件搭建android端语音软件开发教程!
|
22天前
|
编解码 Java Android开发
通义灵码:在安卓开发中提升工作效率的真实应用案例
本文介绍了通义灵码在安卓开发中的应用。作为一名97年的聋人开发者,我在2024年Google Gemma竞赛中获得了冠军,拿下了很多项目竞赛奖励,通义灵码成为我的得力助手。文章详细展示了如何安装通义灵码插件,并通过多个实例说明其在适配国际语言、多种分辨率、业务逻辑开发和编程语言转换等方面的应用,显著提高了开发效率和准确性。
|
20天前
|
Android开发 开发者 UED
安卓开发中自定义View的实现与性能优化
【10月更文挑战第28天】在安卓开发领域,自定义View是提升应用界面独特性和用户体验的重要手段。本文将深入探讨如何高效地创建和管理自定义View,以及如何通过代码和性能调优来确保流畅的交互体验。我们将一起学习自定义View的生命周期、绘图基础和事件处理,进而探索内存和布局优化技巧,最终实现既美观又高效的安卓界面。
30 5
|
19天前
|
JSON Java Android开发
探索安卓开发之旅:打造你的第一个天气应用
【10月更文挑战第30天】在这个数字时代,掌握移动应用开发技能无疑是进入IT行业的敲门砖。本文将引导你开启安卓开发的奇妙之旅,通过构建一个简易的天气应用来实践你的编程技能。无论你是初学者还是有一定经验的开发者,这篇文章都将成为你宝贵的学习资源。我们将一步步地深入到安卓开发的世界中,从搭建开发环境到实现核心功能,每个环节都充满了发现和创造的乐趣。让我们开始吧,一起在代码的海洋中航行!