AI ChatBot-component — sgcWebSockets | eSeGeCe

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.
De beste deal: All-AccessElk eSeGeCe-product, inclusief Premium-ondersteuning, vanaf €1,059 per jaar.
Bekijk de All-Access-prijzen

Begin vandaag met het bouwen van AI ChatBots

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