19 ноября, понедельник 18:32
Bankir.Ru

Объявление

Свернуть
Пока нет объявлений.

Почта из delphi

Свернуть
X
  • Фильтр
  • Время
  • Показать
Очистить всё
новые сообщения

  • Почта из delphi

    Помогите, кто чем может!
    Как на Дельфи отправить электронное письмо. В реальной жизни OutLook запускается ТОЛЬКО через SocksCap32. Все примеры из книжек поэтому выдают ошибку. Киньте пример, с коментариями, плиз!

  • #2
    Для Delphi 5 на закладке FastNet есть компонент TNMSMP. Для Delphi 6 на закладке Indy Clients компонент idSMTP

    Пример для Delphi 5

    var Mail : TNMSMP
    begin
    Mail.Host := MailHost; // адрес почтового сервера
    Mail.Port := MailPort; // порт по умолчанию 25
    Mail.PostMessage.LocalProgram := 'myProgram';
    Mail.PostMessage.Date := DateTimeToStr(Now); //когда
    Mail.PostMessage.FromName:=FromName; //от кого
    Mail.PostMessage.Subject := Subj; //Тема
    Mail.PostMessage.Body.Clear;
    Mail.PostMessage.Body.AddStrings(Body); // собственно тело
    // Mail.Charset := Charset; // кодовая страница
    Mail.PostMessage.ToAddress.Text := ToName; // кому

    Mail.Connect;
    end;
    на событии OnConnect пишем Mail.SendMail;
    на событии OnSuccess пишем Mail.Disconnect;

    Остальное в Help'е

    OutLook тут ни причем.

    Комментарий


    • #3
      2 Karol

      Слазь например на www.softforum.ru Я думаю там найдешь и это и много чего еще

      Комментарий

      Пользователи, просматривающие эту тему

      Свернуть

      Присутствует 1. Участников: 0, гостей: 1.

      Обработка...
      X