Как сделать так что бы этот код заработал

Clich

Всем привет, вот решил поработать с потоками и столкнулся с такой проблемой, что нужно два потока в программе и не могу сделать.
  TMyTr = class(TgsvThread)
    http:TidHttp;
  protected
 procedure Execute;override;
  end;
 
type
 TPotok=class(TThread)
  private
   html:WideString;
      procedure reg;
  protected
   procedure Execute;override;
end;
Ошибка тут
TMyTr = class(TgsvThread)
    http:TidHttp;
  protected
 procedure Execute;override; <- Тут ошибка
  end;
Что делать?
2 ответа

Clich

Что за ошибка-то, боже ж мой?


Clich

Нет реализации метода Execute