Здравствуйте, только начал работать с потоками, пытаюсь разобраться, вот написал код:
Код:
procedure MyThread.Execute;
begin
//HTTP.Get('http://www.ya.ru');
Form1.Memo1.lines.add(str);
end;
procedure MyThread.htmlnavi;
begin
//HTTP.Get('http://www.ya.ru');
end;
procedure TForm1.Button1Click(Sender: TObject);
var i: integer;
begin
for i:=0 to 6 do begin
with MyThread.Create(true)do
begin
str:='Aaa'+inttostr(i);
Resume;
end;
end;
Получается, что здесь я создаю 6 потоков MyThread, а MyThread.Execute -это самый главный поток через который можно рулить созданными потоками ? В memo1 получается результат: Aaa6 (6 раз), а как мне сделать чтобы Aaa c 0 по 6 было?