CheckListBox somente leitura

22/01/2006

0

preciso usar um CheckListBox, mas preciso que ele fique como somente leitura, ou seja, as caixas de verificação não podem ser marcadas nem desmarcadas.
não quero utilizar a propriedade enabled pois fica esmaecida.


Raserafim

Raserafim

Responder

Posts

22/01/2006

Edilcimar

no onenter do checkbox faça

If checkbox1.checked then
Marcado := True
Else
Marcado := False;

e no onexit faça
If Marcado := True then
CheckBox1.Ckecked := True
Else
CkeckBox1.Ckecked := False;


Responder

22/01/2006

Aasn

Olá raserafim,

A melhor maneira de fazer isso é através de um ´Abort´ no evento OnMouseDown do CheckListBox.

[]´s
AASN


Responder

22/01/2006

Edilcimar

e se em vez do mouse a pessoa estiver usando o teclado (espaço) para marcar ou desmarcar o checkbox?


Responder

22/01/2006

Aasn

Ops... esqueci do teclado!

procedure TForm1.CheckListBox1KeyPress(Sender: TObject; var Key: Char);
begin
case key of
     #13 : Abort;
     32 : Abort;
     end;
end;


Valeu Edilcimar!

[]´s
AASN


Responder

22/01/2006

Raserafim

resolvido.
fiz o seguinte pessoal:
no evento OnClickCheck, que é disparado tanto para o teclado como para o mouse, coloquei o seguinte código:
  ChckLstBxPermissoes.Checked[ChckLstBxPermissoes.ItemIndex] := not ChckLstBxPermissoes.Checked[ChckLstBxPermissoes.ItemIndex];



Responder

22/01/2006

Aasn

Olá raserafim,

o que pode ser inconveniente neste método usado por vc é o ´piscado´ que ele gera ao clicar/teclar, algo que não acontece na sugestão que postei. Contudo, ´VOCÊ DECIDE´.

[]´s
AASN


Responder

Que tal ter acesso a um e-book gratuito que vai te ajudar muito nesse momento decisivo?

Ver ebook

Recomendado pra quem ainda não iniciou o estudos.

Eu quero
Ver ebook

Recomendado para quem está passando por dificuldades nessa etapa inicial

Eu quero

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar