Telegram Delphi Client

· Komponenten

Die sgcTelegram-Komponentenfamilie verbindet die Stärke der offiziellen Telegram Database Library mit der schnellen Produktivität von Delphi. Dieser Artikel beschreibt, wie du die Komponente in deinen Anwendungen konfigurierst und einbettest, zeigt kommerzielle Anwendungsfälle und macht deutlich, warum sie ein strategischer Vorteil für deine Kommunikations-Workflows ist.

Warum sgcTelegram für Delphi

Konfigurationsschritte in Delphi

 Folge diesen Schritten, um die Komponente auf einem VCL- oder FMX-Formular zu platzieren und produktionsreif zu machen:

  1. Installiere das sgcWebSockets-Paket und füge die sgcTelegram-Units zu deinem Projekt hinzu.
  2. Platziere eine TsgcTelegramClient-Komponente auf dem Formular. Setze DatabasePath auf einen schreibbaren Ordner, in dem TDLib verschlüsselte Caches ablegen kann.
  3. Konfiguriere deine Telegram-API-Zugangsdaten. Weise ApiId und ApiHash zu, die du von my.telegram.org bekommst.
  4. Setze die Eigenschaften ApplicationVersion, DeviceModel und SystemLanguageCode passend zu den Vorgaben der Telegram-Plattform.
  5. Klinke dich in Lifecycle-Ereignisse (OnAuthorizationState, OnUpdateConnectionState, OnNewMessage) ein, um zu authentifizieren, zu überwachen und auf eingehende Updates zu reagieren.
  6. Rufe zur Laufzeit Connect auf, um die TDLib-Session zu starten und den Authentifizierungsablauf (Telefonnummer, SMS-Code oder Bot-Token) zu steuern.

Delphi-Code-Beispiel

Das folgende Beispiel zeigt eine kommerzielle Benachrichtigungs-Konsole, die sich als Bot anmeldet, eine Willkommensnachricht sendet und Kundenantworten speichert: 

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; 

 Dieser Ausschnitt zeigt, wie du Dateisystem-Pfade, Zugangsdaten und Ereignis-Handler konfigurierst. Ersetze die Platzhalter durch dein Produktions-Bot-Token und deine Chat-IDs.

Vorteile für Delphi-Teams


Nimm die Telegram-Komponente in dein nächstes Release auf, um die Kundenkommunikation zu verbessern, Features schneller auszuliefern und neue Umsatzquellen zu erschließen. Wende dich an unser Sales-Team für Lizenzpakete oder maßgeschneiderte Consulting-Angebote für deine Branche.