Delphi 三层框架 DataSnap 的服务器端设置

Posted 2021-01-12 hopesun

elphi 三层框架 DataSnap 的服务器端设置：

DataSnap 框架有三个模块：DataSnap Server，Server Module，DataSnap Client Module。

当创新新的 DataSnap Server时，会产生三个文件，分别是：

     1）ServerForm 窗口文件； -----  可以扩展了此功能，使得 ServerContainer 可以启动、停止服务，并记录会话的产生、关闭。

                

     2）ServerContainer 服务容器；

          主要是：DSServer，DSTCPServerTransport，DSHTTPService，DSAuthenticationManager  它们相互引用，对应控件在面板上，但一般只需要一个。

          变动重点是：TDSServerClass 类的增加，在控件面板上可以找到相应的控件 ，可以增加多个。

           需要增加一个时注意：1）从面板由拉一个控件；2）设置其属性：Server 为已有的：DSServer；3）LifeCycle 属性一般设为：Sesssion，也可以是Server或者Invocation。    4）别忘记设置事件：OnGetClass， 在事件中，引入（Uses）服务模块，并 PersistentClass := utXX.TXX;   

                                             

     3）XXSysModu  服务模块  

         每增加一个服务 Server Module，需要新创建一个文件，继承  class(TDSServerModule) ，可以从 File/New/Other.../DataSnap Server/Server Module 菜单进行。

        增加 数据库连接组件 TFDConnection，TFDQuery，TDatasetProvider 等，向客户端提供服务。TDatasetProvider 的Options 参数，必须选上：poAllowCommandText，即允许客户端向 服务器端直接 传送 SQL 命令。

         这样产生的服务类，进行 Uses 引入到 ServerContainer 服务容器，并通过“容器”增加 TDSServerClass 类，通过事件OnGetClass，获得服务！！！

   

      提示，备忘！