Email Recipients - AddTo, AddCC, AddBcc, AddMultipleTo, AddMultipleCC, AddMultipleBcc

This example demonstrates the usage of AddTo, AddCC, AddBcc, AddMultipleTo, AddMultipleCC, and AddMultipleBcc.

Download Chilkat Email ActiveX

Download 32-bit Chilkat IMAP ActiveX (.msi)

Download All 32-bit Chilkat ActiveX Components (.zip)

Download All 64-bit Chilkat ActiveX Components (.zip)

uses
    Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
    Dialogs, StdCtrls,
    CHILKATMAILLib2_TLB,
    OleCtrls;

...

procedure TForm1.Button1Click(Sender: TObject);
var
email: CHILKATMAILLib2_TLB.IChilkatEmail2;

begin
//  An email can have any number of To, CC, or Bcc recipients.
email := CoChilkatEmail2.Create();

//  One recipient per AddTo, AddCC, or AddBcc call may be added:
//  The 1st argument is the friendly name, the 2nd argument
//  is the email address.
email.AddTo('Chilkat Support','support@chilkatsoft.com');
email.AddTo('Person 1','person1@chilkatsoft.com');
email.AddTo('Person 2','person2@chilkatsoft.com');
email.AddTo('Person 3','person3@chilkatsoft.com');

//  This email now has 4 "To" recipients.

//  Now add some CC recipients:
//  Note: the friendly name may be empty if desired...
email.AddCC('Person 4','person4@chilkatsoft.com');
email.AddCC('','person5@chilkatsoft.com');
email.AddCC('Person 6','person6@chilkatsoft.com');

//  Now the email has 7 total recipients (3 "To" and 4 "CC")

//  Now add some Bcc recipients:
email.AddBcc('','person7@chilkatsoft.com');
email.AddBcc('Person 8','person8@chilkatsoft.com');

//  Clear all recipients via ClearTo, ClearCC, and ClearBcc:
email.ClearTo();
email.ClearCC();
email.ClearBcc();

//  The email is now back to 0 recipients...

//  Add recipients just as before, but this time use
//  AddMultipleTo, AddMultipleCC, and AddMultipleBcc.
//  These methods accept a comma-separated list of
//  email addresses.  For example:

email.AddMultipleTo('Chilkat Support <support@chilkatsoft.com>, Person 1 <person1@chilkatsoft.com>, Person 2 <person2@chilkatsoft.com>, Person 3 <person3@chilkatsoft.com>');

email.AddMultipleCC('Person 4 <person4@chilkatsoft.com>, person5@chilkatsoft.com, Person 6 <person6@chilkatsoft.com>');

email.AddMultipleBcc('person7@chilkatsoft.com, Person 8 <person8@chilkatsoft.com>');

email.Body := 'this is a test';
email.Subject := 'this is a test';

//  Display the MIME:
Memo1.Lines.Add(email.GetMime());
end;