DbEdit Evento OnExit nao funciona

Question

Alguem ja teve o problema no envento OnExit do componente DbEdit???
O programa nao executa a rotina que estao dentro do evento.
Ja coloquei um break para analisar mais o programa passa direto sem entrar no onexit quando o compoente perde o foco.
Alguem saberia o porque???

Marco Salles · Answer

Responda :Ao compilar o delphi marca com �[b:73e1ddf5d7]bolinhas azuis� [/b:73e1ddf5d7]as instru��es que est�o dentro do OnExit ?????...

Janbaceiredo · Answer

Sim aparece... Quando eu marco elas para dar o F9 fica vermelha o point de verificacao......

Marco Salles · Answer

[quote:724645c634]Sim aparece... Quando eu marco elas para dar o F9 fica vermelha o point de verificacao...[/quote:724645c634]Fica vermelho � uma coisa ... Marcar com as bolinhas Azuiz � Outra coisaQuando compila ele marca com[u:724645c634][b:724645c634] bolinhas azuis [/b:724645c634][/u:724645c634].....

Ara.es · Answer

Como fez para testar o evento?? alguns botoes nao recebem foco, portanto nao irao tirar o foco do Edit, com isso o evento onExit nao ser� disparado... veja se pode ser isso....

Pestana_ · Answer

completando o que o [i:7e1fb4895d]ara.es[/i:7e1fb4895d] disse. Os bot�es s�o TSpeedButton, TToolButton e ao executar o evento OnClick de um bot�o atrav�s de teclas de atalhos!flw....

Marco Salles · Answer

completando o que o ara.es e o pestana disse se for este o problema , voce deve [b:779369eab3]for�ar a perda [/b:779369eab3]do foco no DbEdit , atraves de Codigos
Por exemplo o ActiveControl := nil ou o SelectNext ou o Focused de Outro componente.

Janbaceiredo · Answer

Bom, quando aperto F9 o codigo do DBEdit fica com pequenas bolinhas azuis ao lado do codigo. Acredito que seja essas bolinhas que vc esta querendo saber, � isso????

Estou usando um tela de cliente com varios DBEdit coloquei no envento OnExit a rotina de verificacao de CNPJ e CPF.

Pestana_ · Answer

De uma olhada no artigo: [color=blue:176552ef62]cuidado ao usar o evento onExit I e II do dtDelphi28. [/color:176552ef62]

link para baixar o arquivo: [[color=blue:176552ef62][b:176552ef62] http://www.delphix.org/index.php?q=node/156[/b:176552ef62][/color:176552ef62] ]

espero ter ajudado.
flw.

flw.

Janbaceiredo · Answer

Nao funcionou a dica do link enviado.O problema � que o programa nao entra dentro do evento de nenhum OnExit do DBEdit....

Pestana_ · Answer

voc� fez como o nosso colega Marco Salles h�via postado e n�o resolveu?

voce deve for�ar a perda do foco no DbEdit , atraves de Codigos Por exemplo o ActiveControl := nil ou o SelectNext ou o Focused de Outro componente.

flw.

Ara.es · Answer

poste o seu codigo ai. Para que possamos verificar se tem algo diferente ou errado. Flw!!...

Martins · Answer

vc est� usando algum c�digo para simular o TAB?Seu componente � nativo do Delphi?...

Janbaceiredo · Answer

Estou usando esse codigo no OnExit do DBEdit
procedure Tfrm_Clientes.DBE_CPFCNPJExit(Sender: TObject);
begin
inherited;
If VerificaCPF_CNPJ(DBE_CPFCNPJ.Text) = False Then
Begin
MsgDialogPadrao.Caption:= �Informa��o�;
MsgDialogPadrao.Text:= �Aten��o,� + #13 + �CNPJ Inv�lido�;
MsgDialogPadrao.ShowModal;
End;
end;

E esse para substituir o <TAB> por <ENTER>:
inherited;
If Key = 13 Then
Begin
SelectNext(ActiveControl, True, True);
Key:= 0;
End;

Ja refiz toda a janela, porem o erro permanece.
Ja force o componente perder o foco mais tb nao funcionou por ele esta perdendo o foco mais nao esta entrando dentro do evento OnExit

Martins · Answer

[quote:2eccf529c3=�janbaceiredo�]Estou usando esse codigo no OnExit do DBEditprocedure Tfrm_Clientes.DBE_CPFCNPJExit(Sender: TObject);begin inherited; If VerificaCPF_CNPJ(DBE_CPFCNPJ.Text) = False Then Begin MsgDialogPadrao.Caption:= �Informa��o�; MsgDialogPadrao.Text:= �Aten��o,� + #13 + �CNPJ Inv�lido�; MsgDialogPadrao.ShowModal; End;end;E esse para substituir o por : inherited; If Key = 13 Then Begin SelectNext(ActiveControl, True, True); Key:= 0; End;Ja refiz toda a janela, porem o erro permanece.Ja force o componente perder o foco mais tb nao funcionou por ele esta perdendo o foco mais nao esta entrando dentro do evento OnExit[/quote:2eccf529c3]Percebi q esse seu componente � heran�a de um outro Form, talvez um form padr�o (modelo) n�o sei, vc est� usando heran�a no seu projeto todo?J� testou seu c�digo em um componente DBEdit sem heran�a para ver se o erro permanece?Infelizmente estou viajando e aqui n�o tenho como ver isso no Delphi.Boa sorte....

Janbaceiredo · Answer

Correto...Estou usando um Form (Pai) com todas as funcoes de acesso ao banco de dados e demais desing. Dessa forma eu crio via heran�a um form (Filho) e ADICIONO o componente DBEdit.Em outros formularios esta funcionando, apenas nesse que nao. Ja refiz essa tela novamente e nada.......

F�rum DbEdit Evento OnExit nao funciona #356080