Fórum validar data #193857
09/11/2003
0
Alguém pode me dar uma dica de como validar uma data ???
Grata !
[]´s
Ana Davis
Grata !
[]´s
Ana Davis
Ana Davis
Curtir tópico
+ 0
Responder
Posts
09/11/2003
Amfsouza
Faça o seguinte, force uma exceção, assim:
var
Data: TDateTime;
try
Data := <sua data> ;
<data OK>;
except
< Data Inválida>;
end;
Qualquer dúvida. Tô aqui :D
var
Data: TDateTime;
try
Data := <sua data> ;
<data OK>;
except
< Data Inválida>;
end;
Qualquer dúvida. Tô aqui :D
Responder
Gostei + 0
09/11/2003
Caninha51
Pode ser assim tb!!
var
Data : TDateTime;
begin
if TryStrToDate(edit1.Text,Data) then
showmessage(´ok´) // A variável data retorna a data convertida
else
showmessage(´Data Inválida´)
end;
var
Data : TDateTime;
begin
if TryStrToDate(edit1.Text,Data) then
showmessage(´ok´) // A variável data retorna a data convertida
else
showmessage(´Data Inválida´)
end;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)