problemas com mascara de Data

Delphi

19/04/2005

bom dia, pessoal

tenho um programa que o usuário digita a data de vencimento de uma nota.

Se ele digitar a data nesse DBEdit e depis tentar apagar o programa não deixa, dá umerro dizendo que ´ / / ´ não é uma data válida, como faço para acabar com isso?


Rafael Santana

Rafael Santana

Curtidas 0

Respostas

Rodc

Rodc

19/04/2005

Vá no FieldEditor da tabela em questão.
No campo da data tem uma função [b:7fe0906479]OnSetText[/b:7fe0906479].
Nesta função coloque o código:
if Trim(Text) <> ´/  /´ then
  Sender.AsString := Text;

Qualquer dúvida leia o Help desta função.


GOSTEI 0
Rafael Santana

Rafael Santana

19/04/2005

rodc, não deu certo cara..

essa função tá fazendo o seguinte, eu digito uma data no campo vencimento, aí eu quero apagar, quando eu apago e saio do campo essa função tá repetindo sempre a última data que eu digitei...


o que eu quero é digitar uma data e, quando eu precisar apagar essa data, o sistema deixe...


GOSTEI 0
Rodc

Rodc

19/04/2005

Foi mal. Fiz o código de cabeça e esqueci de uma validação.
Segue novamente:

if Trim(Text) <> ´/  /´ then 
  Sender.AsString := Text
else
  Sender.Clear;



GOSTEI 0
POSTAR