Вопрос delphi, сосчитать количество label одного цвета как сосчитать количество label одного цвета на форме

[vioeres]

delphi, сосчитать количество label одного цвета как сосчитать количество label одного цвета на форме? (delphi)

 

[саня_]

Примерно так: for i :=0 to ControlCount - 1 do if Controls is TLabel then if (Controls as TLabel).Font.Color = _SomeColor then inc(__SomeCounter);

 

[данил]

Самый идеальный вариант если они воткнуты в какой-нибудь table контрольный элемент. Тогда проходишь по нему, получаешь контролы и смотришь label ли это, если да, то какого цвета.