Delphi DLL

Compare Two Emails by UIDL

Demonstrates the Chilkat Email.UidlEquals method, which returns true if this email's UIDL equals the UIDL of the email passed as the argument. The comparison is meaningful for messages obtained through POP3. This example gives two emails the same UIDL and compares them.

Background: A POP3 UIDL is a stable, unique identifier a server assigns to each message in a mailbox. Comparing UIDLs is how a client decides whether two message references point to the same server message — the basis for "leave messages on server" logic, where an app downloads a message once and skips it on later checks by remembering its UIDL.

Chilkat Delphi DLL Downloads

Download Chilkat for Delphi DLL

Delphi DLL

var
email1: HCkEmail;
email2: HCkEmail;
eq: Boolean;

begin
//  Demonstrates the UidlEquals method, which returns true if this email's UIDL equals the
//  UIDL of the email passed as the argument.  UIDLs are POP3 message identifiers.

email1 := CkEmail_Create();
CkEmail_AddHeaderField(email1,'X-UIDL','0000000123abcdef');

email2 := CkEmail_Create();
CkEmail_AddHeaderField(email2,'X-UIDL','0000000123abcdef');

//  Compare the two emails' UIDLs.
eq := CkEmail_UidlEquals(email1,email2);

if (eq = True) then
  begin
    Memo1.Lines.Add('The two emails have the same UIDL.');
  end
else
  begin
    Memo1.Lines.Add('The two emails have different UIDLs.');
  end;

CkEmail_Dispose(email1);
CkEmail_Dispose(email2);