sgcAI Tu aplicación Delphi, ahora con IA. Sin puente de Python.

Quince componentes de paleta que llevan los modelos de lenguaje grandes, el Model Context Protocol, los embeddings, la búsqueda vectorial y la voz directamente a tu aplicación Delphi o C++ Builder. Un único componente de chat llega a OpenAI, Anthropic, Google Gemini, xAI Grok, DeepSeek, Mistral y Ollama a través de una sola propiedad. Sin runtime externo y sin nada extra que instalar en la máquina de destino.

Descargar la prueba Explorar los componentes

Haz tu primera pregunta a un modelo en diez líneas →

Delphi
C++ Builder
7 proveedores de LLM
Cliente y servidor MCP
Windows Win32 y Win64
Código fuente completo

15Componentes en una sola página de la paleta
7Proveedores de LLM tras una sola propiedad
3Motores de voz: System, Google, Amazon Polly
2Almacenes vectoriales: archivo local y Pinecone
1API unificada, las mismas llamadas para todos los proveedores

Míralo funcionar

Mira sgcAI en dos minutos.

Recorridos narrados y subtitulados de los componentes haciendo trabajo real. Elige uno de la lista. No se descarga nada hasta que pulsas reproducir.

Inicio rápido de sgcAI

Llama a modelos de OpenAI, Anthropic Claude, Gemini, Grok, DeepSeek, Mistral y Ollama local desde Delphi a través de un solo componente.

Proveedores

Siete proveedores, una propiedad `Provider` .

No son siete componentes. Son los siete valores de TsgcAIChatProvider, así que cambiar de proveedor cambia una sola asignación y nada más. Todos comparten las mismas llamadas Chat, ChatStream y ChatAsync con la misma gestión del historial y los mismos eventos.

OpenAIaicpOpenAI
Modelos GPT a través de la Chat Completions API.
AnthropicaicpAnthropic
Modelos Claude a través de la Messages API, con el mismo streaming y la misma gestión del historial que el resto.
Google GeminiaicpGemini
Modelos Gemini a través de la Google Generative Language API.
DeepSeekaicpDeepSeek
deepseek-chat y deepseek-reasoner.
OllamaaicpOllama
Modelos locales. Apunta ChatOptions.BaseUrl a tu host de Ollama y ningún dato sale de la máquina.
xAI GrokaicpGrok
Modelos Grok a través de la API de xAI.
MistralaicpMistral
Modelos Mistral a través de la API de Mistral.
Endpoints compatibles con OpenAI
Azure OpenAI, Groq, Together, LM Studio, vLLM y el servidor llama.cpp. Cambia el endpoint y la clave de API, conserva el código.

El almacenamiento vectorial también está cubierto, con embeddings escritos en un almacén de ficheros local o en Pinecone. Consulta los embeddings, la base de datos vectorial de archivo y Pinecone.

Inicio rápido

Diez líneas de Delphi, tokens en pantalla.

Elige un proveedor, define la clave y el modelo, llama a Chat. Cambiar más adelante a otro proveedor es una sola asignación.

uses
  sgcAI, sgcAI_Chat;
var
  oChat: TsgcAIChat;
  vAnswer: string;
begin
  oChat := TsgcAIChat.Create(nil);
  oChat.Provider := aicpAnthropic;
  oChat.ChatOptions.ApiKey := 'sk-ant-...';
  oChat.ChatOptions.Model := 'claude-sonnet-4-5';
  oChat.SystemMessage := 'You are a Delphi expert. Answer in one paragraph.';
  vAnswer := oChat.Chat('How do I keep a WebSocket connection alive?');

  // Same code, different vendor: one property and one key.
  oChat.Provider := aicpOpenAI;
  oChat.ChatOptions.ApiKey := 'sk-...';
  oChat.ChatOptions.Model := 'gpt-4o';
  vAnswer := oChat.Chat('Same question, different model.');
end;

// includes: sgcAI.hpp, sgcAI_Chat.hpp
TsgcAIChat *oChat = new TsgcAIChat(NULL);
oChat->Provider = aicpAnthropic;
oChat->ChatOptions->ApiKey = "sk-ant-...";
oChat->ChatOptions->Model = "claude-sonnet-4-5";
oChat->SystemMessage = "You are a Delphi expert. Answer in one paragraph.";
String vAnswer = oChat->Chat("How do I keep a WebSocket connection alive?");

// Same code, different vendor: one property and one key.
oChat->Provider = aicpOpenAI;
oChat->ChatOptions->ApiKey = "sk-...";
oChat->ChatOptions->Model = "gpt-4o";
vAnswer = oChat->Chat("Same question, different model.");

  // Token by token, delivered on OnChatStream.
  oChat.OnChatStream := OnChatStreamHandler;
  oChat.ChatStream('Now explain it to a beginner.');
end;

procedure TForm1.OnChatStreamHandler(Sender: TObject;
  const aChunk: string; var Cancel: Boolean);
begin
  Memo1.Text := Memo1.Text + aChunk;
  Cancel := StopRequested;   // abort a long generation
end;

uses
  sgcHTTP_API_Anthropic;

procedure TForm1.Ask;
begin
  FClaude := TsgcHTTP_API_Anthropic.Create(nil);
  FClaude.AnthropicOptions.ApiKey := 'sk-ant-...';
  FClaude.AnthropicOptions.AnthropicVersion := '2023-06-01';
  FClaude.OnHTTPAPISSE := OnDelta;

  FClaude._CreateMessageStream('claude-3-5-sonnet-latest',
    'Summarise order 10248 for the customer.', 1024);
end;

procedure TForm1.OnDelta(Sender: TObject; const aEvent, aData: string;
  var Cancel: Boolean);
begin
  Memo1.Text := Memo1.Text + aData;
end;

// sgcWebSockets .NET
using esegece.sgcWebSockets;

var claude = new TsgcHTTPAPI_Anthropic();
claude.AnthropicOptions.ApiKey = "sk-ant-...";
claude.AnthropicOptions.AnthropicVersion = "2023-06-01";

// .NET has no per-delta event: the streaming call returns the full text
Console.Write(claude._CreateMessageStream("claude-3-5-sonnet-latest",
    "Summarise order 10248 for the customer.", 1024));

uses
  sgcAI, sgcAI_MCP_Classes, sgcAI_MCP_Types;
var
  oMCP: TsgcWSAPIClient_MCP;
begin
  oMCP := TsgcWSAPIClient_MCP.Create(nil);
  // Remote server over streamable HTTP.
  oMCP.MCPOptions.Transport := aimcptrHttpStreamable;
  oMCP.MCPOptions.HttpOptions.URL := 'https://mcp.example.com/mcp';
  oMCP.MCPOptions.ClientInfo.Name := 'sgc-mcp-client';
  oMCP.MCPOptions.ClientInfo.Version := '1.0.0';
  oMCP.OnMCPListTools := MCPListTools;
  oMCP.OnMCPResponseTool := MCPToolResponse;
  oMCP.Initialize;
  oMCP.ListTools;
  oMCP.RequestTool('GetTemperature', vArguments); // vArguments: IsgcJSON
end;

// Or spawn a local MCP server as a subprocess instead:
oMCP.MCPOptions.Transport := aimcptrStdio;
oMCP.MCPOptions.StdioOptions.Command := 'C:\tools\my-mcp-server.exe';
oMCP.MCPOptions.StdioOptions.Arguments := '--stdio';

Streaming con un interruptor de paradaLos tokens llegan por OnChatStream con una bandera Cancel, así que una generación larga se puede detener a mitad de camino.
Asíncrono sin bloquear la interfazChatAsync devuelve un future en Delphi 2010 y posteriores, así que el hilo principal sigue respondiendo durante una llamada al modelo.
El estado de la conversación bajo tu controlSystemMessage define la personalidad una sola vez y MaxHistoryMessages limita cuánto de la transcripción se reenvía en cada turno, lo que mantiene predecible el coste en tokens.
Tu clave nunca sale de tu procesoLas peticiones van directamente de tu aplicación al endpoint del proveedor a través del cliente HTTP de sgc. No hay ningún relay de eSeGeCe en el camino.

Inicio rápido de sgcAI: una sola asignación a Provider lleva el mismo código Delphi de Anthropic a Mistral, y el código que llama sigue idéntico. — Una propiedad, siete proveedores: el código que llama sigue idéntico cuando cambia el proveedor.

Lee la guía de inicio rápido

Qué incluye

Quince componentes, cuatro tareas.

Cada componente es Object Pascal compilado con propiedades y eventos en tiempo de diseño. Defines una clave de API en el Object Inspector y gestionas un evento de respuesta. No hay puente de Python, ni host de scripting, ni proceso externo.

Chat y LLM

Ver →

TsgcAIChat
TsgcAIOpenAIChatBot
TsgcAIOpenAITranslator
TsgcAIOpenAIAssistant

Define Provider, ChatOptions.ApiKey y ChatOptions.Model, llama a Chat. Streaming en OnChatStream, llamadas a herramientas e historial de la conversación. TsgcAIDocumentExtractor convierte un PDF o una imagen en JSON validado, y TsgcAIVoiceAgent es un agente de voz en tiempo real sobre OpenAI Realtime o Gemini Live que escucha, responde hablando, permite que el usuario interrumpa y llama a tus herramientas.

Model Context Protocol

Ver →

TsgcWSAPIServer_MCP
TsgcWSAPIClient_MCP
HTTP
HTTP Streamable
stdio

Publica tus propias herramientas, prompts y recursos a cualquier cliente compatible con MCP, con sesiones, notificaciones y peticiones iniciadas por el servidor. Consume el servidor de otro, autenticándote con una clave de API, una cabecera personalizada u OAuth2. El único par multiplataforma.

Embeddings y búsqueda vectorial

Ver →

TsgcAIOpenAIEmbeddings
TsgcAIDatabaseVectorFile
TsgcAIDatabaseVectorPinecone

Convierte texto o un archivo entero en vectores, con eventos de progreso a lo largo del lote, y escríbelos en un archivo local que no necesita servidor, ni cuenta, ni viaje de red, o en un índice Pinecone gestionado. Después consulta el vecino más cercano para recuperar información de tu propio corpus.

Voz y audio

Ver →

TsgcTextToSpeechSystem
TsgcTextToSpeechGoogle
TsgcTextToSpeechAmazon
TsgcAudioRecorderMCI
TsgcAudioRecorderWave
TsgcAudioPlayerMCI

Captura el micrófono con la API MCI o Wave de Windows, transcribe con Whisper, envía el texto a un modelo y luego di la respuesta en voz alta. Tres motores de voz intercambiables comparten una misma interfaz, y uno de ellos no necesita clave de API ni red.

Ver todos los componentes y propiedades

Model Context Protocol

Tu lógica de negocio, invocable por un agente.

MCP es el protocolo abierto que permite a un host de IA descubrir y llamar a herramientas. Expón un método Pascal como herramienta y Claude Desktop o tu propio agente podrá invocarlo, con tu código decidiendo la respuesta.

Expón una herramientaLlama a Tools.AddTool('GetOrder', 'Return an order by id') y declara sus argumentos con InputSchema.Properties.AddProperty.
Registra el servidorEngancha TsgcWSAPIServer_MCP a un servidor HTTP, define el endpoint como /mcpy actívalo.
El agente la llamaEl host de IA lista tus herramientas, elige GetOrdery envía los argumentos que ha inferido de la conversación.
Tu código respondeOnMCPRequestTool se dispara con una petición tipada, rellenas la respuesta y el modelo lee tus datos como contexto.

Ambos lados del protocolo están incluidos. TsgcWSAPIServer_MCP convierte tu aplicación en un proveedor de herramientas, y TsgcWSAPIClient_MCP permite a tu aplicación consumir cualquier servidor compatible con MCP, llamando a sus herramientas, prompts y recursos por HTTP, HTTP Streamable o stdio. Estos dos no tienen restricción de plataforma y también compilan para macOS, Linux, iOS y Android.

Arquitectura

Por qué lo nativo gana a un sidecar de Python.

Acoplar un servicio Python a una aplicación Delphi significa dos runtimes, dos formas de desplegar y dos conjuntos de bugs. Estos componentes se compilan dentro de tu ejecutable.

Un solo binario que desplegar

El cliente de IA es un componente no visual enlazado en tu aplicación. No hay proceso sidecar que arrancar, supervisar o reiniciar, ni puerto en localhost que proteger.

Sin intérprete que distribuir

Nada que instalar con pip en la máquina del cliente, sin entorno virtual, sin fijar versiones. Código nativo compilado, exactamente como el resto de tu aplicación.

El mismo stack TLS

Las llamadas de IA viajan por el cliente HTTP de sgc, así que reutilizan la configuración de OpenSSL y SChannel, las opciones TLS y los timeouts que ya has definido para todo lo demás.

Autocontenido

El runtime sgcWebSockets Core, la pila del cliente HTTP, la capa JSON y el servidor HTTP que hay detrás de la API del servidor MCP vienen incluidos en sgcAI. Un solo SKU, un solo instalador.

sgcAI es un producto para Windows: 13 de los 15 componentes están registrados para Win32 y Win64. Los dos componentes MCP son la excepción y funcionan allí donde funcione la pila HTTP de sgc. Ver la tabla completa de plataformas.

Precios

Un producto independiente.

sgcAI se licencia por separado. Cada licencia incluye los 15 componentes de IA, LLM y MCP, el runtime sgcWebSockets Core, el código fuente completo, la redistribución libre de binarios y 1 año de actualizaciones.

Single

1 licencia de desarrollador. Uso en una máquina a la vez.

€149

Team

2 licencias de desarrollador. Uso en dos máquinas a la vez.

€249

Site

Desarrolladores ilimitados. Todas las máquinas de la empresa.

€399

La renovación se ofrece con un descuento del 50% al 70%, donde sgcAI, sgcMQ y sgcSocial cuentan cada uno como un pack. Los mismos componentes de IA y MCP se incluyen también en sgcWebSockets, con el par MCP en la edición Enterprise, y todos los productos están cubiertos por el paquete All-Access.

Ver precios y pedir

TESTIMONIOS

Qué dicen los desarrolladores

La confianza de desarrolladores de Delphi, C++ Builder, Lazarus y .NET que construyen aplicaciones en tiempo real y con IA en todo el mundo.

Vuestra librería sgcWebSockets es muy útil y fácil de configurar. ¡Seguid así!

Simone Moretti Desarrollador Delphi

sgcWebSockets es increíble y vuestro soporte es el mejor.

Christian Meyer Fundador y CTO

Muchas gracias por vuestra ayuda y soporte, me encantan vuestros componentes.

Mark Steinfeld CTO

Haz que tu aplicación sea nativa de IA esta semana.

Añade el componente, define tu clave de API y recibe tu primera respuesta en streaming. Código fuente completo, despliegue libre de royalties y sin ningún servicio relay en el camino.

Descargar la prueba Ver precios

Resumen del producto Inicio rápido Características TsgcAIChat Servidor MCP

Más de eSeGeCe

Otros productos de eSeGeCe

Los componentes de IA son solo una parte del stack. Todo lo de abajo lo construye el mismo equipo, con el mismo estilo y con código fuente completo.

sgcAI Tu aplicación Delphi, ahora con IA. Sin puente de Python.

Mira sgcAI en dos minutos.

Inicio rápido de sgcAI

Siete proveedores, una propiedad Provider .

Diez líneas de Delphi, tokens en pantalla.

Quince componentes, cuatro tareas.

Chat y LLM

Model Context Protocol

Embeddings y búsqueda vectorial

Voz y audio

Tu lógica de negocio, invocable por un agente.

Por qué lo nativo gana a un sidecar de Python.

Un solo binario que desplegar

Sin intérprete que distribuir

El mismo stack TLS

Autocontenido

Un producto independiente.

Single

Team

Site

Qué dicen los desarrolladores

Haz que tu aplicación sea nativa de IA esta semana.

Otros productos de eSeGeCe

sgcWebSockets

sgcHTML

sgcQUIC

sgcMQ

sgcAuth

sgcHTTP

sgcREST

sgcOpenAPI

sgcSign

sgcPDF

sgcBiometrics

sgcCrypto

sgcSocial

sgcIndy

Lo último del blog

Firmar un JWT con ML-DSA en Delphi

sgcUI 2026.10: 14 productos de interfaz nativa para Delphi, C++ Builder y .NET | Blog de eSeGeCe

OpenPGP en Delphi: cifrar, firmar y verificar sin GnuPG

Siete proveedores, una propiedad `Provider` .