Tratar EditMask

Delphi

08/01/2005

Formatei meu editMask para receber dados do tipo data, mas estou com um problema, pois não sei como tratar o erro que acontece quando o editMask perde o foco e nem todos os dados são preenchidos.

A messagem de erro que é exibida é a seguinte:

Invalid input value. Use escape key to abandone changes.

Por favor me ajudem...!!!!!!!!!!!!!!!!!!!!!!!


Rodrigo


Rgfreire

Rgfreire

Curtidas 0

Respostas

Macario

Macario

08/01/2005

ola programador,
use o seguinte:
Try
  StrtoDate(TMaskEdit(Sender).text);
Except
  Showmessage(´Data inválida´+#13+´Digite novamente...´);
  TMaskEdit(Sender).SetFocus;
end;


Espero ter ajudado.


GOSTEI 0
POSTAR