Форум программистов [Powered by Invision Power Board]

Код

void __fastcall TForm1::Button1Click(TObject *Sender) {
     //Данные для авторизация
    IdSMTP1->AuthenticationType=atLogin;
    IdSMTP1->Username="Товарищ_Сухов@online.ua"; //Ваш логин
    IdSMTP1->Password=" 12345"; // Пароль вашего мыла
    IdSMTP1->Host="smtp.online.ua"; // URL smtp сервера

     //Письмо
    IdMessage1->Body->Text="Душа моя рвется к вам, ненаглядная  Катерина  Матвеевна,  как  журавль  в
    небо. Однако случилась у нас небольшая заминка... Полагаю, суток на  трое....";  // Текст письма
    IdMessage1->From->Text="Товарищ_Сухов"; //  От кого
    IdMessage1->Recipients->EMailAddresses="Катерина_Матвеевна@online.ua"; //Кому
    IdMessage1->Subject=" абвгдеёжз "; //тема сообщения

     //Прикрепляем файл
     new TIdAttachment(IdMessage1->MessageParts,"C:\\фото.jpg");

      //Отправка
    IdSMTP1->Connect(10000); //Соединяемся с сервером
    IdSMTP1->Send(IdMessage1); //Отправляем письмо
    IdSMTP1->Disconnect(); //Разрываем связь с сервером
}