Безопасность нитей в пользовательском классе при доступе к компоненту FireMonkey

Question

Я пишу пользовательский класс, который должен иметь возможность подключения к компоненту TMemo FireMonkey в форме, чтобы записывать в него информацию. Класс определяется как:

TBlokData = class 
private 
    [weak] FLogMemo: TMemo; 
    procedure Log(s : string); 
public 
    constructor Create(ConnStr: string); 
    property LogMemo : TMemo read FLogMemo write FLogMemo; 
    destructor Destroy; override; 
end; 

и реализация метода Log является:

procedure TBlokData.Log(s : string); 
begin 
    if Assigned(FLogMemo) then 
     FLogMemo.Lines.Add(TimeToStr(Now) + ': ' + s); 
end; 

Я обеспокоен, если я создаю объект класса в потоке и заполнения LogMemo свойство, скажем, компонент Memo1 в форме FireMonkey, что мой класс больше не будет потокобезопасным, потому что я буду манипулировать компонентом в форме из потока при вызове метода Log.

Является ли это актуальной проблемой? Если да, то как я могу сделать это потокобезопасным, сохраняя при этом удобство использования класса за пределами потоковой среды?

Answer 1

Создание метода LogThreadSafe:

TThread.Synchronize(nil, procedure 
    begin 
     Log(s); 
    end); 

Answer 2

Вы имеете право на беспокойство. Ваш код не является потокобезопасным. Используйте TThread.Synchronize или TThread.Queue, чтобы гарантировать, что любые манипуляции с пользовательским интерфейсом выполняются в основном потоке пользовательского интерфейса.

Как правило, любые манипуляции с компонентом пользовательского интерфейса должны выполняться в потоке пользовательского интерфейса.