Ver Mensaje Individual
  #5  
Antiguo 04-12-2017
[maeyanes] maeyanes is offline
Capo de los Capos
 
Registrado: may 2003
Ubicación: Campeche, México
Posts: 2.732
Reputación: 23
maeyanes Va por buen camino
Hola...

En algunas partes tienes que hacer "casteo" de clases para que tu código funcione...

Código Delphi [-]
for I := 0 to sbPreguntas.ControlCount - 1 do
begin
  vGroupBox := sbPreguntas.Controls[i] as TGroupBox: // o puedes hacer TGroupBox(sbPreguntas.Controls[i]);
  for J := 0 to vGroupBox.ControlCount - 1 do
  begin
    if vGroupBox.Controls[J] is TCheckBox then
    begin
      vCheckBox := vGroupBox.Controls[J] as TCheckBox;
      if vCheckBox.Checked then
        // Lo que haya que hacer para eliminarlo...
    end
  end
end;


Saludos...
__________________
Lee la Guía de Estilo antes que cualquier cosa. - Twitter
Responder Con Cita