为何delphi6的demo--MailClient无法发送附件

Question

就是通过TIdMessage发送附件

Answer 1

先要把附件用Base64编码后然后再发送

Answer 2

TIdAttachment.Create(IdMsgSend.MessageParts, OpenDialog1.FileName);
在那里写base64编码啊

Answer 3

这样做到是发了，但也太麻烦了。如下：
在TIdAttachment.Create(IdMsgSend.MessageParts, OpenDialog1.FileName);
调用之前，先将OpenDialog1.FileName编码，并存储为临时文件。
然后发送、删除临时文件接收后，解码、还原成原文件还有更好的办法吗？

Answer 4

http://delphijl.99898.com/delphier/list.asp?id=660

Answer 5

用oe的com对象进行base编码解码速度是否会提高？//最近看com想到的，还没有时间进行试验。