Validar Fecha en Edit

[roman]

¿Cómo que te retiras unos días? Yo hubiera jurado lo mismo que tú. De hecho, la propiedad Date está implementada con:

Código Delphi [-]
function TCommonCalendar.GetDate: TDate;
begin
  Result := TDate(FDateTime);
end;

Yo antes pensaba que un moldeo así, el compilador lo que hacía era truncar el valor, pero ya veo que no. Mas entonces, es un error de la componente, debería ser:

Código Delphi [-]
function TCommonCalendar.GetDate: TDate;
begin
  Result := TDate(Trunc(FDateTime));
end;

// Saludos