Het webzoekhulpmiddel stelt Claude in staat om op internet te zoeken naar realtime informatie tijdens een gesprek. Dit is een ingebouwd hulpmiddel aan serverzijde dat Anthropic host en automatisch uitvoert.
Gebruik de handige methode om een bericht te maken met webzoekopdrachten ingeschakeld.
Anthropic := TsgcHTTP_API_Anthropic.Create(nil);
Anthropic.AnthropicOptions.ApiKey := 'API_KEY';
WriteLn(Anthropic._CreateMessageWithWebSearch('claude-sonnet-4-20250514',
'What are the latest news about Delphi programming?'));
Gebruik de getypeerde klassen voor volledige controle over de parameters van het webzoekhulpmiddel, zoals MaxUses.
Anthropic := TsgcHTTP_API_Anthropic.Create(nil);
Anthropic.AnthropicOptions.ApiKey := 'API_KEY';
oRequest := TsgcAnthropicClass_Request_Messages.Create;
Try
oRequest.Model := 'claude-sonnet-4-20250514';
oRequest.MaxTokens := 4096;
// Add web search tool
oTool := TsgcAnthropicClass_Request_Tool.Create;
oTool.ToolType := 'web_search_20250305';
oTool.Name := 'web_search';
oTool.MaxUses := 5; // Max 5 searches per request
oTools := oRequest.Tools;
SetLength(oTools, 1);
oTools[0] := oTool;
oRequest.Tools := oTools;
oMessage := TsgcAnthropicClass_Request_Message.Create;
oMessage.Role := 'user';
oMessage.Content := 'Find the current price of Bitcoin.';
oMessages := oRequest.Messages;
SetLength(oMessages, 1);
oMessages[0] := oMessage;
oRequest.Messages := oMessages;
oResponse := Anthropic.CreateMessage(oRequest);
Try
for i := 0 to Length(oResponse.Content) - 1 do
begin
if oResponse.Content[i].ContentType = 'text' then
WriteLn(oResponse.Content[i].Text);
end;
Finally
oResponse.Free;
End;
Finally
oTool.Free;
oMessage.Free;
oRequest.Free;
End;
Wanneer ingebouwde tools worden gebruikt, kan de respons aanvullende inhoudsbloktypen bevatten: