Delphi GEmail

Delphi-GEmail

Класс Delphi для отправки электронной почты с помощью Gmail.

Используйте образец:

  Gmail := TcfsGmail.Create( ' [email protected] ' , ' App password ' , ' From you/company ' );
  try
    try
      Gmail.Connect;
      Gmail.Send([ ' [email protected] ' ], ' Subject ' , ' PlainBody ' , ' htmlBody ' , ' AttachmentFile ' );
      // Gmail.Send(...);
      // Gmail.Send(...);
    except
      on E: Exception do
        ShowMessage(E.Message);
    end ;
  finally
    GEmail.Free;
  end ;
  

ПРИМЕЧАНИЕ 1. Добавьте в путь к исполняемому файлу две библиотеки openSSL: «libeay32.dll» и «ssleay32.dll».

ПРИМЕЧАНИЕ 2. Настройте свою учетную запись электронной почты «[email protected]», чтобы разрешить отправку писем из внешнего приложения: войдите в свои личные настройки (gmail), перейдите в «Безопасность»: активируйте «двухэтапную проверку» и добавьте «пароль приложения». или активируйте «Разрешить менее безопасные приложения»

Дополнительная информация: http://delphiprogrammingdiary.blogspot.com/2016/09/send-email-with-html-body-format-in.html http://www.andrecelestino.com/delphi-xe-envio-de- электронная почта-com-компоненты-indy/