ОШИБКА idattachment

[Satorin]

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, IdComponent, IdTCPConnection, IdTCPClient,
  IdExplicitTLSClientServerBase, IdMessageClient, IdSMTPBase, IdSMTP,
  IdBaseComponent, IdMessage, idattachment;

type
  TForm1 = class(TForm)
    Button1: TButton;
    Memo1: TMemo;
    IdMessage1: TIdMessage;
    IdSMTP1: TIdSMTP;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
IdSMTP1.Host:= 'smtp.mail.ru';
IdSMTP1.Port:= 25;
IdSMTP1.Username:= '66666';
IdSMTP1.Password:= '66666';
IdMessage1.From.Address:='patheticdeath@mail.ru';
IdMessage1.Subject:= 'тема';
IdMessage1.Body.Text:=Memo1.Text;
IdMessage1.Recipients.Add;
IdMessage1.Recipients.Items[0].Text:='vergil666@list.ru';
TIdAttachment.Create(IdMessage1.MessageParts,'C:\Pricep.txt');
IdSMTP1.Connect;
IdSMTP1.Authenticate;
IdSMTP1.Send(IdMessage1);
IdSMTP1.Disconnect;
end;

end.

[DCC Error] Unit1.pas(42): E2034 Too many actual parameters
[DCC Warning] Unit1.pas(42): W1020 Constructing instance of 'TIdAttachment' containing abstract method 'TIdAttachment.OpenLoadStream'
[DCC Error] Project1.dpr(5): F2063 Could not compile used unit 'Unit1.pas'

ИЗВИНИТЕ ЗА КАПС

[72Flou]

Сообщение от Satorin

TIdAttachment.Create(IdMessage1.MessageParts,'C:\Pricep.txt');

Попробуй так:

TIdAttachmentFile.Create(IdMessage1 .MessageParts,'C:\Pricep.txt');

[Алексей(axeka)]

Подскажите пожалуйста,
Я работаю в Embarcadero® Delphi® XE Version 15.0.3953.35171
возникает проблема:
мне нужно прикрепить обычный текстовый файл к сообщению(e-mail)
Т.е. после нажатия Button1 открывалась почта и сообщение с вложенным текстовым файлом, адрес которого задан в Edit1. Пользователю надо было лишь ввести почту получателя и нажать отправить.
______________________-
прочитав многие топики в интернете и опробовав предложенные варианты ничего не получилось так как, дельфи ругается на IdSMTP1.AuthenticationType:=atLogin ;
всегда.
Нужна ли мне вообще авторизация, если мне нужно просто открыть приложение Outlool и все!
Помогите пожалуйста кодом

[Avazart]

Может TIdFile ?

TIdAttachment вроде абстрактный.

[Stilet]

Одна тема - один автор.
Алексей(axeka) создавай свою, не лезь в чужую.