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

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,获得服务!!!

   

      提示,备忘!

      

         

        

原文地址:https://www.cnblogs.com/hopesun/p/9785701.html