validar checkbox en un FOR

[roman]

El método que apuntas, Marcos, es el que yo usaría en los casos en que es necesario acceder a los controles en múltiples ocasiones. De hecho, si algo tenía de bueno VB, era que podías insertar arreglos de controles en automático.

Por otra parte, puedes obviar esos @ y ^ .

// Saludos

[marcoszorrilla]

Yo tengo un programa en el que una competición dura entre 1 y 10 días y hay que capturar 3 datos distintos por cada día y hasta que el usuario introduce el número de días no se sabe cuantos controles hay que mostrar, yo tengo los 30 controles, 3 columnas de datos con la propiedad Visible = False, y al introducir los días automáticamente se hacen visibles los correspondientes al número de días tecleados y por eso utilicé esta forma de trabajo.

Un Saludo.

[GonzaloDias]

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:=strtoint(form8.DBEdit3.Text);
               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?

[GonzaloDias]

al parecer se asigna el control cunado se crea i luego no se puede modificar, no logro modificarlo o asignarle el control 10

[[maeyanes]]

Hola...

Otro pequeño "shortcut":

Código Delphi [-]
TChecBox(Controls[i]).Enabled := Resultado = 0

Saludos...

[[maeyanes]]

Hola...

Otro detalle; cuando vayas a recorrer todos los controles en busca de controles de cierto tipo, tu ciclo debes hacerlo desde 0 hasta el número de controles menos uno (for I := 0 to Pred(ControlCount) do), esto es, no puedes estar seguro que en tiempo de ejecución todos los CheckBoxs van a tener un Index entre 8 y 20.


Saludos...

[[AzidRain]]

El resultado de este poste debiera irse a una sección "Buenas prácticas" o algo así ya que a pesar de ser soluciones muy sencillas, a mas de uno se nos olvidan de vez en cuando (Me acuerdo del concepto del Bibliotecario de Código de Al Gonzalez) y siempre son muy útiles. A ver si alguien o algunos nos tomamos un poco de tiempo de francachelas para ir compilando el "Pequeño ClubDelphi Ilustrado" jejeje.

[[Delphius]]

Empezado por GonzaloDias

Hola amigos del foro,
Bueno mi problema es que quiero validar varios checkbox dentro de un FOR, mi duda es si es posible que en vez de que se lea checkbox1.checked se pudiera leer como checkbox[i].checked, por ejemplo:

Código Delphi [-]
for i:=1 to 10 do
begin

  total:=a*b;
    if total >10 then
   checkbox[i].checked = false;
end;

y asi ir validando los checkbox, les comento que tengo 10 checkbox pero antes al iniciar el form donde se encuentran estos checkbox lo squiero validar habilitandolos y deshabilitandolos y para no hacer varios if, se me ocurrio realizar un FOR es decir un for q valla de 1 a 10, el tema es ver si se puede de esta manera o cual sugieren? se que ahi varias maneras pero esta no se si es posible.
Muchas Gracias amigos.

Bueno, es posible hacer algo "parecido" a eso. Yo en vez de proponerte las alternativas que te han dado, quisiera darle un pequeño giro de cuerda. Existe un control que justamente simplifica mucho el trabajo sobre un "grupo" o lista de CheckBoxs... el componente se llama TCheckListBox o algo así, no recuerdo bien y mi máquina con Delphi está dañada.
Este componente es simplemente un TListbox con checkboxs dentro, con lo que basta con recorrer la propiedad vectorial y los items para acceder a cada checkbox.

Saludos,