Показать сообщение отдельно
  #2  
Старый 18.09.2022, 21:31
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,004
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Дык там же написано в самом файле.
См. строку перед собственно данными картинки:
Цитата:
PHOTO:ENCODING=BASE64;TYPE=JPG:
Тут и написано, что это Jpeg закодированный сверху в Base64.
Посмотри по файлу, может есть еще другие типы, но, думаю, что в основном будет только такое.

Ну а по коду чтения - в Indy есть готовый класс для кодировяния/декодирования. Я бы считал бы данные в TStringStream, из него раскодировал бы в TMemoryStream и в конце просто загрузил бы из потока прямо в TJpegImage. Как-то так.

ЗЫ. Там я вижу еще QUOTED=PRINTABLE кодирование строк есть. Для декодирования в Indy тоже есть соотв. класс.
Ответить с цитированием