Delphi 2010 使用IdSMTP发送含附件的Email

[cate]

程序原本在Delphi 2007下编译通过，现在在2010下有两个错误

TidAttachment.Create(IdMessage.MessageParts,OutPath + '\'+ FormatDateTime('YYYYMMDD',frmMain.dtpDate.Date)+'.xls');

IdSMTP.AuthenticationType:=atLogin;

编译提示错误如下:
[DCC Error] Main.pas(444): E2003 Undeclared identifier: 'TidAttachment'
[DCC Error] Main.pas(444): E2066 Missing operator or semicolon
[DCC Error] Main.pas(444): E2010 Incompatible types: 'TComponent' and 'TIdMessageParts'

[DCC Error] Main.pas(446): E2003 Undeclared identifier: 'AuthenticationType'
[DCC Error] Main.pas(446): E2003 Undeclared identifier: 'atLogin'

经查找，Delphi 2010需要uses IdAttachment,在uses单元增加IdAttachment后
编译提示错误如下:
[DCC Error] Main.pas(444): E2034 Too many actual parameters
[DCC Warning] Main.pas(444): W1020 Constructing instance of 'TIdAttachment' containing abstract method 'TIdAttachment.OpenLoadStream'

[DCC Error] Main.pas(446): E2003 Undeclared identifier: 'AuthenticationType'
[DCC Error] Main.pas(446): E2003 Undeclared identifier: 'atLogin'

帮忙,帮忙。国庆宅在家里的都来帮忙吧。反正闲着也是闲着。

[大风吹过脸颊]

使用错误：

代码如下：
TIdAttachmentFile.Create(IdMessage1.MessageParts,sendfile); //添加附件 //要引用IdAttachmentFile单元

[kaikai_kk]

D2010用TIdAttachmentFile

uses IdAttachmentFile;

[cate]

[Quote=引用 1 楼 的回复:]
使用错误：

代码如下：
TIdAttachmentFile.Create(IdMessage1.MessageParts,sendfile); //添加附件 //要引用IdAttachmentFile单元
[/Quote]

uses IdAttachmentFile
IdAttachmentFile.Create(IdMessage.MessageParts,OutPath + '\'+ FormatDateTime('YYYYMMDD',dtpDate.Date)+'.xls');
提示错误:
[DCC Error] Daily_Report_Unit.pas(79): E2003 Undeclared identifier: 'Create'

IdAttachmentFile没有Create方法？

[kaikai_kk]

TIdAttachmentFile

[cate]

[Quote=引用 4 楼 的回复:]

TIdAttachmentFile
[/Quote]
感谢
正确代码:

uses IdAttachmentFile

TIdAttachmentFile.Create(IdMessage.MessageParts,OutPath + '\'+ FormatDateTime('YYYYMMDD',dtpDate.Date)+'.xls');

多谢啦，有问题再请教。

[javamy011]

好帖子啊，学习啦！！