Anthropic | Web Search

Web Search aracı, Claude'un bir konuşma sırasında gerçek zamanlı bilgi için web'de arama yapmasını sağlar. Bu, Anthropic'in barındırdığı ve otomatik olarak yürüttüğü yerleşik bir sunucu tarafı aracıdır.

Basit Örnek

Web araması (web search) etkinleştirilmiş bir mesaj oluşturmak için kolaylık yöntemini kullanın.


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?'));

Gelişmiş Örnek

MaxUses gibi web arama aracı parametreleri üzerinde tam kontrol için türlenmiş sınıfları kullanın.


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;

Yerleşik Araç Türleri

Yanıt İçerik Türleri

Yerleşik araçlar kullanıldığında, yanıt ek içerik bloğu türleri içerebilir: