Telegram Delphi Client

· Bileşenler

sgcTelegram bileşen ailesi, resmi Telegram Database Library'nin gücünü Delphi'nin hızlı üretkenliğiyle harmanlar. Bu makale, bileşenin uygulamalarınızda nasıl yapılandırılacağını ve gömüleceğini açıklar, ticari kullanım senaryolarını gösterir ve iletişim iş akışlarınız için neden stratejik bir varlık olduğunu vurgular.

Delphi için neden sgcTelegram'ı seçmelisiniz

Delphi'de yapılandırma adımları

 Bileşeni bir VCL veya FMX formuna bırakmak ve üretim kullanımına hazırlamak için şu adımları izleyin:

  1. sgcWebSockets paketini kurun ve sgcTelegram birimlerini projenize ekleyin.
  2. Forma bir TsgcTelegramClient bileşeni yerleştirin. DatabasePath değerini, TDLib'in şifreli önbellekleri saklayabileceği yazılabilir bir klasöre ayarlayın.
  3. Telegram API kimlik bilgilerinizi yapılandırın. my.telegram.org adresinden elde ettiğiniz ApiId ve ApiHash değerlerini atayın.
  4. Telegram platform gereksinimleriyle uyumlu olmak için ApplicationVersion, DeviceModel ve SystemLanguageCode özelliklerini sağlayın.
  5. Gelen güncellemelerde kimlik doğrulamak, izlemek ve yanıt vermek için yaşam döngüsü olaylarına (OnAuthorizationState, OnUpdateConnectionState, OnNewMessage) bağlanın.
  6. TDLib oturumunu başlatmak ve kimlik doğrulama akışını (telefon numarası, SMS kodu veya bot belirteci) yürütmek için çalışma zamanında Connect çağırın.

Delphi kod örneği

Aşağıdaki örnek, bot olarak oturum açan, bir karşılama mesajı gönderen ve müşteri yanıtlarını saklayan ticari düzeyde bir bildirim konsolunu gösterir: 

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; 

 Bu kod parçası, dosya sistemi yollarının, kimlik bilgilerinin ve olay işleyicilerinin nasıl yapılandırılacağını gösterir. Yer tutucuları üretim bot belirtecinizle ve sohbet tanımlayıcılarınızla değiştirin.

Delphi ekipleri için avantajlar


Müşteri iletişimlerini geliştirmek, özellik sunumunu hızlandırmak ve yeni gelir akışlarının kilidini açmak için Telegram bileşenini bir sonraki sürümünüze dahil edin. Lisanslama paketleri veya sektörünüze özel danışmanlık hizmetleri için satış ekibimizle iletişime geçin.