Delphi MCP 服务器提示词（3/4）

· 功能
在 sgcWebSockets 2025.9.0 中，Model Context Protocol（MCP）服务器现已支持提示词请求，使 AI 客户端能够查询和渲染动态提示词模板。此功能使得通过 WebSocket 使用 MCP 标准直接公开可复用的 AI 提示词（如"总结文本"或"审查代码"）成为可能。

什么是 MCP 提示词请求？

在 MCP 中，提示词是结构化模板，客户端可以发现并使用它们一致地生成模型输入。
每个 MCP 服务器公开：

  1. prompts/list — 枚举可用的提示词。
  2. prompts/get — 使用给定参数渲染特定提示词。
  3. notifications/prompts/list_changed — 当提示词目录变更时通知客户端。

这使大型语言模型或代理能够检索可用模板并使用上下文动态渲染它们。

列出提示词

当客户端调用 prompts/list 时，您的服务器应返回提示词定义数组，包括每个提示词的名称、描述和参数模式。

发布代码审查提示词的示例代码：

procedure TMainForm.FormCreate(Sender: TObject);
var
  oPrompt: TsgcAI_MCP_Prompt;
begin
  MCPServer.Prompts.Clear;
  oPrompt := MCPServer.Prompts.AddPrompt('CodeReview',
    'Asks the LLM to analyze code quality and suggest improvements');
  oPrompt.Arguments.AddArgument('code', 'The code to review', True);
end;

提示词请求

当客户端发出 prompts.call JSON-RPC 请求时，TsgcWSAPIServer_MCP 在触发 OnMCPRequestPrompt 事件之前，会将强类型请求对象（包括工具名称和提供的参数）进行水化处理。您的处理程序填充响应载荷，该载荷随后会连同成功的 HTTP 状态码一起序列化并返回给客户端。

典型的处理程序如下所示：

procedure TFRMMCPServer.MCPServerMCPRequestPrompt(Sender: TObject;
  const aSession: TsgcAI_MCP_Session; const aRequest: TsgcAI_MCP_Request_PromptsGet;
  const aResponse: TsgcAI_MCP_Response_PromptsGet);
begin
  if aRequest.Params.Name = 'CodeReview' then
  begin
    aResponse.Result.Description := 'Code review prompt';
    aResponse.Result.Messages.AddText('user',
      'Please review this Delphi code: ShowMessage(''Hello World'' ');
  end;
end;

随着 MCP 提示词集成到 sgcWebSockets 2025.9.0，开发者现在可以创建 AI 感知的 WebSocket 服务器，公开结构化、可发现且动态的提示词，弥合大型语言模型与实时应用程序数据之间的差距。

了解更多

如需深入文档和组件参考，请访问：

sgcWebSockets MCP 提示词服务器指南


以下提供 Delphi MCP 服务器 Windows 演示