Fórum Dúvida em validação de Datas #177577
26/08/2003
0
Obrigado
Rafaela
Rafaela
Curtir tópico
+ 0Posts
26/08/2003
Rodrigo Bergmann
Gostei + 0
26/08/2003
Rafaela
Gostei + 0
26/08/2003
Rafaelunp
Seguinte:
Eu, com minha pouca experiência (Até que estou melhorando) faria assim:
Colocaria um campo MaskEdit, com a mascara da data.
Na hora de processar a data para a consulta faria:
MaskEdit1.Text := FormatDateTime(´dd/mm/yyyy´, MaskEdit1.Text );
Mais ou menos isso...
deu pra entender?
Gostei + 0
26/08/2003
Mmtoor
Faça assim:
try
StrToDate(Edit1.Text);
except
on EConvertError do
ShowMessage (´Data Inválida!´);
end;
Espero ter ajudado.
MMTOOR2003
Gostei + 0
27/08/2003
Torres Delphi
procedure TForm1.MaskEdit1Exit(Sender: TObject);
begin
try
StrToDate(MaskEdit1.Text);
except
on EConvertError do
ShowMessage (´Data Inválida!´);
end;
end;
Este codigo e outros exemplos estao no site do Clube Delphi, na pagina principal, menu a esquerda, link ´Dicas & Macetes´. La vc encontra muitas outras coisas, vale a pena conferir.
Explore tambem os outros itens do menu.
[]´s
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)