使用循环更改对象属性（Delphi 2010）
我有160个相同类型的对象使用循环更改对象属性（Delphi 2010）,delphi,delphi-2010,Delphi,Delphi 2010,我有160个相同类型的对象TApdStatusLight， 点击状态灯1，点击状态灯2点击状态灯160。 如何使用for循环更改NoLitColor而不必写160行来更改每一行？您需要在循环中动态创建实例，而不是使用表单设计器。在窗体的重写构造函数中或在窗体的OnCreate事件处理程序中执行此操作 没有160个字段，每个字段都包含对实例的引用。而是将它们放在一个数组中。这样，如果您需要对所有实例应用更改，您可以在循环中执行此操作。您可以展示您现在拥有的一些基本代码吗？这真的是160种不同的类类
TApdStatusLight点击状态灯1点击状态灯2如何使用for循环更改NoLitColor而不必写160行来更改每一行？您需要在循环中动态创建实例，而不是使用表单设计器。在窗体的重写构造函数中或在窗体的
OnCreate没有160个字段，每个字段都包含对实例的引用。而是将它们放在一个数组中。这样，如果您需要对所有实例应用更改，您可以在循环中执行此操作。您可以展示您现在拥有的一些基本代码吗？这真的是160种不同的类类型吗？或者只有160个单一类型的变量？