TsgcWSAPIClient_MCP › Events › OnMCPListTools
Receives the tools catalogue returned by tools/list.
property OnMCPListTools: TsgcAI_MCP_Client_OnListToolsEvent;
// TsgcAI_MCP_Client_OnListToolsEvent = procedure(Sender: TObject; const aRequest: TsgcAI_MCP_Request_ToolsList; const aResponse: TsgcAI_MCP_Response_ToolsList) of object
—
Triggered after ListTools completes. Enumerate aResponse.Result.Tools to discover each tool Name, Title, Description and JSON input schema, and populate UI pickers or auto-generated command palettes. Use aResponse.Result.NextCursor to issue a follow-up ListTools call for paginated catalogues.
procedure TMainForm.MCPListTools(Sender: TObject;
const aRequest: TsgcAI_MCP_Request_ToolsList;
const aResponse: TsgcAI_MCP_Response_ToolsList);
var
vI: Integer;
begin
ListBoxTools.Items.Clear;
for vI := 0 to aResponse.Result.Tools.Count - 1 do
ListBoxTools.Items.Add(aResponse.Result.Tools[vI].Name);
end;