我想做一个接收邮件的客户端,用的是Idmessage和Idpop3控件,现在我在接收邮件的正文时不是没有内容就是一个邮件各个部分的综合,而我只想要它的正文请问哪位大哥做过这种系统,我的代码如下:
for j:=0 to idmessage1.MessageParts.Count-1 do
begin
if idmessage1.MessageParts.Items[j] is TIDtext then
begin
mailbody:=mailbody+TIDText(idmessage1.MessageParts.Items[j]).Body.text;
end
end;
for j:=0 to idmessage1.MessageParts.Count-1 do
begin
if idmessage1.MessageParts.Items[j] is TIDtext then
begin
mailbody:=mailbody+TIDText(idmessage1.MessageParts.Items[j]).Body.text;
end
end;
获得正文内容