Delphi-Help

Главная Статьи Компоненты и классы Групповые операции с контролами
Понедельник, 14 Марта 2011 10:01

Групповые операции с контролами

Автор 
Оцените материал
(0 голосов)


Групповые операции с контролами

Если например эти 10 CheckBox все время используются для групповых операций, чтобы не перебирать компоненты можно сделать так.

  1. Берем ставим на форму 10 CheckBox
  2. Объявляем массив
var arr:array[1..10] of TCheckBox
  1. Далее присваиваем указатели массиву:
For i:=1 to 10 do
  arr[i]:=FindComponent(Format('CheckBox%d',[i])) as TCheckBox;

Все, теперь к каждому CheckBox можно обратится как к элементу массива:

arr[5].checked:=true;

Так как здесь массив статический никаких действий по освобождению памяти делать не надо, по уничтожении компонентов деструктором формы элементы массива будут показывать в никуда. В любом случае этот массив занимает в памяти 40 байт - не большая плата за скорость и удобство.

Прочитано 4188 раз Последнее изменение Пятница, 22 Апреля 2011 23:08

Авторизация



Счетчики