TsgcWSAPIClient_MCP › Events › OnMCPListResources
Receives the resources catalogue returned by resources/list.
property OnMCPListResources: TsgcAI_MCP_Client_OnListResourcesEvent;
// TsgcAI_MCP_Client_OnListResourcesEvent = procedure(Sender: TObject; const aRequest: TsgcAI_MCP_Request_ResourcesList; const aResponse: TsgcAI_MCP_Response_ResourcesList) of object
—
Triggered after ListResources completes. Enumerate aResponse.Result.Resources to read each resource URI, Name, MIME type, size and annotations, and populate a tree view or file picker. Use aResponse.Result.NextCursor to iterate paginated catalogues.
procedure TMainForm.MCPListResources(Sender: TObject;
const aRequest: TsgcAI_MCP_Request_ResourcesList;
const aResponse: TsgcAI_MCP_Response_ResourcesList);
var
vI: Integer;
begin
ListBoxResources.Items.Clear;
for vI := 0 to aResponse.Result.Resources.Count - 1 do
ListBoxResources.Items.Add(aResponse.Result.Resources[vI].Uri);
end;