Indy 10,收邮件时如果判断邮件是否已经收过?

Question

Indy 10,收邮件时如果判断邮件是否已经收过，如收过则不用再收?我是这样写的。
但是这样的话就无法将邮件插入到tabmail中
procedure TMLMailMain_frm.RetrievePOPHeaders(inMsgCount: Integer);
var 
  intIndex: integer;
 begin
    for intIndex := 1 to inMsgCount do
    TabMail.First;
       while  not  TabMail.eof  do
        begin
            IF  TabMail.FieldByName('MailId').AsString<> Msg.MsgId THEN
            begin
               TbtnInsert.Click;
               DedtMailFrom.Text:=(Msg.From.Text);
               DedtMailTo.Text:=GetTitle(Msg.Recipients.EmailAddresses);
               DedtMailId.Text:=(Msg.MsgId);
                TbtnSave.Click;
                TabMail.Next;
            end;
  end;

Answer 1

ADODataSet,查询的是邮件表