Delphi中利用StringList对象来记录动态生成的对象

在Delphi中，如果程序需要动态创建大量的对象，那么我们可以利用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;