mormot.core.threads.pas unit 中文翻譯

Purpose: Framework Core Multi-Threading Support
- this unit is a part of the Open Source Synopse mORMot framework 2, licensed under a MPL/GPL/LGPL three license - see LICENSE.md

目的：框架核心多線程支持

• 本單元是開源Synopse mORMot框架2的一部分，根據MPL/GPL/LGPL三重許可進行許可-參見LICENSE.md

1.1. Units used in the mormot.core.threads unit （在mormot.core.threads單元中使用的單元）

1.2. mormot.core.threads class hierarchy

TSynThread
TSynThreadPoolWorkThread
TNotifiedThreadTLoggedThread
TLoggedWorkThreadTThreadAbstract
TSynBackgroundThreadAbstract
TSynBackgroundThreadProcess
TSynBackgroundTimer
TSynBackgroundThreadMethodAbstract
TSynParallelProcessThread
TSynBackgroundThreadProcedure
TSynBackgroundThreadMethod
TSynBackgroundThreadEventTThread
TSynPersistentStoreTSynQueue
TSynPersistentLockTSynParallelProcess
TSynPersistent
TBlockingProcessPool
TBlockingProcess
TBlockingProcessPoolItem
TSynEventTObject
TSynThreadPool
TPendingTaskList
TInterfacedObjectWithCustomCreate
TLockedDocVariantIInterface
ILockedDocVariant
ESynException
ESynThread

mormot.core.threads class hierarchy

1.3. Objects implemented in the mormot.core.threads unit （mormot.core.threads 單元中實現的對象）

1.3.1. ESynThread

ESynThread = class(ESynException)

本單元引發的異常類

1.3.2. TSynQueue

TSynQueue = class(TSynPersistentStore)

*線程安全的FIFO（先入先出）記錄有序隊列

• 內部使用TDynArray存儲，具有滑動演算法，比FPC或Delphi的TQueue或簡單的TDynArray.Add/Delete更高效
• 如果需要，支持TSynPersistentStore二進位持久化
• 該結構在設計上也是線程安全的*

constructor Create(aTypeInfo: PRttiInfo; const aName: RawUtf8 = ''); reintroduce; virtual;

*初始化隊列存儲

• aTypeInfo應是一個動態數組的TypeInfo() RTTI指針，它將在這個TSynQueue實例中存儲值
• 可以為這個實例可選地分配一個名稱*

destructor Destroy; override;

*銷毀存儲

• 將釋放所有內部存儲的值，並調用WaitPopFinalize*

function Capacity: integer;

*返回當前在記憶體中預留的槽位數

• 隊列具有優化的自動調整大小演算法，可以使用此方法返回其當前capacity
• 此方法不是線程安全的，因此返回的值僅具有指示性*

function Count: integer;

*返回當前存儲在此隊列中的項數

• 此方法不是線程安全的，因此返回的值要麼具有指示性，要麼應使用顯式的安全鎖定/解鎖
• 如果要檢查隊列是否為空，請調用Pending*

function Peek(out aValue): boolean;

*從隊列中按FIFO（先入先出）方式查找一個項

• 如果aValue已被填充了一個pending項，而不從隊列中刪除它（如Pop方法所做的），則返回true
• 如果隊列為空，則返回false
• 此方法是線程安全的，因為它將鎖定實例*

function Pending: boolean;

*如果隊列中有一些當前pending的項，則返回true

• 比檢查Count=0更快，並且比Pop或Peek快得多
• 此方法不是線程安全的，因此返回的值僅具有指示性*

function Pop(out aValue): boolean;

*從隊列中按FIFO（先入先出）方式提取一個項

• 如果aValue已被填充了一個pending項，並且該項已從隊列中刪除（如果不想刪除它，請使用Peek），則返回true
• 如果隊列為空，則返回false
• 此方法是線程安全的，因為它將鎖定實例*

function PopEquals(aAnother: pointer; aCompare: TDynArraySortCompare; out aValue): boolean;

*從隊列中按FIFO（先入先出）方式提取一個匹配的項

• 當前pending項與aAnother值進行比較*

function WaitPeekLocked(aTimeoutMS: integer; const aWhenIdle: TThreadMethod): pointer;

*等待從隊列中按FIFO（先入先出）方式查找一個項

• 在aTimeoutMS時間內返回一個指向pending項的指針
• 保持Safe.ReadWriteLock，因此調用者可以檢查其內容，然後如果它是預期的項，則調用Pop()，並最終調用Safe.ReadWriteUnlock
• 如果在時間內沒有將任何內容推入隊列，則返回nil
• 此方法是線程安全的，但僅在需要時鎖定實例*

function WaitPop(aTimeoutMS: integer; const aWhenIdle: TThreadMethod; out aValue; aCompared: pointer = nil; aCompare: TDynArraySortCompare = nil): boolean;

*等待並從隊列中按FIFO（先入先出）方式提取一個項

• 如果在指定的aTimeoutMS時間內aValue已被填充了一個pending項，則返回true
• 如果在時間內沒有將任何內容推入隊列，或者已調用WaitPopFinalize，則返回false
• aWhenIdle可以被分配，例如給VCL/LCL Application.ProcessMessages
• 可以在返回之前可選地比較pending項（例如，當多個線程將項放入隊列時可以使用）
• 此方法是線程安全的，但僅在需要時鎖定實例*

procedure Clear;

*刪除當前存儲在此隊列中的所有項，並清空其capacity

• 此方法是線程安全的，因為它將鎖定實例*

procedure Push(const aValue);

*將一個項存儲到隊列中

• 此方法是線程安全的，因為它將鎖定實例*

procedure Save(out aDynArrayValues; aDynArray: PDynArray = nil); overload;

*使用存儲的隊列項初始化一個動態數組

• aDynArrayValues應是一個在Create中定義的aTypeInfo變數
• 可以檢索一個可選的TDynArray包裝器，例如用於二進位或JSON持久化
• 此方法是線程安全的，並將複製隊列數據*

procedure WaitPopFinalize(aTimeoutMS: integer = 100);

*確保任何pending或未來的WaitPop()方法立即返回false

• 總是由Destroy析構函數調用
• 也可以從UI的OnClose事件中調用，以避免任何鎖定
• 此方法是線程安全的，但僅在需要時鎖定實例*

1.3.3. TPendingTaskListItem

TPendingTaskListItem = packed record

內部項目定義，由TPendingTaskList存儲使用

Task: RawByteString;

相關聯的task，以原始二進位形式存儲

Timestamp: Int64;

當TPendingTaskList.GetTimestamp達到此值時，應執行task

1.3.4. TPendingTaskList

TPendingTaskList = class(TObject)

*線程安全的任務列表，以RawByteString形式存儲，並帶有時間戳

• 你可以向內部列表添加任務，以在給定延遲後執行，使用類似於post/peek的演算法
• 執行延遲預計不准確，但根據每次NextPendingTask調用和GetTimestamp解析度進行最佳猜測*

constructor Create; reintroduce;

預設返回GetTickCount64來初始化列表記憶體和資源

function NextPendingTask: RawByteString; virtual;

*檢索下一個待處理task

• 如果當前沒有計劃中的task，則返回''
• 返回與指定延遲相對應的下一個堆棧*

procedure AddTask(aMilliSecondsDelayFromNow: integer; const aTask: RawByteString); virtual;

從當前時間開始，指定毫秒延遲後Append一個task

procedure AddTasks(const aMilliSecondsDelays: array of integer; const aTasks: array of RawByteString);

*指定任務之間的毫秒延遲後Append多個任務

• 第一個提供的延遲將從當前時間開始計算，然後它將指定等待下一個提供task需要多長時間——也就是說，aMilliSecondsDelays不是絕對延遲*

procedure Clear; virtual;

清除所有待處理任務

property Count: integer read GetCount;

當前定義了多少個待處理任務

property Task: TPendingTaskListItemDynArray read fTask;

*直接低級訪問內部task列表

• 警告：此動態數組的長度是列表容量：請使用Count屬性來檢索存儲的確切項數
• 使用try ... finally Safe.Unlock塊中的Safe.Lock/TryLock進行線程安全訪問此數組
• 項目按遞增的Timestamp存儲，即第一個項目是NextPendingTask方法將返回的下一個項目*

property Timestamp: Int64 read GetTimestamp;

*訪問內部TPendingTaskListItem.Timestamp存儲的值

• 對應當前時間
• 預設實現是返回GetTickCount64，在Windows下典型解析度為16毫秒*

1.3.5. ILockedDocVariant

ILockedDocVariant = interface(IInterface)

*用於線程安全訪問TDocVariant文檔的引用計數介面

• 例如，由TLockedDocVariant實現，用於IoC/DI解析
• 快速且安全地存儲任何類似JSON的對象，作為屬性/值對，或類似JSON的數組，作為值*

function AddExistingProp(const Name: RawUtf8; var Obj: variant): boolean;

*將現有屬性value添加到給定的TDocVariant文檔對象

• 如果Name存在，則返回TRUE並將Name/Value對添加到Obj
• 如果存儲的文檔中不存在Name，則返回FALSE
• 此方法在查找Name期間會使用lock，但無論是否返回FALSE，總是會釋放lock（參見AddExistingPropOrLock）*

function AddExistingPropOrLock(const Name: RawUtf8; var Obj: variant): boolean;

*將現有屬性value添加到給定的TDocVariant文檔對象

• 如果Name存在，則返回TRUE並將Name/Value對添加到Obj，使用內部lock確保線程安全
• 如果存儲的文檔中不存在Name，則返回FALSE並鎖定內部存儲：調用者最終應通過AddNewPropAndUnlock()釋放lock
• 可以這樣使用，以實現線程安全的緩存：

if not cache.AddExistingPropOrLock('Articles',Scope) then
  cache.AddNewPropAndUnlock('Articles',GetArticlesFromDB,Scope);

這裡GetArticlesFromDB會在主要lock內部執行

function Copy: variant;

對內部TDocVariant文檔對象或數組進行線程安全的複製

function Exists(const Name: RawUtf8; out Value: Variant): boolean;

*按名稱檢查和返回一個給定的屬性

• 如果找到Name，則返回TRUE並將與提供的Name相關聯的value填充到Value中，使用內部lock確保線程安全
• 如果未找到Name，則返回FALSE並釋放內部lock：如果你想要添加缺失的value，請使用ExistsOrLock()*

function ExistsOrLock(const Name: RawUtf8; out Value: Variant): boolean;

*按名稱檢查和返回一個給定的屬性

• 如果找到Name，則返回TRUE並將與提供的Name相關聯的value填充到Value中，使用內部lock確保線程安全
• 如果Name不存在，則返回FALSE並設置內部lock：調用者隨後應通過ReplaceAndUnlock()釋放lock*

function Lock: TAutoLocker;

對關聯的線程安全互斥鎖進行低級訪問

function ToJson(HumanReadable: boolean = false): RawUtf8;

將存儲的值保存為UTF-8編碼的JSON對象

procedure AddItem(const Value: variant);

*將value添加到內部TDocVariant文檔數組

• 不應與其他基於文檔的替代方案（如Exists/AddExistingPropOrLock或AddExistingProp）結合使用*

procedure AddNewProp(const Name: RawUtf8; const Value: variant; var Obj: variant);

*將屬性value添加到給定的TDocVariant文檔對象

• 此方法在調用時不會期望資源被鎖定，與AddNewPropAndUnlock不同
• 將使用內部lock確保線程安全
• 如果Name已存在，將更新/更改現有的value
• 可以這樣使用，以實現線程安全的緩存：

if not cache.AddExistingProp('Articles',Scope) then
  cache.AddNewProp('Articles',GetArticlesFromDB,Scope);

這裡GetArticlesFromDB會在主lock之外執行

procedure AddNewPropAndUnlock(const Name: RawUtf8; const Value: variant; var Obj: variant);

*將屬性value添加到給定的TDocVariant文檔對象以及內部存儲的文檔，然後釋放之前的lock

• 調用此方法之前應由AddExistingPropOrLock()返回false，即在一個已鎖定的實例上執行*

procedure Clear;

刪除所有存儲的屬性

procedure ReplaceAndUnlock(const Name: RawUtf8; const Value: Variant; out LocalValue: Variant);

*通過屬性名稱設置value，並設置本地副本

• 可以這樣使用，以實現線程安全的緩存：

if not cache.ExistsOrLock('prop',local) then
  cache.ReplaceAndUnlock('prop',newValue,local);

• 調用此方法之前應由ExistsOrLock()返回false，即在一個已鎖定的實例上執行

property Value[const Name: RawUtf8]: Variant read GetValue write SetValue;

*通過此屬性安全地訪問文檔欄位

• 這是此存儲的主要入口點
• 如果在讀取時Name不存在，將引發EDocVariant異常
• 實現類將對variant value進行線程安全的副本*

1.3.6. TLockedDocVariant

TLockedDocVariant = class(TInterfacedObjectWithCustomCreate)

*允許線程安全地訪問TDocVariant文檔

• 此類從TInterfacedObjectWithCustomCreate繼承，因此您可以定義一個mormot.core.interfaces.pas TInjectableObject的已發佈屬性為ILockedDocVariant，以便此類可以自動註入*

constructor Create(options: TDocVariantOptions); reintroduce; overload;

使用相應的選項初始化線程安全的文檔存儲

constructor Create(options: TDocVariantModel); reintroduce; overload;

從給定的模板初始化線程安全的文檔存儲

constructor Create; overload; override;

*使用快速的TDocVariant初始化線程安全的文檔

• 即調用Create(true)或Create(JSON_FAST)
• 這將是TInterfacedObjectWithCustomCreate的預設構造函數，例如在IoC/DI解析期間調用*

destructor Destroy; override;

銷毀存儲

function AddExistingProp(const Name: RawUtf8; var Obj: variant): boolean;

*向給定的TDocVariant文檔對象添加一個已存在的屬性value

• 如果Name存在，則返回TRUE並將Name/Value對添加到Obj
• 如果存儲的文檔中不存在Name，則返回FALSE
• 此方法在查找Name期間會使用lock，但無論是否返回FALSE，總是會釋放lock（參見AddExistingPropOrLock）*

function AddExistingPropOrLock(const Name: RawUtf8; var Obj: variant): boolean;

*向給定的TDocVariant文檔對象添加一個已存在的屬性value

• 如果Name存在，則返回TRUE並將Name/Value對添加到Obj
• 如果存儲的文檔中不存在Name，則返回FALSE，並期望最終調用Lock.Leave或AddNewPropAndUnlock()

function Copy: variant;

對內部TDocVariant文檔對象或數組進行線程安全的複製

function Exists(const Name: RawUtf8; out Value: Variant): boolean;

按名稱檢查和返回一個給定的屬性

function ExistsOrLock(const Name: RawUtf8; out Value: Variant): boolean;

*按名稱檢查和返回一個給定的屬性

• 如果找到，則返回TRUE並返回現有Name的value
• 如果未找到，則返回FALSE，並期望最終調用Lock.Leave或ReplaceAndUnlock()

function Lock: TAutoLocker;

對關聯的線程安全互斥鎖進行低級訪問

function ToJson(HumanReadable: boolean = false): RawUtf8;

*將存儲的value保存為UTF-8編碼的JSON對象

• 僅僅是VariantSaveJson()的包裝*

procedure AddItem(const Value: variant);

將value添加到內部TDocVariant文檔數組

procedure AddNewProp(const Name: RawUtf8; const Value: variant; var Obj: variant);

*向給定的TDocVariant文檔對象添加一個屬性value

• 此方法在調用時不會期望資源被鎖定，與AddNewPropAndUnlock不同
• 將使用內部lock確保線程安全
• 如果Name已存在，將更新/更改現有的value*

procedure AddNewPropAndUnlock(const Name: RawUtf8; const Value: variant; var Obj: variant);

向給定的TDocVariant文檔對象和內部存儲的文檔添加一個屬性value

procedure Clear;

刪除所有存儲的屬性

procedure ReplaceAndUnlock(const Name: RawUtf8; const Value: Variant; out LocalValue: Variant);

通過屬性名稱設置value，並設置本地副本

property Value[const Name: RawUtf8]: variant read GetValue write SetValue;

*將通過此屬性安全地訪問文檔欄位

• 如果Name不存在，將引發EDocVariant異常
• 返回的variant結果是副本，不是varByRef，因為副本將更具線程安全性*

1.3.7. TThreadAbstract

TThreadAbstract = class(TThread)

*所有TThread繼承類的抽象父類

• 利用跨編譯器和跨版本RTL的差異
• 擁有預期的Start和TerminateSet方法，以及Terminated屬性*

procedure Start;

*調用此方法以start線程

• Resume在最新的RTL中已被棄用，因為一些操作系統（例如Linux）沒有實現此暫停/恢復功能；我們在此為Delphi的舊版本定義此方法*

procedure Terminate; reintroduce;

重新引入以調用TerminatedSet

procedure TerminatedSet; virtual;

*正確terminate線程

• 由重新引入的Terminate調用*

property Terminated;

定義為public，因為可能用於terminate處理方法

1.3.8. TSynBackgroundThreadAbstract

TSynBackgroundThreadAbstract = class(TThreadAbstract)

*具有自身執行內容的抽象TThread

• 不應直接使用此類，而應使用TSynBackgroundThreadMethodAbstract / TSynBackgroundThreadEvent / TSynBackgroundThreadMethod，並提供更方便的回調*

constructor Create(const aThreadName: RawUtf8; const OnBeforeExecute: TOnNotifyThread = nil; const OnAfterExecute: TOnNotifyThread = nil; CreateSuspended: boolean = false); reintroduce;

*初始化線程

• 可以定義一些回調來嵌套線程執行，例如分配給TRestServer.BeginCurrentThread/EndCurrentThread，或者至少將OnAfterExecute設置為TSynLogFamily.OnThreadEnded*

destructor Destroy; override;

*釋放使用的資源

• 調用WaitForNotExecuting(100)以確保正確終結*

function SleepOrTerminated(MS: cardinal): boolean;

*Sleep()的安全版本，不會中斷線程進程

• 如果線程已終止，則返回TRUE
• 如果成功等待了MS毫秒，則返回FALSE*

procedure TerminatedSet; override;

*正確終止線程

• 由重新引入的Terminate調用*

procedure WaitForNotExecuting(maxMS: integer = 500);

*等待Execute/ExecuteLoop結束（即fExecute<>exRun）

• 在迴圈中調用Sleep()，直到達到超時
• 例如在Destroy中使用，以避免任何GPF並確保乾凈地終結*

property Pause: boolean read fExecuteLoopPause write SetExecuteLoopPause;

*臨時停止ExecuteLoop的執行，直到設置為false

• 例如可由TSynBackgroundTimer使用，以延遲後臺任務的進程*

property ProcessEvent: TSynEvent read fProcessEvent;

*訪問與低級別相關的事件，用於通知後臺線程任務執行

• 可以調用ProcessEvent.SetEvent來觸發內部處理迴圈*

1.3.9. TSynBackgroundThreadMethodAbstract

TSynBackgroundThreadMethodAbstract = class(TSynBackgroundThreadAbstract)

*抽象TThread，能夠在其自己的執行內容中運行方法

• 典型用途是用於處理數據或遠程訪問的後臺線程，同時UI將保持響應，通過在迴圈中運行OnIdle事件：例如，查看mormot.rest.client.pas單元中TRestClientUri.OnIdle如何處理這種情況
• 不應直接使用此類，而應從中繼承並重寫Process方法，或使用TSynBackgroundThreadEvent / TSynBackgroundThreadMethod並提供更方便的回調*

constructor Create(const aOnIdle: TOnIdleSynBackgroundThread; const aThreadName: RawUtf8; const OnBeforeExecute: TOnNotifyThread = nil; const OnAfterExecute: TOnNotifyThread = nil); reintroduce;

*初始化線程

• 如果aOnIdle未設置（即等於nil），它將簡單地等待後臺進程完成，直到RunAndWait()返回
• 可以定義一些回調來嵌套線程執行，例如分配給TRestServer.BeginCurrentThread/EndCurrentThread*

destructor Destroy; override;

終結線程

function RunAndWait(OpaqueParam: pointer): boolean;

*在後臺線程中非同步啟動Process抽象方法

• 等待進程完成，同時調用OnIdle()回調
• 在後臺線程中引發的任何異常都將在調用者線程中轉換
• 如果self未設置，或者從當前正在處理的同一線程中調用（以避免從OnIdle()回調引發的競態條件），則返回false
• 當後臺進程完成時返回true
• OpaqueParam將用於指定後臺進程的線程安全內容
• 此方法是線程安全的，即它將等待由另一個線程啟動的任何進程：可以從任何線程調用此方法，即使其主要目的是從主UI線程調用*

property OnAfterProcess: TOnNotifyThread read fOnAfterProcess write fOnAfterProcess;

在每個Process之後在Execute中觸發的可選回調事件

property OnBeforeProcess: TOnNotifyThread read fOnBeforeProcess write fOnBeforeProcess;

在每個Process之前在Execute中觸發的可選回調事件

property OnIdle: TOnIdleSynBackgroundThread read fOnIdle write fOnIdle;

*在遠程阻塞進程期間迴圈執行的回調事件，例如，在請求時間較長時刷新UI

• 可以為此屬性分配一個回調，例如調用Application.ProcessMessages，在後臺線程中執行遠程請求，但讓UI保持響應：mORMotUILogin.pas中的TLoginForm.OnIdleProcess和OnIdleProcessForm方法將滿足此屬性的預期
• 如果OnIdle未設置（即等於nil），它將簡單地等待後臺進程完成，直到RunAndWait()返回*

property OnIdleBackgroundThreadActive: boolean read GetOnIdleBackgroundThreadActive;

*如果後臺線程處於活動狀態，並且在處理過程中調用了OnIdle事件，則為TRUE

• 例如，用於確保用戶界面消息不會重新進入*

1.3.10. TSynBackgroundThreadEvent

TSynBackgroundThreadEvent = class(TSynBackgroundThreadMethodAbstract)

允許後臺線程處理方法回調

constructor Create(const aOnProcess: TOnProcessSynBackgroundThread; const aOnIdle: TOnIdleSynBackgroundThread; const aThreadName: RawUtf8); reintroduce;

*初始化線程

• 如果aOnIdle未設置（即等於nil），它將簡單地等待後臺進程完成，直到RunAndWait()返回*

property OnProcess: TOnProcessSynBackgroundThread read fOnProcess write fOnProcess;

*提供一個在後臺線程中執行的方法處理程式

• 由RunAndWait()方法觸發 - 該方法將等待直到完成
• 在RunAndWait()中指定的OpaqueParam將在此處提供*

1.3.11. TSynBackgroundThreadMethod

TSynBackgroundThreadMethod = class(TSynBackgroundThreadMethodAbstract)

允許後臺線程處理可變的TThreadMethod回調

procedure RunAndWait(Method: TThreadMethod); reintroduce;

*運行一次提供的TThreadMethod回調

• 使用此方法，而不是繼承的RunAndWait()*

1.3.12. TSynBackgroundThreadProcedure

TSynBackgroundThreadProcedure = class(TSynBackgroundThreadMethodAbstract)

允許後臺線程處理過程回調

constructor Create(aOnProcess: TOnProcessSynBackgroundThreadProc; const aOnIdle: TOnIdleSynBackgroundThread; const aThreadName: RawUtf8); reintroduce;

*初始化線程

• 如果aOnIdle未設置（即等於nil），它將簡單地等待後臺進程完成，直到RunAndWait()返回*

property OnProcess: TOnProcessSynBackgroundThreadProc read fOnProcess write fOnProcess;

*提供一個在後臺線程中執行的過程處理程式

• 由RunAndWait()方法觸發 - 該方法將等待直到完成
• 在RunAndWait()中指定的OpaqueParam將在此處提供*

1.3.13. TSynBackgroundThreadProcess

TSynBackgroundThreadProcess = class(TSynBackgroundThreadAbstract)

能夠在給定周期速率下運行方法的TThread

constructor Create(const aThreadName: RawUtf8; const aOnProcess: TOnSynBackgroundThreadProcess; aOnProcessMS: cardinal; const aOnBeforeExecute: TOnNotifyThread = nil; const aOnAfterExecute: TOnNotifyThread = nil; aStats: TSynMonitorClass = nil; CreateSuspended: boolean = false); reintroduce; virtual;

*初始化線程以進行周期性任務處理

• 當調用ProcessEvent.SetEvent或自上次處理以來已經過去了aOnProcessMS毫秒周期時，將調用aOnProcess
• 如果aOnProcessMS為0，將等待直到調用ProcessEvent.SetEvent
• 可以定義一些回調來嵌套線程執行，例如分配給TRestServer.BeginCurrentThread/EndCurrentThread*

destructor Destroy; override;

終結線程並等待其結束

property OnException: TNotifyEvent read fOnException write fOnException;

*當OnProcess引發異常時執行的事件回調

• 提供的Sender參數是引發的異常實例*

property OnProcess: TOnSynBackgroundThreadProcess read fOnProcess;

訪問周期性任務的實現事件

property OnProcessMS: cardinal read fOnProcessMS write fOnProcessMS;

訪問周期性任務處理的延遲（以毫秒為單位）

property Stats: TSynMonitor read fStats;

*處理統計信息

• 如果在類構造函數中aStats為nil，則可能為nil*

1.3.14. TSynBackgroundTimerTask

TSynBackgroundTimerTask = record

由TSynBackgroundTimer內部註冊列表使用

1.3.15. TSynBackgroundTimer

TSynBackgroundTimer = class(TSynBackgroundThreadProcess)

*能夠在後臺線程中以周期速率運行一個或多個任務的TThread

• 例如，通過繼承的TRestBackgroundTimer，由TRest.TimerEnable/TimerDisable方法使用
• 每個進程可以有自己的text消息FIFO隊列
• 如果你