[Delphi] Wysyłanie maili

Jak można wysłać np. 100 maili, wygenerowanych programowo.
Oczywiście te maile nie mają być anonimowe, a wręcz przeciwnie - mają być wysyłane z mojego konta.
Jednak dokladnie chodzi o to, żeby rozsylaly sie one automatycznie, nie zostawialy sladu w "Elementach wyslanych" na koncie, i zeby nie bylo potrzeby potwierdzania wysylki poszczegolnych maili.

Hmmm - mam nadzieje ze to jakos logicznie wytlumaczylem. Prosze o informacje na ten temat.

--Umiem troche, ale nie wszystko :) a na koncu i tak BLUE SCREEN

edit2- ilość wysłanych maili
begin
repeat
NMSMTP1.Host := Edit1.Text;
NMSMTP1.Port := 25;
NMSMTP1.Connect;
NMSMTP1.PostMessage.FromAddress := Edit1.Text;
NMSMTP1.PostMessage.Subject := Edit2.Text;
NMSMTP1.PostMessage.ToAddress.Add(Edit3.Text);
NMSMTP1.PostMessage.Body.Assign(Memo1.Lines);
NMSMTP1.SendMail;
until Edit2.Text=IntToStr(0)
NMSMTP1.Disconnect;

sorry teraz jest dobrze i:integer
repeat
NMSMTP1.Host := Edit4.Text;
NMSMTP1.Port := 25;
NMSMTP1.Connect;
NMSMTP1.PostMessage.FromAddress := Edit1.Text;
NMSMTP1.PostMessage.Subject := Edit2.Text;
NMSMTP1.PostMessage.ToAddress.Add(Edit3.Text);
NMSMTP1.PostMessage.Body.Assign(Memo1.Lines);
NMSMTP1.SendMail;
i:=StrToInt(Edit1.Text);
i:=i-1;
Edit1.Text:=IntToStr(i);
until Edit2.Text=IntToStr(0);

NMSMTP1.Disconnect;

Dzięki
Też skorzystam :-) --I LOVE PrOgRaMz

Kurcze, az glupio mi sie jeszcze pytac, ale na serio nie wiem co mam wpisac w miejsce HOST.--Umiem troche, ale nie wszystko :) a na koncu i tak BLUE SCREEN

Host to jest np: poczta.interia.pl
Rocumisz...? Nie?
aha..
dobra no to jest adres serwera poczty wychodzącej (SMTP) czy jakoś tak rocumisz teraz? jeszcze nie no to nie zrocumiesz...

Delphi 7 (Architect)--Rastaroth