哈哈，发现了indy9的一条大虫。(0分)

以base64编码的邮件用indy收时都是空的
是indy 9.0中的　MailClient　部分代码


if ( Msg.MessageParts.Items[intIndex] is TIdAttachment ) then
begin //general attachment
pnlAttachments.visible := true;
li := lvMessageParts.Items.Add;
li.ImageIndex := 8;
li.Caption := fun_CheckTxt(TIdAttachment( Msg.MessageParts.Items[intIndex] ).Filename );
li.SubItems.Add( fun_CheckTxt(TIdAttachment( Msg.MessageParts.Items[intIndex] ).ContentType ));
end
else
begin //body text
if Msg.MessageParts.Items[intIndex] is TIdText then
begin
Memo1.Lines.Clear;
Memo1.Lines.AddStrings( TIdText( Msg.MessageParts.Items[intIndex] ).Body );
end
end;

indy9的虫子还挺多的，呵呵。

Indy9问题多了!