Hola
No se si esto servira pero para validar dos fechas de dos DTPicK yo lo hago asi:
En El evento del DTPick ( OnCloseUp ):
Código Delphi
[-]
procedure TFRepDatos.DTP2CloseUp(Sender: TObject);
begin
If DTP2.Date < DTP1.Date then
begin
MessageDlg('Fecha del fin no puede ser menor que fecha de inicio.',mtError,[mbOK],0);
DTP2.DateTime := DTP1.DateTime;
end;
end;
Con esto la primera no puede ser mayor que la segunda fecha.
Tal Vez sirva
Saludos