powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Synapse подмена наименований вложений
2 сообщений из 2, страница 1 из 1
Synapse подмена наименований вложений
    #39540633
Фотография Megabyte
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Необходимо подменять в заголовке письма наименования реальных вложений.
Даже не знаю, в какую сторону смотреть:
1) настроек TMimepart
2) настроек Header.

Суть задачи изначально такова: Делаем небольшую crm для заказчика(т.е. задача не масштабная, а локальная). В этой crm пользователи будут прикреплять файлы с разными наименованиями.
Исходим из того, что пользователь может добавить вложение из другой ОС(прим. linux), наименование которого будет некорректно в win. Поэтому он и предложил хранить файлы с нашими фиктивными названиями на диске, а в базе хранить caption.
А при отправке письма подменять наименования на те, с какими сохранял пользователь.
А то не кошерно пользователю аттачи с другими названиями возвращать. :)

p.s. Нашел в инете по Indy какое-то свойство displayname как раз для подмены.
Есть ли что-то подобное для Synapse?
---
Проходя мимо разложенных граблей, ты теряешь драгоценный опыт. (с)
...
Рейтинг: 0 / 0
Synapse подмена наименований вложений
    #39540647
Фотография Megabyte
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В общем, сам разобрался. :)

Если вдруг кому понадобится:
tt: TMimepart - текущая часть письма\вложение.

Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
tt := FSynMsg.AddPartBinaryFromFile(Attachments[I], FSynMIMEPart); // добавление вложения
              // декодируем заголовок
              tt.DecodePartHeader; 
              // меняем название
              tt.FileName := 'new_name1.xls'; 
              tt.Description := 'Attached file: new_name1.xls';
              // снова кодируем заголовок
              tt.EncodePartHeader;
...
Рейтинг: 0 / 0
2 сообщений из 2, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Synapse подмена наименований вложений
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]