Fórum Em que evento verifico o clique do DBCHECKBOX #271447
08/03/2005
0
Dependendo de um Botão Check Box ser habilitado ou não, eu quero habilitar o campo seguinte ou não, mas a rotina abaixo não está funcionando. Coloquei no evento ONCLICK, mas sempre que eu clico neste componente, a procedure abaixo NUNCA é chamada.
Alguém poderia me ajudar?
procedure TForm_Grupos_Contas.FLancFixoClick(Sender: TObject);
begin
if Form_Grupos_Contas.FLancFixo.Checked = True then
begin
Form_Grupos_Contas.FPeriodo.Enabled := True;
Form_Grupos_Contas.FPeriodo.Readonly := False;
end
else
Form_Grupos_Contas.FPeriodo.Enabled := False;
Form_Grupos_Contas.FPeriodo.Readonly := True;
end;
Alex
Alexsandro
Curtir tópico
+ 0Posts
08/03/2005
Lucianopimenta
Form_Grupos_Contas.FPeriodo.Enabled := Form_Grupos_Contas.FLancFixo.Checked;
Form_Grupos_Contas.FPeriodo.Readonly := not Form_Grupos_Contas.FLancFixo.Checked;
Gostei + 0
08/03/2005
Alexsandro
Mas a minha dúvida é: Porque quando CLICO NO componente PARA MARCAR/DESMARCAR este evento não está sendo chamado? O que eu poderia estar fazendo de errado???
Obrigado,
Alex
Gostei + 0
08/03/2005
Lucianopimenta
Gostei + 0
08/03/2005
Alexsandro
Como posso verificar esta perda de Vinculo com o Evento ON CLICK?
Aí me perdi: rs rs rs
Alex
Gostei + 0
08/03/2005
Lucianopimenta
:)
Gostei + 0
08/03/2005
Sandra
Uma alternativa é testar o State do CheckBox:
if Form_Grupos_Contas.FLancFixo.State = cbChecked then
;)
Gostei + 0
08/03/2005
Alexsandro
Agradeço a colaboração, mas é importante entender que o erro ocorre porque a procedure acima nunca é chamada, quando eu marco e desmarco a opção e eu coloquei esta procedure no evento ONCLICK.
oBRG.
Alex
Gostei + 0
08/03/2005
Alexsandro
Descobri o problema. O componente não estava ativo e ainda estou colocando a rotina que ativa todos os componentes...Obrg.
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)