[XIO]

Доброго времени суток уважаемые коллеги. Пол дня убил на что бы понять как описать класс многопоточности.. Теперь не могу понять как им воспользоваться.
Класс:

Код:

type
    TMyThread = class(TThread)
    Procedure Execute(); virtual;
    end;

  TForm1 = class(TForm)
    Button1: TButton;
    Button2: TButton;
....

Метод выглядит так:

Код:

procedure TMyThread.Execute;
begin
  repeat
    ClickOnForm(FindWindow(nil, 'Some text'),'Caption');
  Until SendClick = 0;
end;

Пытаюсь запустить его примерно так:

Код:

procedure TForm1.Button12Click(Sender: TObject);
Var
  SProc: TMyThread;
...
  SProc.Create;
  SProc.Execute;
...

Пробовал без криате. Пробовал ставить True или False в параметре Create, в общем всяески пробовал и всячески получал ошибку.

Ткните пожалуйста меня носом в то место где я неправ. И подскажите как правильно использовать метод. Суть - мне надо что бы паралельно выполнялось 2 задачи...