<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta content="text/html; charset=ISO-8859-1"
http-equiv="Content-Type">
</head>
<body text="#000000" bgcolor="#ffffff">
El 02/05/2011 10:35 a.m., Nippur Lagash escribió:
<blockquote cite="mid:216836.77994.qm@web45616.mail.sp1.yahoo.com"
type="cite">
<div style="color: rgb(0, 0, 0); background-color: rgb(255, 255,
255); font-family: arial,helvetica,sans-serif; font-size: 10pt;">
<div><span>Hola Paola, no se si es lo que estas buscando, pero
en el OnBeforePost podes llamar a esta funcion.</span></div>
<div><br>
</div>
<div>function EsFechaValida(str: string): Boolean;
<br>
var
dt: TDateTime;
<br>
begin
<br>
Result := True;
<br>
try
<br>
dt := StrToDate(str);
<br>
except
<br>
Result := False;
<br>
end;
<br>
end; <br>
<span></span></div>
<br>
</div>
</blockquote>
Hola Fer..<br>
si, la función puede servir.. la cosa es qué preguntar en el
beforepost.. o sea.. dónde está el valor que yo ingresé.. no está en
qryAmpliaciones.FieldByName('fecha_recepcionprov').AsString porque
el post no se hizo todavía...<br>
<br>
de todas formas, si pongo esto.. no sale ese mensaje sino el mensaje
"invalid date" y me cancela el programa al entrar por ej una fecha
32/12/11<br>
<br>
if not
EsFechaValida(qryAmpliaciones.FieldByName('fecha_recepcionprov').AsString)
then<br>
ShowMessage('fecha Inválida'); <br>
<br>
chauuuuuuuuu<br>
<br>
</body>
</html>