Ver Mensaje Individual
  #6  
Antiguo 12-04-2012
GonzaloDias GonzaloDias is offline
Miembro
NULL
 
Registrado: ene 2012
Posts: 21
Reputación: 0
GonzaloDias Va por buen camino
Controls para checkbox

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?
Responder Con Cita