楼主说的“同时”是指多个线程同时调用?如果没有其他线程对这个list进行写操作的话,那多个线程同时读(调用你这个函数)是没有问题的

解决方案 »

  1.   

    为了线程度安全,可以使用TThreadList。
      

  2.   

    返回不同的实例?怎么说?      准备改用threadlist.因为有对其进行赋值。
      

  3.   

    如果使用threadlist,那么每次  LockList ,都要unlocklist吗?如果二个线程都对这个频繁调用,不是要等待另一个线程????
      

  4.   

    要跟进每一个属性的实现,确认对公用的内存没有写操作:
      if aindex >= Count  then//这里要跟进Count
        result:=nil
      else
        result:=TBlObject(Items[aindex]);//跟进Items