kbmMW—制作一个简单服务

kbmMW—制作一个简单服务

今天仿着delphi窑洞洞主的例子做一个kbmMW 简单服务，功能是客户端调用服务器端的过程，完成一个累加的功能，并且与洞主的内容作比较，看升级后kbmMW的异同。以下部分是洞主的内容。

环境：DelphiXE10.2.2+kbm5.02

首先我们建立一个空白的vclform 应用程序，并放置几个控件，如图所示：

其中有三个控件，一个kbmMWSever1,一个kbmMWTCPIPIndyServerTransport1,还有一个就是启动按钮。

对应的属性如下：（基本没有怎么设置，都是默认）

并设置kbmMWTCPIPIndyServerTransport 的bindings 的ip 为0.0.0.0,端口为3000。

ip为0.0.0.0代表侦听本机所有的ip 地址。

Server属性:kbmMWServer1。

然后点file->new->others...出现kbmMW service wizard。

点ok,就出现了kbmMW的服务向导。

选择simple service 。这就是制作一个简单服务的向导。新的版本是红圈圈出来的两个选项。指的是listBox里的内容要不要排序。默认是不排序，另一个是按描述的内容排序。点下一步。

输入服务名，这个必须要注意，以后所有的调用都需要，我们这里把服务命名为YRSrv。

现在只有一个版本，因此版本号可以随便写，但是注意，这个版本号要填写，我自己曾经乱写，并在后面设置的时候与这个版本号不一致，导致无法得到计算结果。点下一步

这里是可选的，为了以后方便，可以把服务的说明写在这里。后面几个也是可选页面。