Отправка отчета по Email

BalBal
отредактировано 09:29 Раздел: FastReport 4.0
FastReport 4.4
Пытаюсь отправить отчет по Email.

Заполняю свойства frxMailExport:

frxMailExport.FromMail := dsCurrMailFROMMAIL.AsString;
frxMailExport.FromName := dsCurrMailFROMNAME.AsString;
frxMailExport.Subject := dsCurrMailSUBJECT.AsString;
frxMailExport.FromCompany := dsCurrMailORGANISATION.AsString;
frxMailExport.Signature.Clear;
frxMailExport.Signature.Add(dsCurrMailSIGNATURE.AsString);
frxMailExport.SmtpHost := 'localmail.lesnoy.local';
frxMailExport.SmtpPort := 25;
frxMailExport.Lines.Clear;
frxMailExport.Lines.Add(dsCurrMailLETTER.AsString);
frxMailExport.Address := dsCurrMailEMAIL_REPORT.AsString;

Далее в просмотре отчета нажимаю кнопку "Отослать по Email".
В появившемся окне "Отослать по Email" на вкладке "E-mail" вижу заполненные свойства,
а на вкладке "Ящик" НИ ОДНО свойство не заполняется. Почему?!
Самые критичные свойства:
frxMailExport.SmtpHost := 'localmail.lesnoy.local';
frxMailExport.SmtpPort := 25;
И отчет, естественно, не отправляется.

Пробовал на разных версиях Delphi: 5, 6, 2006. Результат одинаковый :-(

Спасибо!

Комментарии

  • gpigpi
    отредактировано 09:29
    FR 4.4.20 D7 Всё нормально
    Покажите полностью, как формируете отчёт, когда заполняете свойства фильтра
  • BalBal
    отредактировано 09:29
    gpi написал: »
    FR 4.4.20 D7 Всё нормально
    Покажите полностью, как формируете отчёт, когда заполняете свойства фильтра

    Отчет уже готов. Просто загружаю его из файла и пытаюсь отправить по почте. Причем заполнение свойств ставил и до Load и после. Пробовал по разному. Могу выслать тестовый пример, хотя он практически весь приведен ниже.

    Спасибо!

    procedure TForm1.Button1Click(Sender: TObject);
    begin
    frxMailExport.FromMail := 'bal55060@mail.ru';
    frxMailExport.FromName := 'bal55060@mail.ru';
    frxMailExport.Subject := 'Тема bal55060@mail.ru';
    frxMailExport.FromCompany := 'НЛК';
    frxMailExport.Signature.Clear;
    frxMailExport.Signature.Add('Подпись');
    frxMailExport.SmtpHost := 'localmail.lesnoy.local';
    frxMailExport.SmtpPort := 25;
    frxMailExport.Lines.Clear;
    frxMailExport.Lines.Add('Текст письма');
    frxMailExport.Address := 'bal55060@gmail.com';

    frxReport.LoadFromFile('111.FR3');
    frxReport.PrepareReport;
    frxReport.ShowPreparedReport;

    frxMailExport.ShowExportDialog := True;
    frxMailExport.ExportFilter := frxXLSExport;

    frxReport.Export(frxMailExport);
    end;

  • gpigpi
    отредактировано 09:29
    И так работает
    Выкладывайте тестовый проект
    Попробуйте обновить FR до 4.4.21
  • BalBal
    отредактировано 09:29
    gpi написал: »
    И так работает
    Выкладывайте тестовый проект
    Попробуйте обновить FR до 4.4.21

    Даю проект. Могу дать ехе-шник для проверки на мыло. Спасибо!

  • gpigpi
    отредактировано 09:29
    И проект работает. См ПМ
  • BalBal
    отредактировано 09:29
    gpi написал: »
    И проект работает. См ПМ
    На какой адрес можно выслать exe?
    Через форум не берет вложения.
  • gpigpi
    отредактировано 09:29
    e-mail в ПМ (проверьте свои сообщения)
  • BalBal
    отредактировано 09:29
    gpi написал: »
    e-mail в ПМ (проверьте свои сообщения)
    Торможу :-(
    ПМ - это что?
  • gpigpi
    отредактировано 09:29
    Посмотрите вверху страницы
    написал:
    Личные данные · Новые сообщения · Помощник · Друзья · Личных сообщений: 0
  • BalBal
    отредактировано 09:29
    gpi написал: »
    Посмотрите вверху страницы

    Я Вам послал письмо через форум. Спасибо!
  • gpigpi
    отредактировано 09:29
    Как сказал -=Den=-
    написал:
    проблема в том , что он не установил "запомнить настройки" , а использует реестр для их хранения/загрузки , нужно установить TfrxMailExport.UseIniFile := false

Оставить комментарий

Многофункциональный текстовый редактор. Чтобы отредактировать стиль параграфа, нажмите TAB, чтобы перейти к меню абзаца. Там вы можете выбрать стиль. По умолчанию не выбран ни один стиль. Когда вы выберете текст, появится встроенное меню форматирования. Нажмите TAB, чтобы войти в него. Некоторые элементы, такие как многофункциональные вставки ссылок, картинок, индикаторов загрузки и сообщений об ошибок могут быть вставлены в редактор. Вы можете перемещаться по ним, используя стрелки внутри редактора и удалять с помощью клавиш delete или backspace.