tms sparkle创建server以及module实例

最新推荐文章于 2022-11-27 20:39:27 发布

原创

最新推荐文章于 2022-11-27 20:39:27 发布 · 1k 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#sparkle #server #module

本文详细介绍如何使用Sparkle框架创建服务器，通过模块化方式部署不同的HTTP请求处理单元。包括创建Sparkle服务器，定义三个处理模块（TSimpleModule、TSecondModule、TThirdModule），并在服务器启动时注册这些模块。

1、使用wizard创建sparkle服务器。

2、创建unit1、unit2、unit3单元文件。

unit Unit1;

interface

uses {...}
  System.SysUtils, Sparkle.HttpServer.Module, Sparkle.HttpServer.Context;//必须引用的单元

type
  TSimpleModule = class(THttpServerModule)//simple类
  public
    procedure ProcessRequest(const C: THttpServerContext); override;
  end;

implementation

procedure TSimpleModule.ProcessRequest(const C: THttpServerContext);//这里实现response功能
begin
  C.Response.StatusCode := 200;
  C.Response.ContentType := 'text/plain';
  C.Response.Close(TEncoding.UTF8.GetBytes('Test123'));//response的内容
end;

end.

unit Unit2;

interface

uses {...}
  System.SysUtils, Sparkle.HttpServer.Module, Sparkle.HttpServer.Context;

type
  TSecondModule = class(THttpServerModule)//second类
  public
    procedure ProcessRequest(const C: THttpServerContext); override;
  end;

implementation

procedure TSecondModule.ProcessRequest(const C: THttpSer