INetMapiAttachmentCollection.Add

Синтаксис

Add: INetMapiAttachment;

Описание

Метод Add добавляет новое вложение к сообщению электронной почты.

Пример

Sub Main;

Var

Msg: INetMapiMessage;

Client: INetMapiClient;

Attach: INetMapiAttachment;

Begin

Client := New NetMapiClient.Create;

Msg := New NetMapiMessage.Create;

Msg.From_ := "ivanov@server.ru";

Msg.To_.Add("petrov@mail.ru");

Msg.Body := "Фото - Image.bmp";

Msg.Subject := "Фотография";

Attach := Msg.Attachments.Add;

Attach.Name := "Фото";

Attach.Path := "c:\Image.bmp";

Client.Message := Msg;

Client.Send;

End Sub Main;

После выполнения примера будет отправлено электронное письмо с помощью программы, установленной в операционной системе в качестве почтового клиента по умолчанию. К письму, в качестве вложения, будет присоединен файл "Image.bmp". В списке вложений данный файл будет отображаться с наименованием "Фото".

См. также:

INetMapiAttachmentCollection