Evento OnExit não é executado no DBDateTimePicker
Seguindo o ótimo artigo em https://www.devmedia.com.br/criando-um-dbdatetimepicker-datetimepicker-parte-1/17878, há uma correção.
Faltou a instrução inherited no evento de saída do objeto (CMExit). Sem ele o evento OnExit não funciona.
procedure TDBDateTimePicker.CMExit(var Msg: TMessage);
begin
inherited;
try
FDataLink.UpdateRecord;
except
on Exception do
SetFocus;
end;
end;
Faltou a instrução inherited no evento de saída do objeto (CMExit). Sem ele o evento OnExit não funciona.
procedure TDBDateTimePicker.CMExit(var Msg: TMessage);
begin
inherited;
try
FDataLink.UpdateRecord;
except
on Exception do
SetFocus;
end;
end;
Alvaro Vieira
Curtidas 1
Respostas
Fernando Ito
15/08/2019
Olá Alvaro Vieira,
Por gentileza, comenta no artigo para que o responsável possa corrigir no artigo, grato.
Um abraço,
ITO
Por gentileza, comenta no artigo para que o responsável possa corrigir no artigo, grato.
Um abraço,
ITO
GOSTEI 0
Alvaro Vieira
15/08/2019
Olá Alvaro Vieira,
Por gentileza, comenta no artigo para que o responsável possa corrigir no artigo, grato.
Um abraço,
ITO
Por gentileza, comenta no artigo para que o responsável possa corrigir no artigo, grato.
Um abraço,
ITO
Boa noite Fernando, eu tentei, mas o site não permitiu.
GOSTEI 0