[MrDiG]

Хорошо. А вот такой вопрос. Есть несколько функций. Как их заставить работать в потоке?


Пробую так:

Код:

 TNewThread = class(TThread)
  private
...

    protected
    procedure Execute; override;
  public
    procedure Sync;
    function ParseSid(s:string):string;
    function ParseLink(s:string):string;
    function ParseReload(s:string):string;
    constructor Create(CreateSuspended: Boolean);
  end;

Выдаёт ошибку:
Incompatible types: 'TComponent' and 'TNewThread'

Ошибки возникают на строках:
Reg := TRegExp.Create(Self);