procedure TForm1.btnSendClick(Sender: TObject); begin //Connecting to an SMTP service clSMTP1.Server := 'mail.test.com'; clSMTP1.UserName := 'sender@test.com'; clSMTP1.Password := 'secret'; clSMTP1.Open(); //Composing a new message clMailMessage1.BuildMessage('A message text follows here.', ['C:\MyFiles\MyDocument.zip']); clMailMessage1.From.FullAddress := 'sender@test.com'; clMailMessage1.ToList.Add('support@mywebsite.com'); clMailMessage1.Subject := 'Subject line'; //Sending the message clSMTP1.Send(clMailMessage1); //Closing the connection clSMTP1.Close(); end;
Trouble logging in? Simply enter your email address OR username in order to reset your password.
For faster and more reliable delivery, add admin@clevercomponents.com to your trusted senders list in your email software.