Создает ли TTimer.OnTimer рабочий поток для синхронизации с основным потоком?

Question

Мне нужно работать с устаревшим кодом. Этот код имеет TTimer, созданный в основном потоке. В событии OnTimer таймер периодически проверяет состояние некоторых данных в рабочем потоке.

псевдокод:

procedure MainForm.OnTimer(Sender: TObject); 
begin 
    if WorkerThread.Data.State = full then 
    begin 
    WorkerThread.Free; //This freezes GUI.  
    end else 
    //Do something else. 
end; 

Проблема заключается в том, что я хочу сделать некоторые базовые операции, когда WorkerThread прекращает. Чтобы избежать синхронизации, я преодолел метод DoTerminate. Однако в этом конкретном случае это не помогает, и мой графический интерфейс становится замороженным до тех пор, пока не закончится DoTerminate.

Могу ли я как-то избежать заморозки?

Спасибо.

Answer 1

Здесь недостаточно кода, чтобы сказать что-либо с уверенностью. Тем не менее, при вызове Free в потоке получается звонок Terminate, за которым следует WaitFor. Весьма правдоподобно, что ожидание не возвращается, что согласуется с замороженным интерфейсом.

Answer 2

Это действительно назад. В любой подходящей схеме нитей ваш поток будет уведомлять вашу gui-нить о состоянии типа .Data.State = full. После этого вы будете выполнять действия gui-thread или main-thread. Одно я уверен, что WorkerThread.Free должен быть неправильным. Попытка освободить поток, который, по-видимому, заблокирован по какой-либо причине, гарантированно провалится. Thread.Terminate также будет терпеть неудачу, если поток заблокирован, поэтому никакой помощи нет.

Имея монитор таймера, состояние нити никогда не будет правильным. Я никогда не употребляю слова всегда и никогда, но ... Повторюсь: наличие монитора Timer, состояние нити никогда не будет правильным. Никогда. Даже не думай об этом.

• Turin