批量下载QQ邮箱中的所有附件 procedure TFrm_QQMailRev.bt_revClick(Sender: TObject); var i,j,fNum,fCount : integer; tmp, fName : string; begin bt_rev.Enabled := false; IdMessage1.CharSet := 'gb2312'; //保证附件正文汉字的正常显示 ProgressBar1.Max := mailcount; ProgressBar1.Min

IdPOP3 收邮件 IdPOP3中更改 邮件地址和密码就可以收到邮件标题和正文,删除已读邮件，亲自测试可用。