A falta de que lo confirme alguien más experto, pienso que sí es posible.
Código Delphi
[-]unit MainUnit;
interface
var
GlobalVariable: Integer;
implementation
end.
Código Delphi
[-]
unit MyThreadUnit;
interface
uses
System.Classes;
type
TMyThread = class(TThread)
protected
procedure Execute; override;
end;
implementation
procedure TMyThread.Execute;
begin
GlobalVariable := 42;
end;
end.
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
var
MyThread: TMyThread;
begin
MyThread := TMyThread.Create(True);
MyThread.Start;
MyThread.WaitFor;
MyThread.Free;
ShowMessage('Valor de GlobalVariable: ' + IntToStr(GlobalVariable));
end;