AI ChatBot-component

Bouw conversationele AI-interfaces met mensachtige interacties. Aangedreven door toonaangevende AI-modellen, native geïntegreerd in Delphi.

TsgcAIOpenAIChatBot

Plug-and-play voice-ChatBot — vang microfoongeluid op, transcribeer met Whisper, stuur naar ChatCompletions en spreek het antwoord weer uit via een text-to-speech-provider.

Componentklasse

TsgcAIOpenAIChatBot

Protocol

Voice-front-end bovenop OpenAI Whisper + Chat Completions

Platforms

Windows, macOS, Linux, iOS, Android

Editie

Enterprise (AI-uitbreiding)

Plaats het component, stel een paar eigenschappen in en je bent klaar

Sluit een AudioRecorder + TextToSpeech aan op een TsgcAIOpenAIChatBot, stel de API-sleutel in en roep Start aan.

uses
  sgcAI, sgcAI_OpenAI, sgcAI_OpenAI_Audio_ChatBot,
  sgcAI_AudioRecorder_MCI, sgcAI_TextToSpeech_System;

var
  ChatBot: TsgcAIOpenAIChatBot;
  Recorder: TsgcAudioRecorderMCI;
  TTS:      TsgcTextToSpeechSystem;
begin
  Recorder := TsgcAudioRecorderMCI.Create(nil);
  TTS      := TsgcTextToSpeechSystem.Create(nil);

  ChatBot := TsgcAIOpenAIChatBot.Create(nil);
  ChatBot.OpenAIOptions.ApiKey := 'sk-...';
  ChatBot.AudioRecorder := Recorder;
  ChatBot.TextToSpeech  := TTS;

  ChatBot.OnAudioStart     := ChatBotAudioStart;
  ChatBot.OnAudioStop      := ChatBotAudioStop;
  ChatBot.OnTranscription  := ChatBotTranscription;
  ChatBot.OnChatCompletion := ChatBotChatCompletion;

  ChatBot.Start;  // start microfoonopname; Stop beëindigt deze

  // Je kunt ook programmatisch een beurt pushen:
  ChatBot.ChatAsUser('Tell me a joke about Delphi');
end;

procedure TForm1.ChatBotChatCompletion(Sender: TObject;
  const Role, Content: string);
begin
  memoLog.Lines.Add(Role + ': ' + Content);
end;

Wat zit erin

6 gepubliceerde eigenschappen, 4 methoden, 4 events — gehaald uit de componentreferentie.

Configuratie

Gepubliceerde eigenschappen: OpenAIOptions, ChatBotOptions.

Diagnostiek

Gepubliceerde eigenschappen: Version.

Audio

Eigenschappen: TextToSpeech, AudioRecorder.

RAG

Eigenschappen: Embeddings.

Chat

Methoden: ChatAsUser, ChatAsSystem.

Sessie

Methoden: Start, Stop.

Specificaties & referenties

Gezaghebbende bronnen voor de protocollen die dit component implementeert.

Documentatie & demo's

Diepe link naar de componentreferentie, pak het kant-en-klare demoproject en download de proefversie.

Online help — TsgcAIOpenAIChatBot Volledige referentie van eigenschappen, methoden en events voor dit component.
Demoproject — Demos\AI\ChatBot Kant-en-klaar voorbeeldproject. Inbegrepen in het sgcWebSockets-package — download de proefversie hieronder.
Technisch document (PDF) Functies, snelstart, codevoorbeelden voor Delphi & C++ Builder en primaire bronreferenties — alleen dit component.
Gebruikershandleiding (PDF) Uitgebreide handleiding die alle componenten in de bibliotheek behandelt.

Begin vandaag met het bouwen van AI ChatBots

Download de gratis proefversie en voeg conversationele AI binnen enkele minuten toe aan je Delphi-toepassingen.