Validar Data no form

Delphi

22/10/2007

Boa tarde!!!
Bom gostaria que eu algum me ajuda-se a resolver um erro aqui..
Eu estou com um form de contas a pagar e estou com o edit data.
eu fui no evento onExit do edit data e coloquei
Try
StrToDate(edtDatCad.Text);
Except
On EConvertError do
Begin
ShowMessage (´A data está inválida!´);
edtDatCad.setfocus;
End;
end;

só que quando estou no sistema e digito o1,ou 2 no dia esta dando um erro arrumei ja o editmask mais nao consigo..
alguem podi me ajudar
Muito Obrigado!!!


Pablo_lima

Pablo_lima

Curtidas 0

Respostas

Alexandrej

Alexandrej

22/10/2007

só que quando estou no sistema e digito o1,ou 2 no dia esta dando um erro arrumei ja o editmask mais nao consigo.. alguem podi me ajudar Muito Obrigado!!!


Você está usando a mascara assim: !99/99/00;1;_ ??


GOSTEI 0
Mayron Cachina

Mayron Cachina

22/10/2007

vc poderia usar um componente de calendário...
resolveria o problema de data errada, mais vc teria q testar se a data é menor que a data atual...


GOSTEI 0
Pablo_lima

Pablo_lima

22/10/2007

[quote:7dcfe3f6ec=´RodLima´] só que quando estou no sistema e digito o1,ou 2 no dia esta dando um erro arrumei ja o editmask mais nao consigo.. alguem podi me ajudar Muito Obrigado!!!


Você está usando a mascara assim: !99/99/00;1;_ ??[/quote:7dcfe3f6ec]

Prezado Amigo Alexandre eu estou usando a mascara
!99/99/0000;1;_ se eu colocar o 12 funciona normal
mais se eu colocar o zero(0) ou outra coisa não cunfiona ex:01
Só acima de 10 que funciona
abrigado


GOSTEI 0
Pablo_lima

Pablo_lima

22/10/2007

[quote:3a3b0cf683=´Mayron Cachina´]vc poderia usar um componente de calendário...
resolveria o problema de data errada, mais vc teria q testar se a data é menor que a data atual...[/quote:3a3b0cf683]

Prezado Amigo Maycon estou usando o componente
DBedit(Datawere)na forma que arrasto o componente para o form,
como fazer neste caso para usar o calendario?
obrigado
desde ja agradeço


GOSTEI 0
Mayron Cachina

Mayron Cachina

22/10/2007

Seguinte...

existem 2 componente de calendário:
1. DBDateTimePicker 2. DBMonthcalendar


vc pode optar pelo que melhor lhe agradar...
DateTimePicker eh um combo que quando vc aperta aparece o calendario...e o monthcalendar ja eh o calendario grande...

e é só ligar o datasource como vc liga no DBEdit...
agora testar se a data é menor que a atual é simples...

if DBDateTimerPicker1.date < now then
  showmessage(´Data inválida!´)
else
begin
  //...
end;


*Tô sem o Delphi aqui, então n sei se o código a cima está correto... mais já eh um começo...

Qualquer Dúvida posta ai :wink:


GOSTEI 0
POSTAR