OpenAI로 AI 기반 Delphi 앱 만들기

2025년 11월 6일 · 컴포넌트

sgcAI OpenAI 컴포넌트는 Delphi 팀이 자연어 이해, 코드 생성, 대화 흐름을 기존 VCL 및 FMX 제품에 통합하는 스마트하고 수익성 있는 경험을 제공할 수 있게 해줘요. 단일 드롭인 컴포넌트로 SaaS 공급업체는 인프라를 재구축하지 않고도 AI 기반 어시스턴트, 자동화된 문서, 다국어 채팅을 제공할 수 있어요.

OpenAI 컴포넌트가 상업 프로젝트를 가속화하는 이유

빠른 출시: 완성된 REST, WebSocket, 스트리밍 지원으로 통합 시간을 몇 주에서 몇 시간으로 단축해요.
엔터프라이즈급 보안: TLS 1.3, HTTP/2, 프록시 호환성이 규제 배포 환경에서 고객 데이터를 보호해요.
확장 가능한 수익화: 멀티 테넌트 토큰 관리 및 속도 제한으로 ISV가 AI 기능을 프리미엄 부가 기능으로 재판매할 수 있어요.
크로스플랫폼 지원: Delphi로 빌드한 Windows, macOS, Linux, iOS, Android 대상에서 동일한 컴포넌트가 작동해요.

Delphi에서 OpenAI 컴포넌트 준비하기

최신 sgcWebSockets 패키지를 설치하고 프로젝트에 sgcAI_OpenAI 유닛이 포함되어 있는지 확인해요.
OpenAI 대시보드에서 OpenAI API 키를 생성하고 안전하게 보관해요 (환경 변수, 암호화된 INI, 시크릿 저장소).
폼 또는 데이터 모듈의 uses 절에 sgcAI.OpenAI를 추가해요.

설정 예제 (VCL 폼)

아래 코드 조각은 런타임에 TsgcOpenAI 컴포넌트를 설정해요. 대화를 시각화하려면 폼에 TButton, TMemo, TListBox를 추가해요.

uses
  System.SysUtils, sgcAI_OpenAI;
procedure TFormMain.FormCreate(Sender: TObject);
begin
  OpenAI := TsgcOpenAI.Create(Self);
  OpenAI.APIKey := GetEnvironmentVariable('OPENAI_API_KEY');
  OpenAI.DefaultModel := 'gpt-4o-mini';
  OpenAI.HTTP.Proxy.Host := 'proxy.company.local';
  OpenAI.HTTP.Proxy.Port := 8080;
  OpenAI.HTTP.Timeout := 15000;
  OpenAI.Streaming := True;
end;
procedure TFormMain.ButtonAskClick(Sender: TObject);
var
  LRequest: TsgcOpenAIChatRequest;
  LResponse: TsgcOpenAIChatResponse;
begin
  LRequest := TsgcOpenAIChatRequest.Create;
  try
    LRequest.Messages.Add('system', 'Answer as a senior support engineer.');
    LRequest.Messages.Add('user', MemoPrompt.Lines.Text);
    LResponse := OpenAI.Chat.Create(LRequest);
    try
      ListBoxHistory.Items.Add(LResponse.Choices[0].Message.Content);
    finally
      LResponse.Free;
    end;
  finally
    LRequest.Free;
  end;
end;

기회를 확장하세요

Delphi 벤더는 AI 코파일럿, 지식 검색, 오디오 전사를 구독 티어로 패키징하여 새로운 수익원을 창출할 수 있어요. 내장된 분석 이벤트와 토큰 회계로 참여도 측정, 업셀 정당화, 개인화된 고객 성공 워크플로 구축이 간단해요.