Delphi MCP Server
Baue Model-Context-Protocol-(MCP-)Server in Delphi. Stelle Tools, Ressourcen und Prompts für KI-Anwendungen bereit.
Baue Model-Context-Protocol-(MCP-)Server in Delphi. Stelle Tools, Ressourcen und Prompts für KI-Anwendungen bereit.
Stelle deine eigenen Tools, Prompts und Ressourcen für jeden MCP-fähigen LLM-Client bereit. Hostet einen JSON-RPC-Endpunkt mit HTTP- und HTTP-Streamable-Transporten auf Basis eines sgcWebSockets-HTTP-Servers.
TsgcWSAPIServer_MCP
Model Context Protocol Server, Spezifikation 2026-07-28 mit 2025-11-25-Abwärtskompatibilität
Windows, macOS, Linux, iOS, Android
Enterprise (KI-Add-on)
An einen HTTP-Server anhängen, ServerInfo befüllen, die OnMCPRequest*-Handler verbinden und Active := True setzen.
uses
sgcAI_MCP_Server, sgcAI_MCP_Classes;
var
MCP: TsgcWSAPIServer_MCP;
begin
MCP := TsgcWSAPIServer_MCP.Create(nil);
MCP.MCPOptions.HttpOptions.Port := 8080;
MCP.MCPOptions.ServerInfo.Name := 'sgc-mcp-server';
MCP.MCPOptions.ServerInfo.Title := 'Weather MCP';
MCP.MCPOptions.ServerInfo.Version := '1.0.0';
// Lifecycle + incoming request handlers
MCP.OnMCPInitialize := SrvInitialize;
MCP.OnMCPSessionNew := SrvSessionNew;
MCP.OnMCPRequestTool := SrvCallTool;
MCP.OnMCPRequestPrompt := SrvGetPrompt;
MCP.OnMCPRequestResource := SrvReadResource;
MCP.Active := True;
// Push a notification to every connected session
MCP.SendNotificationToolsListChanged;
end;5 veröffentlichte Eigenschaften, 9 Methoden, 12 Ereignisse — aus der Komponentenreferenz übernommen.
Methoden: KeepAlive.
Ereignisse: OnMCPHTTPRequest, OnMCPHTTPResponse.
Veröffentlichte Eigenschaften: MCPOptions, EndpointOptions, TransportOptions.
Veröffentlichte Eigenschaften: Version.
Eigenschaften: Server.
Methoden: RequestRootsList, RequestSamplingCreateMessage, RequestElicitationCreate.
Zustandslose Anfragen mit _meta pro Anfrage, server/discover, Validierung der Mcp-Method / Mcp-Name / Mcp-Param-Header und Cache-Hinweise (MCPOptions.Cache). Clients mit 2025-11-25 nutzen weiterhin initialize und Sitzungen auf demselben Server.
subscriptions/listen überträgt Listenänderungen und Ressourcen-Updates als Stream. Optionen: MCPOptions.Subscriptions. Methode: CloseSubscriptions.
Fordere vom Client Elicitation (Formular oder URL), Sampling oder Roots aus einem Tool heraus an, mit aResponse.InputRequired. Der requestState ist HMAC-signiert (MCPOptions.MRTR).
io.modelcontextprotocol/tasks für lang laufende Tools. Methode: CreateTask. Optionen: MCPOptions.Tasks.
Maßgebliche Quellen für die Protokolle, die diese Komponente implementiert.
Springe direkt zur Komponentenreferenz, hole dir das sofort lauffähige Demo-Projekt und lade die Testversion herunter.
| Demo-Projekt — Demos\AI\MCP\Server Sofort lauffähiges Beispielprojekt. Wird im sgcWebSockets-Paket mitgeliefert — lade unten die Testversion herunter. | Öffnen | |
| Technisches Dokument (PDF) Funktionen, Schnellstart, Code-Beispiele für Delphi & C++ Builder und Primärquellen-Referenzen — nur diese Komponente. | Öffnen | |
| Benutzerhandbuch (PDF) Umfassendes Handbuch, das jede Komponente der Bibliothek abdeckt. | Öffnen |
TsgcWSAPIServer_MCP-Komponente, setze MCPOptions.HttpOptions.Port und MCPOptions.ServerInfo, binde die OnMCPRequest*-Handler ein und setze dann Active := True. Sie hostet einen JSON-RPC-Endpunkt auf Basis eines sgcWebSockets-HTTP-Servers.
TransportOptions und EndpointOptions konfiguriert.
OnMCPRequestTool für Tool-Aufrufe, OnMCPRequestPrompt für Prompts und OnMCPRequestResource für Ressourcen. Du kannst auch Aktualisierungen an jede verbundene Sitzung senden, zum Beispiel mit SendNotificationToolsListChanged.
RequestRootsList, RequestSamplingCreateMessage und RequestElicitationCreate, sodass der Server den verbundenen MCP-Client nach Roots, Sampling-Completions oder Benutzereingaben fragen kann. Bei MCP 2026-07-28 laufen dieselben Anfragen als Multi Round-Trip Requests (MRTR): Der Tool-Handler befüllt aResponse.InputRequired, zum Beispiel mit AddElicitation, und liest die Antworten beim wiederholten Aufruf mit InputResponse.
server/discover, subscriptions/listen, Multi Round-Trip Requests und die Tasks-Erweiterung) und bleibt vollständig abwärtskompatibel zu 2025-11-25-Clients, die initialize und Sitzungen verwenden. Beide Epochen werden von derselben Komponente bedient, die Epoche wird bei jeder Anfrage erkannt. Verfügbar in sgcWebSockets 2026.10.0 für Delphi 7 bis Delphi 13 und im .NET-Paket.