モデルに話しかけ、モデルに話させる
TsgcAIChat が統一クライアントです。Provider を設定し、ChatOptions.ApiKey と ChatOptions.Model を指定して Chat を呼び出します。トークンのストリーミングは Cancel フラグ付きの OnChatStream に届き、ChatAsync は Delphi 2010 以降で future を返すため UI スレッドがブロックされることはありません。残りの 3 つは、音声を含む会話ループ全体をまとめています。