如果程序需要动态创建大量的对象，那么我们可以利用StringList对象来管理这些动态生成的对象。
1、创建StringList对象：
OBJ := TStringList.Create;
2、保存动态生成的对象：
OBJ.AddObject(‘标识‘,‘对象名‘);
3、调用生成的对象：
(OBJ.Objects[序号/OBJ.IndexOf(‘标识‘)] as 对象类型).方法或属性
或：
对象类型(OBJ.Objects[序号/OBJ.IndexOf(‘标识‘)]).方法或属性
4、释放动态生成的对象：
(OBJ.Objects[序号/OBJ.IndexOf(‘标识‘)] as 对象类型).Free;
对象类型(OBJ.Objects[序号/OBJ.IndexOf(‘标识‘)]).Free;
释放对象后记得要删除StringList里对应的记录：
OBJ.Delete(序号/OBJ.IndexOf(‘标识‘));
5、StringList的释放：
if Assigned(OBJ) then OBJ.Free;
---------------------------------------------------
正常来说是要先释放(TObject(ts.Items[i]).Free)再删除,最后才是ts.free
for i:=0 to StringList.Count-1 do
begin
StringList.Objects[i].Free;
end;
if StringList<>nil then
FreeAndNil(StringList);
==========================
利用StringList对象来管理这些动态生成的对象
原文：http://www.cnblogs.com/rogge7/p/4603801.html
