получить значение переменной из потока

[winhttp]

знаю, что всё просто но нада подсказка

procedure hef.Execute;
var
result:string;
begin
  { Place thread code here }
  result:='666';

end;

код осн программы

var
  Form1: TForm1;
  he:hef;
  result:string;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
he:= hef.Create(true);
he.Priority:=tpNormal;
he.FreeOnTerminate:=false;
he.Resume;
showmessage(result);

end;

если тут не обьявлять переменную result, то ошибка

[Пепел Феникса]

обьявите поле объекта потока.
ждите завершения, и потом читайте это поле.