BodyEncoding: CodePage;
The BodyEncoding property determines the code page used for message body encoding.
Sub Main;
Var
From_, To_: INetMailAddress;
Message: INetMailMessage;
Client: INetSmtpClient;
Begin
From_ := New NetMailAddress.Create("ivanov@server.ru");
To_ := New NetMailAddress.Create("petrov@mail.ru");
Message := New NetMailMessage.CreateWithFromAndTo(From_, To_);
Message.Subject := "Test message";
Message.Body := "Message text";
Message.SubjectEncoding := CodePage.KOI8U;
Message.BodyEncoding := CodePage.KOI8U;
Client := New NetSmtpClient.CreateWithHost("example.server.ru");
Client.Send(Message);
End Sub Main;
After executing the example the message is sent via the specified mail server. This message is created considering the sender and the recipient addresses without any copies sending. When sending the message the Cyrillic encoding (KOI8-U) is used for encoding the body and the header of the message.
See also: