Сообщество Чайников

Вопрос

Как можно создать массив CheckBox'ов во время работы программы?

Ответ

Опиши массив чекбоксов в разделе глобальных переменных:

var
Form1:TForm1;
Cb:Array [1..10] of TCheckBox;
…

Далее где там тебе удобно создавай чекбоксы (я их вставил в обработчик нажатия батона, но это не принципиально, можешь лепить этот код куда тебе вздумается):

procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
begin
for i:=1 to 10 do begin
//Создаем сам объект
Cb[i]:=TCheckBox.Create(form1);
//Далее обращаемся к свойствам объекта
with Cb[i] do begin
//Присваиваем чекбокс форме, что б она его отображала
Parent:=Form1;
//Далее идут необходимые свойства чекбокса
Caption:='CheckBox'+inttostr(i);
Left:=200;
top:=i*30;
end;
end;
end;

Собственно и все.

Из конференции Expert_FAQ