Fórum Validação de campo data. #208177

21/01/2004

0

Amigos...

Estou usando um o DBEdit associado a um campo data da minha tabela.
Coloquei as máscaras e funcionou legal.
Só que se o usuário não digitar corretamente, ou seja, se digitar 1 /01/2004 , por exemplo, fica aparecendo a mensagem que não é uma data válida.
Alguém sabe como posso fazer uma validação para isto?

Desde já agradeço

Mariana


Mariana

Mariana

Responder

Posts

21/01/2004

Nigro

o problema é que tem um espaço depois do número um referente ao dia, assim dá erro mesmo, mas acho que se digitar 1/ 1/04, o erro não ocorre, confira...
Note que o espaço está antes do algarismo.


Responder

Gostei + 0

21/01/2004

Mariana

Ola...

Mas acontece que o usuário não sabe disso.
Vou ter que fazer uma validação para apareceu uma mensagem do sistema, e não um erro do Delphi.

Grata

Mariana


Responder

Gostei + 0

21/01/2004

Nigro

Desculpe
Coloque um Try
Try
Edit1.Text := FormatDateTime(´DD/MM/YYY´, Table1Campo.AsDateTime);
Except
ShowMessage(´Mano... Corrija a data... Tenha dó!´);


Responder

Gostei + 0

21/01/2004

Nigro

Desculpe
Coloque um Try
Try
Edit1.Text := FormatDateTime(´DD/MM/YYY´, Table1Campo.AsDateTime);
Except
ShowMessage(´Mano... Corrija a data... Tenha dó!´);
end;


Responder

Gostei + 0

21/01/2004

Paulo_amorim

Olá

Desculpe Coloque um Try Try Edit1.Text := FormatDateTime(´DD/MM/YYY´, Table1Campo.AsDateTime); Except ShowMessage(´Mano... Corrija a data... Tenha dó!´);



Nigro, o erro que causaria o Exception esta na parte ´Table1Campo.AsDateTime´ , pois o resto ele ja esta corrigindo com o FormatDateTime
entao, eh mais facil prevenir e nao deixar causar essa exception, fazendo com que o usuario digite corretamente ANTES de inserir no banco, não?

Até+


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar