Скачать: CL | DM;

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

← →
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 не хочет считать.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.01 c