Changeset 37 for trunk/Common/UPool.pas


Ignore:
Timestamp:
Oct 30, 2010, 7:36:25 PM (14 years ago)
Author:
george
Message:
  • Modified: TAssociativeArray replaced by specialized generic class TDictionaryStringString.
  • Modified: All TObjectList replaced by specialized generic class TListObject.
File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/Common/UPool.pas

    r32 r37  
    66
    77uses
    8   Classes, SysUtils, Contnrs, syncobjs;
     8  Classes, SysUtils, syncobjs, ListObject;
    99
    1010type
    … …  
    2121  { TThreadedPool }
    2222
    23   TThreadedPool = class(TObjectList)
     23  TThreadedPool = class(TListObject)
    2424  private
    2525    Lock: TCriticalSection;
Note: See TracChangeset for help on using the changeset viewer.