TsgcHTTP_API_Anthropic › Eventos › OnHTTPAPISSE
Dispara para cada Server-Sent Event recebido de uma resposta Anthropic em streaming
property OnHTTPAPISSE: TsgcHTTPAPISSEEvent;
// TsgcHTTPAPISSEEvent = procedure(Sender: TObject; const aEvent, aData: string; var Cancel: Boolean) of object
—
Quando CreateMessage é invocado com streaming habilitado, o endpoint Anthropic POST /v1/messages retorna um text/event-stream. Este evento é disparado para cada frame SSE decodificado com aEvent (por exemplo, message_start, content_block_delta, message_stop) e aData (o payload JSON). Defina Cancel como True para abortar o stream antes de o servidor terminar de enviá-lo.
procedure TForm1.oAPIHTTPAPISSE(Sender: TObject; const aEvent, aData: string;
var Cancel: Boolean);
begin
if aEvent = 'content_block_delta' then
Memo1.Lines.Add(aData);
end;