Em que evento verifico o clique do DBCHECKBOX
Meus amigos,
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
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
Curtidas 0
Respostas
Lucianopimenta
08/03/2005
Uma maneira mais fácil e utilizando o mesmo evento:
Form_Grupos_Contas.FPeriodo.Enabled := Form_Grupos_Contas.FLancFixo.Checked;
Form_Grupos_Contas.FPeriodo.Readonly := not Form_Grupos_Contas.FLancFixo.Checked;
Form_Grupos_Contas.FPeriodo.Enabled := Form_Grupos_Contas.FLancFixo.Checked;
Form_Grupos_Contas.FPeriodo.Readonly := not Form_Grupos_Contas.FLancFixo.Checked;
GOSTEI 0
Alexsandro
08/03/2005
Boa Ideia Luciano,
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
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
Lucianopimenta
08/03/2005
Verifique se o componente não perdeu o vinculo ao evento. Isso ocorre as vezes. Se não for isso, olhe a sua aplicação, pois sempre funcionou comigo o evento OnClick do DBCheckBox.
GOSTEI 0
Alexsandro
08/03/2005
oi Luciano,
Como posso verificar esta perda de Vinculo com o Evento ON CLICK?
Aí me perdi: rs rs rs
Alex
Como posso verificar esta perda de Vinculo com o Evento ON CLICK?
Aí me perdi: rs rs rs
Alex
GOSTEI 0
Lucianopimenta
08/03/2005
Dê um duplo clique no componente. Para saber se ele perdeu, olhe no Object Inspector na aba Events, se não mostrar nada é pq o evento perdeu o vinculo.
:)
:)
GOSTEI 0
Sandra
08/03/2005
Alexsandro,
Uma alternativa é testar o State do CheckBox:
;)
Uma alternativa é testar o State do CheckBox:
if Form_Grupos_Contas.FLancFixo.State = cbChecked then
;)
GOSTEI 0
Alexsandro
08/03/2005
Meus amigos,
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
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
Alexsandro
08/03/2005
Pessoal,
Descobri o problema. O componente não estava ativo e ainda estou colocando a rotina que ativa todos os componentes...Obrg.
Descobri o problema. O componente não estava ativo e ainda estou colocando a rotina que ativa todos os componentes...Obrg.
GOSTEI 0