Delphi - para enviar e-mails!!!

estoy utilizando delphi 6.0 y un objeto de la paleta de fastnet que se llama NMSNMTP.
este es el codigo que estoy utilizando y funciona pero no se envia a varios e-mails al mismo tiempo.

NMSMTP1.Host:= 'codetel.net.do';
NMSMTP1.Port := 25;

if not NMSMTP1.Connected then
NMSMTP1.Connect;

NMSMTP1.PostMessage.FromAddress := femails.Edit1.Text;
NMSMTP1.PostMessage.FromName := femails.Edit2.Text;
NMSMTP1.PostMessage.Subject := femails.Edit3.Text;
NMSMTP1.PostMessage.ToAddress.Add(femails.Edit4.Text);
NMSMTP1.PostMessage.ToCarbonCopy.Add(femails.Edit5.Text) ;
NMSMTP1.PostMessage.Body.Clear ;
NMSMTP1.PostMessage.Body.Add(femails.Memo1.Text);
NMSMTP1.SendMail;
NMSMTP1.Disconnect;
necesito enviarlo a muchos correos almismo tiempo preferiblemente con el carbon copy...

gracias de ante mano!!!