[ContraVeneno]

Código Delphi [-]
MailItem.to_:='[email protected]'+';'+'[email protected]';

//MailItem.to_:='[email protected];[email protected]';

CC := '';
If trim(CorreoAlterno) = '' then 
 CC := ';'+CorreoAlterno;

MailItem.To_ := CorreoDestino+CC;

Edito:
Acabo de probar:

Código Delphi [-]
MailItem.to_:='[email protected]';
MailItem.cc:='[email protected]';

y me funcionó perfectamente...