Hola,
Ignoro si habrá otra forma, pero, desde luego, a mí me ha funcionado de este modo:
Código Delphi
[-]
Recipients.Add; Recipients[0].Name := 'Destinatario 1';
Recipients[0].Address := 'destinatario1@correo.com';
Recipients.Add; Recipients[1].Name := 'Destinatario 2';
Recipients[1].Address := 'destinatario2@correo.com';