•  

ГлавнаяIndyЧастые вопросы по Indy → Delphi 7 и Indy 10.1.5, как написать программу для отправки почты?

Создано: 17.05.2014 18:12:15 · Исправлено: 17.05.2014 18:12:15 · Прочтений: 1537

У меня Delphi 7 и Indy 10.1.5, пытаюсь написать программу для отправки почты. Тело должно быть на html и обязательно два вложения. Информацию беру с сайта http://www.indyproject.org/sockets/blogs/rlebeau/2005_08_17_a.en.aspx, всё вроде так делаю но не получается делфи ругается на TIdText (Undeclared identifier TIdText). Может вместо TIdText использовать что-то другое. Заранее спасибо.
with TIdText.Create(IdMessage1.MessageParts, nil) do begin
      ContentType := multipart/related; type=multipart/alternative;
    end;

    with TIdText.Create(IdMessage1.MessageParts, nil) do begin
      Body.Text := HTML goes here;
      ContentType := text/html;
      ParentPart := 1;
    end;

    with TIdAttachmentFile.Create(IdMessage1.MessageParts, c:\folder\image1.jpg) do begin
      ContentID := 12345;
      ContentType := image/jpeg;
      FileName := image1.jpg;
      ParentPart := 0;
    end;

    with TIdAttachmentFile.Create(IdMessage1.MessageParts, c:\folder\image2.jpg) do begin
      ContentID := 56789;
      ContentType := image/jpeg;
      FileName := image2.jpg;
      ParentPart := 0;
    end;
Что бы сделал я,если ругается на TIdText (Undeclared identifier TIdText) ?
- загрузил бы с сайта Help по Indy(если ещё нету:);
- нашёл в нём TIdText class;
- обнаружил бы,что это в IdText.pas;
- добавил бы в uses IdText;

но мне всё это не надо:)