[Dreammaster]

Здравствуйте. Пытаюсь сделать поток в Lazarus:

Код:

type 
TForm1 = class(TForm) 
private 

public 

end; 
TMyThread = class(TThread) 
private 
{ Private declarations } 
protected 
procedure Execute; override; // тут выдает ошибку
end; 
var 
Form1: TForm1; 

implementation 

{$R *.lfm} 

Админ: Пользуемся тегами при оформлении кода! В след раз будут санкции.

но в этой части кода выдает ошибку unit1.pas(22,15) Error: Forward declaration not solved "Execute;"
Не получается нагуглить причину и исправить. Кто знает - помогите.