Всем привет! Добавляю чекбоксы в групбокс. Подскажите можно ли как-то добавить их в виде двумерного массива (мне нужно разместить 200 чекбоксов по 20 в строке из 10 строк). Кусок моего кода.
Код:
...
var
FPass: TFPass;
NChB: TCheckBox;
...
procedure TFPass.FormCreate(Sender: TObject);
var i:integer;
NChB: Array of TCheckBox;
begin
SetLength(NChB,i+1);
SetLength(NChB,j+1);
for i := 0 to 19 do
begin
NChB[i] := TCheckBox.Create(GroupBox2);
NChB[i].Top:=80;
NChB[i].Left:= 220+(i*35);
NChB[i].Parent:=GroupBox2;
NChB[i].Name:='NChB'+IntToStr(i+1);
NChB[i].Caption:=IntToStr(i+1);
NChB[i].Visible:=True;
NChB[i].BringToFront;
end;