Fórum ´ / / ´ is not a valid date #169279
14/07/2003
0
Tenho uma formulário de cadastro de clientes, tudo com TDBEdit, está tudo correto grava corretamente (Interbase 6 com dbExpress e delphi 6),
o problema é o seguinte:
O usuário digita a data de nascimento e grava Ok. Quando for fazer uma alterãção e no tdbedit da data ele deleta (apaga) a data que existia e pressiona Enter ou tab, etc. aí vem este erro.
Alguém já passou por isto.
Só para relembrar uso o Delphi 6, Interbase 6 e DBExpress.
Agradeço desde já.
Cesarpir
Curtir tópico
+ 0Posts
14/07/2003
Cabelo
Já estive neste tipo de problema e resolvi da seguinte maneira, se o usuário não gravar nenhuma data vc joga a data do sistema, assim vc trava este erro
if componente.text = ´´ then
begin
campo no banco . asstring := formatdatetime(´mm/dd/yy´, now);
end;
//Quando o componente não for datetimepicker, se for terá que ser assim
if datetimepicker.date = null then
begin
datetimepicker.date := now;
end;
pode ser no evento onExit do componente..
Sem mais
Cabelo
Gostei + 0
14/07/2003
Diana
Gostei + 0
14/07/2003
Merph
[],s
Adriano
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)