🚀 go-pugleaf

I'm using Indy 9 in BCB6. I can connect to a POP3 mailbox and find the 
number of messages in my mailbox. I can cycle through the messages with 
Retrieve() and read the subject of each message but I never get any 
value for Flags (in the TIdMessage object, I'm checking for the value 
mfRecent to see if a message has recently arrived but Flags is always = 
0) even though I've sent a recent message to the mailbox. No matter how 
many times I use this, I always get the same number for iMsg (the result 
of CheckMessages()) and a value of 0 for NewMsgCount (because idm->Flags 
is always = 0).

Here is my code (the ShowMessage() always shows the same, correct Subjects):

     int NewMsgCount = 0;
     Edit1->Text = String("Wait...");
     Application->ProcessMessages();
     IdPOP31->Connect();
     int iMsg = IdPOP31->CheckMessages();
     if( iMsg > 0 )
     {
         for( int iMsgNum = 1; iMsgNum <= iMsg; iMsgNum++ )
         {
             // also tried using 'this' instead of IdOPOP31
             // in next instruction to no avail
             TIdMessage *idm = new TIdMessage(IdPOP31);
             idm->Clear();
             if( IdPOP31->RetrieveHeader(iMsgNum, idm) )
             {
                 if( idm->Flags.Contains(mfRecent) )
                     NewMsgCount++;
                 ShowMessage(idm->Subject); // always works
             }
             delete idm;
         }
     }
     IdPOP31->Disconnect();
     // display number of recent messages?
     Edit1->Text = String(NewMsgCount);

Can anyone tell me what I'm doing wrong? Thank you.

Jim Dodd
Onset Computer Corp.