/// <summary>
/// 对象池 ( 支持模板 )
/// </summary>
/// <remarks>
/// 这是一个对像池, 可以池化所有 TObject 对像 ( 支持模板 )
/// <code>
/// 用法:
/// <para>在一个全局的地方定义: </para>
/// <para>var</para>
/// <para> Pooler: TObjPool<要收集的类名></para>
/// </code>
/// <code>
/// <para>用到的地方: </para>
/// <para>tmpObj := Pooler.LockObj as Txxx;</para>
/// <para>if Assigned(tmpObj) then</para>
/// <para>try</para>
/// <para>finally</para>
/// <para> Pooler.UnlockObj(tmpObj);</para>
/// <para>end;</para>
/// </code>
/// <code>
/// <para>初始化: </para>
/// <para>initialization</para>
/// <para> Pooler := TObjPool<要收集的类名>(对象池最大值, 对象池最小值).Create;</para>
/// <para>finallization</para>
/// <para> Pooler.Free;</para>
/// </code>
/// </remarks>