将邮件项目从一个文件夹移动到另一个文件夹

Question

如何将邮件从一个邮箱（用户文件夹）移动到同一邮件帐户中的另一个邮箱（用户文件夹）。我们的邮件服务器支持IMAP和POP3协议。我使用的是Delphi 2010

Answer 1

只有IMAP协议才能在文件夹之间移动消息。 Indy确实有一个TIdIMAP4组件。

但是，IMAP协议没有定义单个命令来移动消息。您必须先将邮件复制到所需的邮箱（使用TIdIMAP4.CopyMsg()或TIdIMAP4.UIDCopyMsg()方法），然后删除原始邮件（使用TIdIMAP4.DeleteMsgs()或TIdIMAP4.UIDDeleteMsg()方法，准备好时用TIdIMAP4.ExpungeMailBox()方法。