Aquí tienes una presentación completa y optimizada para tu proyecto en GitHub, integrando las capacidades de TAiChat, TAiAudio y TAiDalle:
TAiChat es un componente diseñado para simplificar la integración de modelos de lenguaje de inteligencia artificial (LLM) en aplicaciones desarrolladas con Delphi. Este proyecto proporciona herramientas para interactuar con múltiples APIs líderes en la industria, como OpenAI, Anthropic, Gemini y más, brindando flexibilidad y poder a los desarrolladores para crear soluciones innovadoras.
El proyecto también incluye componentes adicionales, TAiAudio y TAiDalle, que expanden las capacidades a la transcripción de audio, síntesis de voz, y generación de imágenes.
var
Chat: TAiChat;
begin
Chat := TAiChat.Create(nil);
try
Chat.ApiKey := 'tu-api-key';
Chat.Model := 'gpt-4';
Chat.AddMessage('¿Cuál es la capital de Francia?', 'user');
ShowMessage(Chat.Run);
finally
Chat.Free;
end;
end;var
AiAudio: TAiAudio;
TranscriptionText: String;
begin
AiAudio := TAiAudio.Create(nil);
try
AiAudio.ApiKey := 'tu-api-key';
TranscriptionText := AiAudio.Transcription('ruta/audio.mp3', 'audio.mp3', 'Transcribe esto');
ShowMessage(TranscriptionText);
finally
AiAudio.Free;
end;
end;var
DalleComponent: TAiDalle;
GeneratedImage: TAiDalleFile;
begin
DalleComponent := TAiDalle.Create(nil);
try
DalleComponent.ApiKey := 'tu-api-key';
GeneratedImage := DalleComponent.Generate(
'Un bosque encantado al atardecer',
TiaSize1024, // 1024x1024
1 // Generar 1 imagen
);
GeneratedImage.Image.SaveToFile('bosque.png');
finally
DalleComponent.Free;
end;
end;System.Net.HttpClientSystem.JSONREST.ClientApiKey).Este proyecto está bajo la licencia MIT.
Gustavo Enríquez
¿Quieres contribuir? ¡Siéntete libre de hacer un fork y proponer mejoras!