태그값으로 ComponetCount를 사용하는 방법으로
각 에디트 박스에 tag 속성을 순차적으로 각각 주시고요
입력하는 에디트는 알아서 Tag 주세요 ^^;

var
I, Editcnt: Integer;
begin
     Editcnt := StrtoInt(edtInput.text);

     for I := 0 to ComponentCount - 1 do
     begin
         if ( Components[I] is TEdit ) then
         begin
                 if ((Components[i] as TEdit ).Tag) <= EditCnt then
                    (Components[i] as TCheckBox ).Enabled := True
                 else
                    (Components[i] as TCheckBox ).Enabled := False;
                 end;
         end;
     end;

end;


다른 방법으로, Edit Name을 순차적으로 줘서 접근하는 방법도 있습니다
즉, FindComponent를 사용하는 방법

var
I, Editcnt: Integer;
begin
       Editcnt := StrtoInt(edtInput.text);

       for I := 1 to Editcnt do
       with FindComponent('Edit 명' + IntToStr(i)) as TEdit do
              Enabled := False;

end;

그럼, 즐코되세요.