CheckListBox somente leitura
22/01/2006
0
não quero utilizar a propriedade enabled pois fica esmaecida.
Raserafim
Posts
22/01/2006
Edilcimar
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;
22/01/2006
Aasn
A melhor maneira de fazer isso é através de um ´Abort´ no evento OnMouseDown do CheckListBox.
[]´s
AASN
22/01/2006
Edilcimar
22/01/2006
Aasn
procedure TForm1.CheckListBox1KeyPress(Sender: TObject; var Key: Char);
begin
case key of
#13 : Abort;
32 : Abort;
end;
end;
Valeu Edilcimar!
[]´s
AASN
22/01/2006
Raserafim
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];
22/01/2006
Aasn
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
Clique aqui para fazer login e interagir na Comunidade :)
