Ao invés de ComponentCount e Components, utilize ControlCount e Controls. Vai funcionar.
-- Erick Sasse www.ericksasse.com.br > -----Mensagem original----- > De: delphi-br@yahoogrupos.com.br > [mailto:[EMAIL PROTECTED] Em nome de Petiz > Enviada em: quarta-feira, 7 de setembro de 2005 19:09 > Para: delphi-br@yahoogrupos.com.br > Assunto: [delphi-br] Panel1.CheckBox = True ???? > > Em um form alem de outros componentes, tenho 2 Panels com > varios CheckBox cada um... > Preciso saber se tem algum CheckBox do Panel1 marcado > (Cheched = True)... > > Tentei da seguinte forma e Não deu certo... > > Checado := False; > For Conta := 0 To Panel1.ComponentCount - 1 Do > Begin > If Panel1.Components[Conta] is TCheckBox Then > Begin > If TCheckBox(Panel1.Components[Conta]).Checked Then > Begin > Checado := True; > Break; > End; > End; > End; > > O Panel1.ComponentCount sempre me retorna ZERO... > Se eu usar somente "ComponentCount", me retorna TODOS os > componentes do do Form inclusive os do Panel2 ... > > Como VERIFICAR somente os CheckBox do Panel1?? > Alguém tem alguma idéia de como fazer isso??? > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > -- > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> > > Para ver as mensagens antigas, acesse: > http://br.groups.yahoo.com/group/delphi-br/messages > > Para falar com o moderador, envie um e-mail para: > [EMAIL PROTECTED] ou [EMAIL PROTECTED] > > Links do Yahoo! Grupos > > > > > > > _______________________________________________________ Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA. Participe! www.yahoo.com.br/messenger/promocao -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html