Estou usando o seguinte codigo para tornar os CheckBox visiveis.
CheckBox: Array[1..15] of TcheckBox;
procedure TForm1.edt_variavelChange(Sender: TObject);
var valor,x,i : integer;
if valor = 2 then
begin
for i := 1 to 52 do
begin
TEdit(FindComponent('edt_variavel'+IntToStr(i))).Visible := true
CheckBox[i].Visible := true;
end;
porem ele da um Acess Violation
, ao usar o debug e dar um BREAK
no erro sou direcionado a esse código do Vcl.Controls
procedure TControl.SetVisible(Value: Boolean);
begin
if FVisible <> Value then
begin
VisibleChanging;
FVisible := Value;
Perform(CM_VISIBLECHANGED, Ord(Value), 0);
RequestAlign;
end;
end;
Como posso solucionar esse erro?