AI ChatBot コンポーネント
人間らしい対話による会話型 AI インターフェースを構築できます。主要な AI モデルを Delphi にネイティブ統合。
人間らしい対話による会話型 AI インターフェースを構築できます。主要な AI モデルを Delphi にネイティブ統合。
プラグアンドプレイのボイスチャットボット — マイク音声をキャプチャし、Whisper で文字起こしして ChatCompletions に送信し、テキスト読み上げプロバイダーで回答を音声出力します。
TsgcAIOpenAIChatBot
OpenAI Whisper + Chat Completions 上に構築されたボイスフロントエンド
Windows, macOS, Linux, iOS, Android
Enterprise (AI アドオン)
AudioRecorder と TextToSpeech を TsgcAIOpenAIChatBot に接続し、API キーを設定して Start を呼び出します。
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; // マイクキャプチャを開始; Stop で終了
// プログラム的にターンを送信することもできます:
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 個の published プロパティ、4 個のメソッド、4 個のイベント — コンポーネントリファレンスから抜粋。
Published プロパティ: OpenAIOptions、ChatBotOptions。
Published プロパティ: Version。
プロパティ: TextToSpeech、AudioRecorder。
プロパティ: Embeddings。
メソッド: ChatAsUser、ChatAsSystem。
メソッド: Start、Stop。
本コンポーネントが実装するプロトコルの正式な情報源です。
コンポーネントリファレンスへのディープリンク、すぐに実行できるデモプロジェクト、体験版のダウンロードをご利用ください。
| オンラインヘルプ — TsgcAIOpenAIChatBot 本コンポーネントのプロパティ、メソッド、イベントの完全なリファレンスです。 | 開く | |
| デモプロジェクト — Demos\AI\ChatBot すぐに実行できるサンプルプロジェクトです。sgcWebSockets パッケージに同梱されています — 下のリンクから体験版をダウンロードしてください。 | 開く | |
| 技術ドキュメント (PDF) 機能、クイックスタート、Delphi および C++ Builder のコードサンプルと一次情報源リファレンス — 本コンポーネントのみ。 | 開く | |
| ユーザーマニュアル (PDF) ライブラリ内のすべてのコンポーネントを網羅した包括的なマニュアルです。 | 開く |