Я должен изменить и изменить некоторые визуальные компоненты в потоке, и, как вы знаете, делать это небезопасно.

Мой вопросКак написать полностью потокобезопасный код? Это возможно? если это так, можете ли вы привести простой пример?

мой код, который не является потокобезопасным:

type
  tMyWorkerThread = class(TThread)
      public
         procedure Execute; override;
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure tMyWorkerThread.Execute;
begin
  //codes
  //working with visual components
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  TMyWorkerThread.Create(false);
end;

Спасибо.