[AlexSku]

Сообщение от guranvir

У меня есть процедура в ней есть две локальные переменные, мне нужно передать их в поток, созданный от TThread, создается поток в ней же. Помогите пожалуйста решить проблему

Код:

      with TMyThread.Create(true) do
      begin
       F1:= Param1;
        F2:= Param2;
        FreeOnTerminate:= true;
        Resume;
      end;
/////////////////////////////////////
  TMyThread = class(TThread)
  private
    { Private declarations }
    F1, F2: Real;
    procedure Proc1;
  protected
    procedure Execute; override;
  end;