Cliente Telegram para Delphi

· Componentes

A família de componentes sgcTelegram combina o poder da Telegram Database Library oficial com a produtividade ágil do Delphi. Este artigo descreve como configurar e incorporar o componente em suas aplicações, apresenta casos de uso comerciais e destaca por que ele é um ativo estratégico para seus fluxos de comunicação.

Por que escolher o sgcTelegram para Delphi

Passos de configuração no Delphi

Siga estes passos para colocar o componente em um formulário VCL ou FMX e prepará-lo para uso em produção:

  1. Instale o pacote sgcWebSockets e adicione as units sgcTelegram ao seu projeto.
  2. Coloque um componente TsgcTelegramClient no formulário. Defina DatabasePath como uma pasta gravável onde o TDLib pode armazenar caches criptografados.
  3. Configure suas credenciais de API do Telegram. Atribua ApiId e ApiHash obtidos em my.telegram.org.
  4. Defina as propriedades ApplicationVersion, DeviceModel e SystemLanguageCode para alinhamento com os requisitos da plataforma Telegram.
  5. Conecte-se aos eventos de ciclo de vida (OnAuthorizationState, OnUpdateConnectionState, OnNewMessage) para autenticar, monitorar e responder às atualizações recebidas.
  6. Chame Connect em tempo de execução para iniciar a sessão TDLib e conduzir o fluxo de autenticação (número de telefone, código SMS ou token de bot).

Exemplo de código Delphi

O exemplo a seguir demonstra um console de notificações de nível comercial que faz login como bot, envia uma mensagem de boas-vindas e armazena as respostas dos clientes:

procedure TfrmTelegram.ConsoleAuthorize;
begin
  sgcTelegramClient1.Manager.LibraryPath := IncludeTrailingPathDelimiter(ExtractFilePath(ParamStr(0))) + 'tdlib';
  sgcTelegramClient1.Manager.DatabasePath := GetHomePath + PathDelim + 'TelegramCache';
  sgcTelegramClient1.ApiId := <YOUR_API_ID>;
  sgcTelegramClient1.ApiHash := '<YOUR_API_HASH>';
  sgcTelegramClient1.PhoneNumber := '<COMPANY_BOT_TOKEN>';
  sgcTelegramClient1.ApplicationVersion := '2.0';
  sgcTelegramClient1.DeviceModel := 'Retail Notification Hub';
  sgcTelegramClient1.SystemLanguageCode := 'en';
  sgcTelegramClient1.Options.UseTestDataCenter := False;
  sgcTelegramClient1.Connect;
end;
procedure TfrmTelegram.sgcTelegramClient1AuthorizationState(Sender: TObject;
  const AState: TsgcTelegramAuthorizationState);
begin
  if AState.State = asReady then
  begin
    sgcTelegramClient1.Messages.SendMessage('<CUSTOMER_CHAT_ID>', 'Your order has shipped! Track it via our portal.');
  end;
end;
procedure TfrmTelegram.sgcTelegramClient1NewMessage(Sender: TObject;
  const AMessage: TsgcTelegramMessage);
begin
  MemoConsole.Lines.Add(Format('[%s] %s', [DateTimeToStr(Now), AMessage.Content.Text.Text]));
end; 

Este trecho ilustra como configurar caminhos do sistema de arquivos, credenciais e handlers de eventos. Substitua os placeholders pelo seu token de bot de produção e identificadores de chat.

Vantagens para equipes Delphi


Inclua o componente Telegram no seu próximo lançamento para elevar as comunicações com clientes, acelerar a entrega de funcionalidades e desbloquear novas fontes de receita. Entre em contato com nossa equipe de vendas para pacotes de licenciamento ou consultorias personalizadas adaptadas ao seu segmento.