Групповые операции с контролами
Материал из DRKB
Групповые опперации с контролами[править | править код]
Если например эти 10 CheckBox все время используются для групповых операций, чтобы не перебирать компоненты можно сделать так.
1) Берем ставим на форму 10 CheckBox
2) объявляем массив
var arr: array[1..10] of TCheckBox
3) Далее присваиваем указатели массиву:
for i := 1 to 10 do
arr[i] := FindComponent(Format('CheckBox%d', [i])) as TCheckBox;
Все, теперь к каждому CheckBox можно обратится как к элементу массива:
arr[5].Checked := True;
Так как здесь массив статический никаких действий по освобождению памяти делать не надо, по уничтожении компонентов деструктором формы элементы массива будут показывать в никуда. В любом случае этот массив занимает в памяти 40 байт - не большая плата за скорость и удобство.
Author: Vit (Vitaly Nevzorov) (www.delphist.com, www.drkb.ru, www.unihighlighter.com, www.nevzorov.org)
Source: Взято с Vingrad.ru http://forum.vingrad.ru
ID: 00355