?由于目前delphi xe2 還不直接支持Android 的開發，因此kbmMW 客戶端的功能也沒辦法直接在Android 上運行。

由于kbmMW 為了與java 應用程序通訊，在企業版里面提供了一個JavaClinet. 具體文件名為kbmMWClient.jar。

而在basci4android 可以直接使用這個jar. 也就是說通過kbmMW 的javaclient 可以直接訪問kbmMW 的服務器。

當然由于客戶端沒有kbmMemTable的功能，一次只能是訪問遠程服務過程，無法直接實現數據庫的存取。

在Basci4android 里面訪問kbmMW 很簡單，只要引用kbmMWClient 庫就可以了。其他就非常類似delphi 客戶端了。

服務器就用我們以前的，主要是basci4android 客戶端的代碼。

'Activity module Sub Process_Globals'These global variables will be declared once when the application starts.'These variables can be accessed from all modules.End SubSub Globals'These global variables will be redeclared each time the activity is created.'These variables can only be accessed from this module.Dim SimpleClient As TkbmMWClientDim Ip As EditTextDim Port As EditTextDim mLog As EditText End SubSub Activity_Create(FirstTime As Boolean)Activity.LoadLayout("Main")Ip.Text = "127.0.0.1"Port.Text = "3000" End SubSub Activity_ResumeEnd SubSub Activity_Pause (UserClosed As Boolean)End SubSub ConnectBtn_ClickSimpleClient.Connect(Ip.Text,Port.Text) End Sub Sub SendBtn_Click Dim args(2) As Stringargs(0)=100mLog.Text="結果為"& SimpleClient.SendRequest ("xalion_srv","","SUMALL",args)End Sub

編譯運行，就可以成功調用服務端過程了。

怎么樣，還算方便吧。

目前對于遠程數據的訪問，可以通過返回JSON 傳，然后解析再顯示到客戶端。

更方便的操作，估計只能等到delphi 支持Android 了。

?

轉載于:https://www.cnblogs.com/xalion/archive/2012/04/26/2471092.html

總結

以上是生活随笔為你收集整理的使用delphi 开发多层应用（十三）使用Basic4android 直接访问kbmMW server的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。