Здравствуйте. Пытаюсь сделать поток в 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;"
Не получается нагуглить причину и исправить. Кто знает - помогите.