[DarkBlue]

agradeceria si pudieras ayudarme con mi código mi estimado roman creo que sera sencillo para alguien de tus conocimientos


oh ya veo :s pero ahora me quedo mas perplejo con eso de twincontrol existe un alguna documentacion para leer ?

Código Delphi [-]
for i:=0 to scrollbox1.ControlCount-1 do
begin

  if  (Scrollbox1.Controls[i]  is  TGroupbox) then
  begin

       for x:=0 to  (Tgroupbox(scrollbox1.Controls[i]).ControlCount-1) do
        begin

                 if   (Tgroupbox(scrollbox1.Controls[i]).Controls[x] is Tcheckbox )
                 and ( tcheckbox(tgroupbox(scrollbox1.Controls[i]).Controls[x]).Checked=true   )  then
                 begin

                        for w:=0 to  (Tgroupbox(scrollbox1.Controls[i]).ControlCount-1) do // lo recorro de nuevo por que deseguro se      me paso el label que busco para saber el nombre de la imagen
                        begin
                              if   (Tgroupbox(scrollbox1.Controls[i]).Controls[x] is Tlabel ) then
                              begin
                               listadenombres.add( tlabel(tgroupbox(scrollbox1.Controls[i]).Controls[x]).Caption );
                               continue;
                              end;

                        end;



                 end;

       end;

bueno creo que se me acaba de ocurrir ahorita mismo es así