ОТПРАВКА ПОЧТЫ DELPHI
Delphi позволяет легко отправлять электронные письма из приложения, используя SMTP-клиент. SMTP-клиент позволяет отправлять письма с любых SMTP-серверов, которые поддерживают протокол SMTP.
Создание и отправка электронного письма в Delphi можно реализовать с помощью нескольких строк кода. Следующий пример демонстрирует, как отправить электронное письмо с использованием TIdSMTP компонента:
var IdSMTP: TIdSMTP; IdMessage: TIdMessage;begin IdSMTP := TIdSMTP.Create(nil); IdMessage := TIdMessage.Create(nil); try IdSMTP.Host := 'smtp.gmail.com'; IdSMTP.Username := 'yourusername@gmail.com'; IdSMTP.Password := 'yourpassword'; IdSMTP.Port := 25; IdSMTP.AuthType := satDefault; IdMessage.From.Name := 'Your Name'; IdMessage.From.Address := 'yourusername@gmail.com'; IdMessage.Recipients.EmailAddresses := 'recipient@example.com'; IdMessage.Subject := 'Test Message'; IdMessage.Body.Text := 'This is a test message.'; IdSMTP.Connect; try IdSMTP.Send(IdMessage); finally IdSMTP.Disconnect; end; finally IdMessage.Free; IdSMTP.Free; end;end;
В приведенном выше коде используется TIdSMTP компонент, который предоставляет доступ к функциям протокола SMTP. В примере создается экземпляр TIdSMTP и TIdMessage классов, настраивается подключение SMTP-клиента к серверу Gmail, устанавливается имя отправителя, адрес электронной почты, получателя, тема и текст сообщения. И наконец, вызывается метод Send(), который отправляет письмо.
Отправка письма в Delphi. Самый доступный способ.
Delphi скрытая отправка письма
Envio de email usando Delphi 10.4
Отправка email задним числом или из будущего Делфи
Урок на делфи 65. Отправка почты по smtp протоколу
Отправка писем с помощью PHPMailer
Send Email Using Gmail - Delphi 10