TsgcAIChat è un unico client di chat per sette provider di modelli linguistici di grandi dimensioni. Imposta Provider, imposta una chiave API e un modello, poi chiama Chat. Cambiare fornitore è questione di una sola assegnazione, il resto del tuo codice rimane invariato.
Un componente di chat indipendente dal provider. Mantiene la cronologia della conversazione, costruisce il corpo JSON specifico del provider, pilota il client API HTTP corrispondente e ti restituisce il testo dell'assistente, in una sola chiamata oppure token per token.
TsgcAIChat
Chat LLM indipendente dal provider
Win32 e Win64
sgcAI è autonomo. Questo componente è distribuito dentro sgcAI insieme al runtime sgcWebSockets Core su cui è costruito, quindi non c'è nessuna licenza base da acquistare.
Scegli il provider, imposta la chiave e il modello, chiama Chat. Le varianti in streaming e asincrone usano la stessa configurazione.
uses
sgcAI, sgcAI_Chat;
var
oChat: TsgcAIChat;
vAnswer: string;
begin
oChat := TsgcAIChat.Create(nil);
oChat.Provider := aicpAnthropic;
oChat.ChatOptions.ApiKey := 'sk-ant-...';
oChat.ChatOptions.Model := 'claude-sonnet-4-5';
oChat.ChatOptions.MaxTokens := 4096;
oChat.SystemMessage := 'You are a Delphi expert.';
oChat.MaxHistoryMessages := 20;
// Blocking call, returns the assistant text.
vAnswer := oChat.Chat('How do I keep a WebSocket connection alive?');
// Token by token, delivered on OnChatStream.
oChat.OnChatStream := OnChatStreamHandler;
oChat.ChatStream('Now explain it to a beginner.');
end;
procedure TForm1.OnChatStreamHandler(Sender: TObject;
const aChunk: string; var Cancel: Boolean);
begin
Memo1.Text := Memo1.Text + aChunk;
Cancel := StopRequested; // abort a long generation
end;// includes: sgcAI.hpp, sgcAI_Chat.hpp
TsgcAIChat *oChat = new TsgcAIChat(NULL);
oChat->Provider = aicpOpenAI;
oChat->ChatOptions->ApiKey = "sk-...";
oChat->ChatOptions->Model = "gpt-4o";
oChat->SystemMessage = "You are a Delphi expert.";
String vAnswer = oChat->Chat("How do I keep a WebSocket connection alive?");
// Local models: same code, no data leaves the machine.
oChat->Provider = aicpOllama;
oChat->ChatOptions->BaseUrl = "http://127.0.0.1:11434";
oChat->ChatOptions->Model = "llama3";
vAnswer = oChat->Chat("Same question, local model.");I membri che userai più spesso.
Provider seleziona il fornitore: aicpOpenAI, aicpAnthropic, aicpGemini, aicpDeepSeek, aicpOllama, aicpGrok o aicpMistral. Cambiarlo rilascia il client memorizzato in cache per il provider precedente.
ApiKey, Model, MaxTokens, Temperature, TopP e BaseUrl. Se lasci Temperature e TopP al valore predefinito, vengono omessi dalla richiesta e si applica quindi il valore predefinito del provider.
SystemMessage definisce la persona per ogni turno. MaxHistoryMessages limita quanti messaggi passati vengono ripetuti, il che contiene il costo in token. ClearHistory e GetHistory azzerano e leggono la trascrizione.
Chat blocca e restituisce la risposta. ChatStream trasmette in streaming su SSE. ChatWithSystem sovrascrive il prompt di sistema per un singolo turno. ChatAsync restituisce un future su Delphi 2010 e versioni successive.
OnChatMessage segnala ogni messaggio completato con il suo ruolo. OnChatStream consegna ogni blocco e porta con sé un flag Cancel. OnChatError espone gli errori del provider e del trasporto.
Con Provider impostato su aicpOllama, ChatOptions.BaseUrl punta il componente al tuo host Ollama, così i prompt e le risposte non lasciano mai la macchina.
Fonti autorevoli per i servizi e i protocolli usati da questo componente.
| Guida onlineRiferimento API completo e guida all'utilizzo dei componenti sgcAI. | Apri | |
| Tutti i componenti sgcAIEsplora la matrice completa delle funzionalità di tutti e 15 i componenti. | Apri | |
| Scarica la versione di prova gratuitaProva tutti e sette i provider con le tue chiavi API. | Apri | |
| PrezziLicenze Single, Team e Site, codice sorgente completo, nessun prodotto base richiesto. | Apri |