Yapay Zeka ChatBot Bileşeni
İnsan benzeri etkileşimlerle konuşma tabanlı yapay zeka arayüzleri oluşturun. Önde gelen yapay zeka modelleriyle güçlendirilmiş, Delphi'de yerel olarak entegre edilmiştir.
İnsan benzeri etkileşimlerle konuşma tabanlı yapay zeka arayüzleri oluşturun. Önde gelen yapay zeka modelleriyle güçlendirilmiş, Delphi'de yerel olarak entegre edilmiştir.
Tak ve çalıştır sesli sohbet botu — mikrofon sesini yakalayın, Whisper ile metne dökün, ChatCompletions'a gönderin, yanıtı bir metinden konuşmaya sağlayıcısı aracılığıyla seslendirin.
TsgcAIOpenAIChatBot
OpenAI Whisper + Chat Completions üzerine kurulu ses ön yüzü
Windows, macOS, Linux, iOS, Android
Enterprise (yapay zeka eklentisi)
Bir TsgcAIOpenAIChatBot içine bir AudioRecorder + TextToSpeech takın, API anahtarını ayarlayın, Start çağırın.
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; // begin microphone capture; Stop ends it
// You can also push a turn programmatically:
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;
6 yayımlanmış özellik, 4 metot, 4 olay — bileşen referansından alınmıştır.
Yayımlanmış özellikler: OpenAIOptions, ChatBotOptions.
Yayımlanmış özellikler: Version.
Özellikler: TextToSpeech, AudioRecorder.
Özellikler: Embeddings.
Metotlar: ChatAsUser, ChatAsSystem.
Metotlar: Start, Stop.
Bu bileşenin uyguladığı protokoller için yetkili kaynaklar.
Bileşen referansına doğrudan bağlanın, çalışmaya hazır demo projesini alın ve denemeyi indirin.
| Çevrimiçi Yardım — TsgcAIOpenAIChatBot Bu bileşen için tam özellik, metot ve olay referansı. | Aç | |
| Demo Projesi — Demos\AI\ChatBot Çalışmaya hazır örnek proje. sgcWebSockets paketinin içinde gelir, aşağıdan denemeyi indirin. | Aç | |
| Teknik Belge (PDF) Özellikler, hızlı başlangıç, Delphi ve C++ Builder için kod örnekleri ve birincil kaynak referansları, yalnızca bu bileşen. | Aç | |
| Kullanıcı Kılavuzu (PDF) Kütüphanedeki her bileşeni kapsayan kapsamlı kılavuz. | Aç |