Как сохранить данные в экземпляре TTask для последующего использования?

Моя цель — сохранить некоторые данные (TValue) в экземпляре TTask перед его запуском, а затем использовать его внутри задачи. Я хочу использовать анонимные обработчики вместо TNotifyEvent.

Что-то вроде этого:

LTask.SetData(LMyData);

а позже используйте его так:

LSomeData := TTask.CurrentTask.GetData();

Таким образом, данные могут быть доступны через экземпляр Task.

Я думал о наследовании от TTask, но это сложно и может быть не лучшим вариантом.

Есть ли другой способ хранения данных в TTask, используя RTTI или что-то еще?

Я использую Delphi 10 Сиэтл.


person iPath ツ    schedule 06.09.2015    source источник
comment
Использовать захват переменных   -  person David Heffernan    schedule 06.09.2015