Tfrxmailexport дата письма

barbaris

Отправляю письмо через 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;

barbaris

ап