Marcar todos os CheckBox no Delphi

Olá a todos os Geeks, no Tuto de hoje vamos aprender a marcar todos os CheckBox em Delphi, uma tarefa um tanto quanto fácil.

[ads2]

1 – Para começar crie um novo projeto Delphi, caso você não tenha um criado: File >> New >> VCL Forms Application – Delphi for Win32.

2 – Vamos fazer um exemplo com os meses do ano, por isso coloque 13 CheckBox no form, 12 para os meses e outro que servirá para selecionar todos, o qual você deve alterar a propriedade name para CBtodos:

check

3 – No evento OnClick do CBtodos você deve adicionar o seguinte código:

Veja que, conforme o código, você pode tanto marcar todos, como desmarcar todos, e que o laço de repetição for percorre todos os componentes presentes no form e testa quais são do tipo TCheckBox, para que só eles tenham seus valores alterados.

Agora compile e teste, veja como ficou. Até a próxima!

Sobre o autor:

Graduado em Análise e Desenvolvimento de Sistemas - FLS; Desenvolvedor Full-stack na UniLeão; Revisor de conteúdo do site Clube dos Geeks, católico, gosto de ler e escrever.

Postagens relacionadas:

2 respostas

  1. Saymon Yury

    Boa tarde Jayr, parabéns pelo post. Utilizei seu for e funcionou perfeitamente, porem quando estão todos marcados e eu clico em uma das opções para desabilitá-la, o CBtodos deve desabilitar também certo? porém quando eu faço isso, todos ficam desabilitados, sabe porque ?

    Responder

Deixe uma resposta

Seu e-mail não será publicado.