Страница 2 из 4

Re: Telegram bot API

СообщениеДобавлено: 20.03.2019 15:26:05
Ichthyander
wadman писал(а):У меня сервер в РФ, да и бот нужен практически в личных целях, потому прокси актуален.

Да, прокси более чем актуален, согласен. В списке To-do для либы

Re: Telegram bot API

СообщениеДобавлено: 06.02.2020 18:23:04
Ichthyander
Маленький, но важный коммит. Со вчерашнего вечера телеграм API эндпоинт не поддерживает TLS1.1.
Также сегодня создал новую ветку для абстрагирования HTTP клиента от реализации, чтобы можно было использовать различные HTTP библиотеки (помимо родной, синапс и инди, к примеру)

Re: Telegram bot API

СообщениеДобавлено: 12.02.2020 23:59:32
Ichthyander
Добавлены поддержка HTTP прокси. Добавлены два брокера HTTP клиента. Родной FPHTTPClient (по умолчанию) и synapse. Для работы с прокси нужно будет подключить брокера tgsynapsehttpclientbroker.pas в uses в любом в принципе месте в проекте и указать данные HTTP прокси через свойства HTTPProxyHost/HTTPProxyPort/HTTPProxyUser/HTTPProxyPassword

Re: Telegram bot API

СообщениеДобавлено: 30.09.2020 11:33:26
Alek_Aaz
А клиента своего можно сделать на базе fp-telegram ? :roll:

Re: Telegram bot API

СообщениеДобавлено: 30.09.2020 11:45:11
Ichthyander
Если имеется ввиду телеграм мессенджер, то для него требуется другой API (telegram client API), такого нет ни в Delphi, ни FPC пока, к сожалению. Теоретически можно импортировать TdLib через C-заголовки, но я это не умею

Добавлено спустя 59 минут 6 секунд:
https://github.com/tdlib/td

Re: Telegram bot API

СообщениеДобавлено: 07.10.2020 09:26:00
Ichthyander
Кстати, если кто готов поддержать в развитии проекта, то можно замутить и Telegram API обертку и для мессенджера. Построим свой телеграм мессенджер с блекджеком... ;)

Re: Telegram bot API

СообщениеДобавлено: 18.10.2021 23:45:29
Ichthyander
Добавил библиотеку в OPM, добавлены методы sendVideoStream, sendMediaGroup by FileNames и другие усовершенствования.
Можно скачать готовый релиз в https://github.com/Al-Muhandis/fp-teleg ... g/v0.0.2.5
Добавлен модуль для расширенного функционала бота tgBot.pas

Re: Telegram bot API

СообщениеДобавлено: 24.11.2021 00:21:17
Master2KAZ
Приветствую!
А не могли бы вы написать пример Lonpolling Desktop с созданием меню бота?

Re: Telegram bot API

СообщениеДобавлено: 30.11.2021 01:41:46
Ichthyander
Привет. Странно, уведомления только сейчас пришло с форума. Я так понял это Вы уже потом меня на гитхабе спрашивали. Я там ответил. У Вас получилось разобраться с примерами, кстати?

Re: Telegram bot API

СообщениеДобавлено: 30.11.2021 10:12:23
Master2KAZ
Ichthyander писал(а):Привет. Странно, уведомления только сейчас пришло с форума. Я так понял это Вы уже потом меня на гитхабе спрашивали. Я там ответил. У Вас получилось разобраться с примерами, кстати?

Мне тоже только пришло. Я уже и забыл. У меня еще руки не дошли разбираться, работа мешает. На выходные планирую этим заняться. Как-то тяжеловато с РНР на Паскаль возвращаться)))

Re: Telegram bot API

СообщениеДобавлено: 09.03.2022 18:02:58
Ichthyander

Re: Telegram bot API

СообщениеДобавлено: 01.06.2022 23:28:37
ssm78
На raspberry pi с лазарем от первого марта 2019 года библиотека собралась только после правок в методе TTelegramSender.editMessageMediaStream

Код: Выделить всё
function TTelegramSender.editMessageMediaStream(aStream: TStream; media: TInputMedia; chat_id: Int64;
  message_id: Int64; inline_message_id: String; ReplyMarkup: TReplyMarkup): Boolean;
var
  sendObj: TStringList;
  aFileField, aFileName: String;
const
  _field='media';
begin
  Result:=False;
  sendObj:=TStringList.Create;
  with sendObj do
  try
    if chat_id<>0 then
      Add(s_ChatId+'='+IntToStr(chat_id));
    media.Media:='attach://'+_field;

    {$IF FPC_FULLVERSION <= 30004}
    Self.AddPair(sendObj,s_Media, media.AsJSON);
    {$ELSE}
    AddPair(s_Media, media.AsJSON);
    {$ENDIF}

    if message_id<>0 then
      Add(s_MessageId+'='+message_id.ToString);
    if inline_message_id<>EmptyStr then
      Add(s_InlineMessageId+'='+inline_message_id);
    if Assigned(ReplyMarkup) then
      Add(s_ReplyMarkup+'='+ReplyMarkup.AsJSON);
    aFileField:=_field;
    aFileName:=_field;
    Result:=SendStream(s_editMessageMedia, aFileField, aFileName, aStream, sendObj);
  finally
    Free;
  end;
end;


Но бот, правда, так и не заработал. Попробую разобраться.

Re: Telegram bot API

СообщениеДобавлено: 01.06.2022 23:51:28
Ichthyander
Сообщите версию пакет fp-telegram (в любом случае лучше использовать последнюю на гитхабе) и версию Лазаруса

Добавлено спустя 1 минуту 24 секунды:
Также сообщить, что пишется в логах, что именно не заработало

Re: Telegram bot API

СообщениеДобавлено: 01.06.2022 23:57:58
ssm78
fp-telegram взял с гитхаба.
Логов вообще никаких нет.
Скомпилировал пример LongPollingDesktop. Ввожу token, нажимаю кнопку Start get updates.
Всё, дальше тишина.
open-ssl стоит версии 1.1. Поставил из исходников с openssl.org

На windows этот же самый пример заработал на ура

Добавлено спустя 7 минут 32 секунды:
Версия лазаруса
[img]
https://i.ibb.co/DLzw81j/Untitled.jpg
[/img]

Re: Telegram bot API

СообщениеДобавлено: 02.06.2022 11:32:32
Ichthyander
Пока сложно сказать. Может стоит попробовать собрать на последних версиях Lazarus? По обратным отзывам многие запускают fp-telegram на малинке и у них работает

Добавлено спустя 5 часов 6 минут 32 секунды:
ssm78, кстати, спасибо, закоммитил ваше предложение по коду https://github.com/Al-Muhandis/fp-teleg ... dfdef4b380