Объясните мне потоки

Вообщем хотелось бы попроситть помощи с потоками и их реализацией, вот допустим есть код такого вида:

Code:

for i:=0 to memo1.lines.count-1 do
begin
Data.Add('data[email]='+form3.Memo1.Lines[i]);
Data.Add('data[first_name]=');
Data.Add('data[last_name]=');
Data.Add('data[invitation]=');
cod:=form3.IdHTTP1.post('сайт',data);
sleep (2000);
if pos ('true',cod)<>0 then
begin
good:=good+1;
label1.Caption:=inttostr(good);
end;
end;

Суть кода в том что он берет мыло из мемо отправляет запрос, и делает задержку, вообщем хотелось сделать так чтобы так одновременно брало 10, 20.. и тд раз, причем не путала сами мыла (синхронизация), есть тут кто поможет с этим?

 

clear

 

Не нравиться не читай, хотелось узнать на конкретном примере, для меня так легче понять

 

Boolean +1.

Пора бы уже взять какую-нибудь книжку по дельфи и нормально выучить ЯП, тогда все станет понятнее. А так похоже на сборку программы, как конструктор : Один кусок на одном форуме написали, второй на другом......