haitao: 改 在TObjectList里放了很多个对象 为 放 结构T [阅读: 364] 2006-09-24 09:42:19 T=record bnil:boolean; obj:原来的对象 end;