Tfrxmailexport дата письма

отредактировано 04:38 Раздел: FastReport 4.0
Отправляю письмо через TfrxMailExport. Приходит письмо с датой 01,01,1970 02:00.
Где поправить, чтобы было нормально?

Delphi 2010, FR 4.10.1 Standard
var
  exEML: TfrxMailExport;
begin
  exEML := TfrxMailExport.Create(nil);
  try
    exEML.Address := 'barbaris@mail.com';
    exEML.Subject := 'Тема';
    exEML.Lines.Text := 'Текст';

    exEML.ShowProgress := False;
    exEML.UseIniFile := False;

    exEML.ShowExportDialog := False;
    exEML.FromMail := 'ХХХХХХХ@mail.ru';
    exEML.SmtpHost := 'smtp.mail.ru';
    exEML.SmtpPort := 25;
    exEML.Login := 'ХХХХХХХ';
    exEML.Password := '********';
    exEML.TimeOut := 60;
    exEML.ConfurmReading := False;

    try
      exEML.mail(exEML.SmtpHost, exEML.SmtpPort, exEML.Login, exEML.Password,
        exEML.FromMail, exEML.Address, exEML.Subject, '', exEML.Lines.Text, sl,
        exEML.TimeOut);
    except
      on E: Exception do
      begin
        writeln(E.Message);
        Halt(1);
      end;
    end;

  finally
    FreeAndNil(exEML);
  end;
  Halt(0);
end;

Комментарии

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

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