msgcount:=pop.CheckMessages;
for index:=1 to msgcount do
begin
msg.Clear;
uidl:=pop.GetUIDL(index);
if dtable.Locate('uidl',uidl,[])=false then
begin
newmail:=newmail+1;
pop.RetrieveHeader(index,msg); end;
end;
这是我在indy 9下收取信头的程序。收取的信头中不仅有subject bcc cc etc..
可以通过 msg.Headers.Text 看到信头中的全部内容