Привет всем.

Вопрос такой.
Необходимо организовать рассылку.

Для реализации были выбраны средства Инди компонента.
Был найден пример правда на Delphi.
С отправлением письма без вложенных файлов проблем не возникло.
Проблема возникла когда попытался прикрепить файл с помощью класса
TidAttachment. Ни где примера на Builder где показаны принципы работы с ним
нет, и в help лишь описание методов и свойств.

Подскажите как этот класс использовать чтобы все заработало:
вот код для оправки письма и место где возникла загвоздка


IdSMTP1->Host = Edit3->Text;
IdSMTP1->Port = 25;
IdSMTP1->AuthenticationType = atLogin;
IdSMTP1->UserId = Edit4->Text;
IdSMTP1->Password = Edit5->Text;
IdMessage1->Body->Text = Memo1->Text;
IdMessage1->From->Text = Edit1->Text;
IdMessage1->Recipients->EMailAddresses = Edit2->Text;
IdMessage1->Subject = Edit6->Text;
IdSMTP1->Connect();
if (IdSMTP1->Connected())
{
if (!OpenDialog1->FileName.IsEmpty())
{
?????? // TIdAttachment Attach;
?????? // Attach.Create(IdMessage1->MessageParts,OpenDialog1->FileName);
}
IdSMTP1->Send(IdMessage1);
IdSMTP1->Disconnect();
}