Sender: INetMailAddress;
The Sender property determines the address, to which the email server notification is sent in case of message delivery failure.
If the property value is not set, by default the notification is sent to the sender address.
Sub Main;
Var
SenderAdress, From_, To_: INetMailAddress;
Message: INetMailMessage;
Client: INetSmtpClient;
Begin
From_ := New NetMailAddress.Create("ivanov@server.ru");
To_ := New NetMailAddress.Create("123@mail.ru");
SenderAdress := New NetMailAddress.Create("admin1@mail.ru");
Message := New NetMailMessage.CreateWithFromAndTo(From_, To_);
Message.Subject := "Test letter";
Message.Body := "Letter body";
Message.Sender := SenderAdress;
Client := New NetSmtpClient.CreateWithHost("example.server.ru");
Client.Send(Message);
End Sub Main;
After executing the example the letter is sent via the specified mail server "123@mail.ru". In case of the delivery failure the corresponding notification is sent to the admin1@mail.ru address from the mail server.
See also: