Gracias amigos me sirvio de mucho, lo modifique un poco y me quedo asi.
Código Delphi
[-]
c:=0;
for i := 8 to 20 do
begin
if Controls[i] is TCheckBox then
begin
c:=c+1;
CostoC:=600;
Resultado:=CostoC mod c;
if Resultado<>0 then
TCheckBox(Controls[i]).Enabled := false;
end;
end;
pero me quedo un problema que en el control 10 no ingresa al if que lo valida si es Tcheckbox, saben como es para asignarle al checkbox4 (en mi caso) el control 10?