Групповая операция - одним оператором

← →
Jony (2002-08-22 10:39) [0]

Можно ли, а если можно - то как, минимальным количеством операторов произвести идентичную операцию для множества одинаковых элементов - скажем, установить или снять сразу все пометки в нескольких CheckBox, объединенных в одном GroupBox?

← →
andy_prokofiev (2002-08-22 10:50) [1]

Что-то в этом роде
for i := 0 to Self.GroupBox1.ControlCount - 1 do
if Self.GroupBox1.Controls[i] is TCheckBox then
(Self.GroupBox1.Controls[i] as TCheckBox).Checked := true;

← →
SaS13 (2002-08-22 10:51) [2]

for i := 0 to ComponentCount- 1 do
if Components[i] is tCheckBox then
tCheckBox(Components[i]).Checked := true;

← →
Jony (2002-08-22 11:48) [3]

Спасибо, ребята!
Первый вариант работает, а вот во втором почему-то Components для GroupBox не хочет считать.

Групповая операция - одним оператором Найти похожие ветки